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Pcrcom Mini-Disk Drive Systems for TRS-80* Computers . . . 

Now! Add-On ancT Add-In Mini-Disk 

Storage for your Model III. 

The industry leader in microcomputer peripherals. 
Percom not only gives you better design, better 
quality and first-rate service, but you pay less 
to boot. 

Still #1 for Model! 

As if greater storage capacities, exceptional quality 
control measures and lower prices aren't reasons 
enough to make Percom your first choice for Model I 
add-on drives, all Percom Model I drives are also rated 
for double -density operation. 

Add our innovative DOUBLER™ adapter to your 
Model I Expansion Interface, and with Percom drive 
systems you can enjoy the same double-density storage 
capability as Model III owners. 

The DOUBLER includes a TRSDOS*-like 
double-density disk operating system called DBLDOS™ 

We also offer a double-density Model I version of 
OS-80 as well as DOUBLEZAP programs for modifying 
NEWDOS/80 and VTOS 4.0t for DOUBLER 
compatibility- 

Of course you don't have to upgrade your computer 
for double-density opwration to use Percom mini-disk 
drive systems. In single-density operation, our TRS-80* 
Model I compatible 40-track drives store 102 Kbytes of 
formatted data on one side of a diskette, and our 
80-track drives store 205 Kbytes. By comparison. 
Tandy's standard drive for the Model 1 stores just 86 
Kbytes. 

And like our Model III drives, Model 1 add-on drives 
are optionally available with "flippy" storage capability. 

System Requirements: 

Model III: 16-Kbyte system (min) and Model III BASIC. 
The second internal drive may be installed after the first 
internal drive kit is installed, and external drives #2. #3 
and #4 may be added if either an internal or external 
first-drive kit has been installed. External drives #3 and 
#4 require an optional interconnecting cable. 
Model I: 16-Kbyte system (min). Level II BASIC. 
Expansion Interface, disk operating system and an 
interconnecting cable. For double- density storage, a 
Percom DOUBLER must be installed in the Expansion 
Interface and DBLDOS (comes with the DOUBLER) or 
other double-density DOS must be used. For 
single -density operation, a Percom SEPARATOR™ 
adapter, installed in the Expansion Interface, will 
virtually eliminate "CRC ERROR — TRACK LOCKED 

UU 1 read errors. Pnccs and iptHrifitaaoii- s(it'i«c-i lo rliar>gf wiThoui notice 



New for the TRS-80* Model III 

Patterned after our fast-selling TFD Model I drives. And 
subjected to the same reliability controls. These new 
TFD mini-disk systems for the Model III provide more 
features than Tandy drives, yet cost far less. 

• Flippy Capability: Both internal (add-in) and 
external (add-on) drives permit recording on either 
side of a diskette 

• Greater Storage Capacity: Available with either 40- 
or 80-track drive mechanisms. Percom TFD mini-disk 
systems store more. A 40-track drive stores up to 180 
Kbytes — formatted — on one side of a 5-inch 
diskette. An 80-track drive stores a whopping 364 
Kbytes. 

• 1.5 Mbyte On-line: The Percom drive controller 
(included with the initial drive) handles up to four 
drives. With four 80-track mini-disk drives you can 
access over L5 million bytes of on-line file data. 

Moreover, the initial drive may be either an 
internal add-in drive or an external add-on drive. And 
whichever configuration you get, the initial drive kit 
comes complete with our advanced 4-drive 
controller, interconnecting cables, power supplies, 
installation hardware, a DOS and of course the drive 
mechanism itself. 

• First Drive Includes DOS: OS-80^". Percom's fast 
extendable BASIC -language disk operating system, is 
included on diskette when you purchase an initial 
drive kit. Originally called MicroDOS. OS-80 was 
favorably reviewed in the June 1980 issue of Creative 
Computing magazine. 

• Works with Model III TRSDOS: Besides being fully 
hardware compatible. Percom's Model 111 40-tirack 
drive systems may be operated with Tandy's Model III 
TRSDOS — without any modifications whatsoever 
And, TRSDOS may be easily upgraded with simple 
software patches for operating 80-track drives. 

Pcrcom TFD add-on drives start at only $399. Model 
III Drive kits start at only $749.95. 

Quality Percom products arc available at 
authorized dealers. Call toll free 1-800-527-1592 
for the address of your nearest dealer or to order 
direct from Percom. 
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PERCOM DATA COMPANY, INC. 

211 N KIRBY GARLAND, TEXAS 75043 
1214)272-3421 
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Percom's DOUBLERIP tolerates wide variations in media, drives 



GARLAND. TEXAS — May 22. 1981 — 
Harold Mauch, president of Percom Data 
Company, announced here today that an im- 
proved version of the Company's innovative 
DOUBLER'' adapter, a double-density plug-in 
module for TRS-80' Model 1 computers, is 
now available. 

Reflecting design refinements based on both 
theoretical analyses and field testini;, the 
DOUBLER 11", so named, permits even great- 
er tolerance in variations among media and 
drives than the previous design. 

Like the original DOUBLER, the DOU- 
BLER [| plugs into the drive controller IC 
stjcket of a TRS-80 Model I Expansion Inter- 
face and permits a user to run either single- or 
double-density diskettes on a Mtxiel I. 

With a DOUBLER II installed, over ftjur 
times more formatted data — as much as 364 
Kbytes — can he stored on one side of a five- 
inch diskette than can be stored using a stan- 
dard Tandy Model 1 drive system. 

Moreover, a DOUBLER II equips a Model I 
with the hardware required to run Model III 
diskettes. 

{Ed. Note: See "OS-80**: Bridging the TRS- 
80* software compatibility gap" elsewhere on 
this page. ) 

The critical clock-data separation circuitry 
of the DOUBLER II is a proprietary design 
called a ROM -programmed digital phase-lock 
loop data separator. 

According to Mauch, this design is more 
tolerant of differences from diskette to diskette 
and drive to drive, and also provides immunity 
to petformance degradation caused by circuit 
component agir\g. 




Mauch said "A DOUBLER I! will operate 
just as reliably two years after it is installed as it 
will two days after installation." 

The digital phase-lock lo<.ip also eliminates 
the need tor trimmer adjustments typical ot 
analog phase-lock l<.*op citcuits. 

"You plug in a Pcrom DOUBLER II and 
then forget it," he said. 

The DOUBLER II also feanires a refined 
Write Precompensation circuit that more 
effectively minimizes the phenomena of bir- 
and peak -shifting, a reliabifity-impaiting char- 
acteristic of magnetic data recording. 

The DOUBLER II. which is fully s.>ttware 
compatible with the previous LKDUBLER. is 
supplied with DBLDOS". a TRSDOS'- 
compatible disk operating system. _ 

The IX:)UBLER II sells for $?i>^S, includ- 
ing the DBLDC:)S diskette.. .^"^L^I.V! 



Circuit misapplication causes diskette read, format problems. 

High resolution key to reliable data separation 



GARLAND. TEXAS — The Percom 
SEPARATOR^ docs very well for the Radio 
Shack TRS-80' Model I computer what the 
Tandy disk controller does poorly at best: reli- 
ably separates clock and data signals during 
disk-read operations. 

Unreliable data-cUx:k separation causes for- 
mat verification failures and repeated read 
retries. 

ORG ERROR -TRACK LOCKED OUT 

The problem is most severe on high-number 
(high -density) inner file tracks. 

As reported earlier, the clock-data sepata- 
tion ptoblem was traced by Percom to misap- 
plication of the internal separator of the 1 771 
drive controller IC used in the Mtxlel I. 

The Percom Separator substitutes a hififi' 
resolution digital data separator citcuit, one 
which operates at 16 mcgahert:. for the low- 
resolution one-megahem circuit of the Tandy 
design. -,X-.^. 

Separator circuits Ciur jOfcnte at lower 
frequencies — for example, two- or four- 



megaheni — were found by Percom to provide 
only marginally improved performaiKe over 
the original Tandy circuit. 

The Percom solution is a simple adapter that 

f plugs into the drive C(mrTolier of the Expansion 
ntcrface (El). 

Not a kit — some vendors supply an un- 
tested separator kit of resistt)rs. ICs and other 
paraphernalia that may be installed by mod- 
ifying the computer — the Percom 
SEPARATOR is a fully assembled, hilly tested 
plug-in module. 

Installation involves merely plugging the 
SEPARATOR into the Model I Eldisk con- 
troUer chip socket, and plugging the controller 
chip into a stxket on the SEPARATOR. 

The SEPARATOR, which sells fot only 
$29.95. may be purcha.sed from autht)ri:ed Per- 
com retailers or ordered directly from the fac- 
tory. The factory tolUfree order number is 
1-800-527-1592. 

Ed. note; Opening the TRS-80 Expansion In- 
terface may void the Tandy limited 90-dav 
warranty. 



Owners of original DOUBLERs may pur- 
chase a DOUBLER 11 upgrade kit, without the 
disk controller IC. for $30.00. Proof of pur- 
chase of an original DOUBLER is required, 
and each DOUBLER owner may purchase only 
one DOUBLER U at the $30.00 price. 

The Percom DOUBLER II is available from 
viuthoriied Percom rerailers, or may be ordered 
direct from the factory. The factory toli-free 
order number is 1-800-527-1592. 

Ed. note'- Opening the TRS-80 Expansior. In- 
teiface may void the Tandy limited 90-J.i^ 
warranty. 
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All that glitters is not gold 

OS-80 Bridging the TRS^SO* 
software compatibility gap 

Cmpatibiliiy between TRS-SO' Model I diskette* a.._ 
the new Mmlcl III is about as Bcnuinc as a goldpUteJ k-jj 

KtUgCTMIvJ. 

True. MiUti I TRSDOS' diskettes cati be rtad on a MoJcl 
III But fim [hev rmist he tuhvcrteJ und re-teccrdcd Iit 
M<viel III operation. 

And TOu cmmiA unie to a MiJcl I TRSDOS "diskctle. 
Not with a Miidei 111. You cannot s.U a file. Dilcic a tile Or 
in any way mnJitv a Model I TRSlXll? diskette with a MnJel 
111 contputei. 

Kurthetmore, mir conxctteJ TRSDOS diskettes tanmn 
K.<k.unvi:-ncd Kick (ot Model i operation. 

TRSIX)S !s a [ine-wav Mteei. And there's no rctteatine. 
A point til toiisidti \v(un switchinx the company's pavroll 
to Mmi new Mttdel 111. 

Real softmrc CompaiihlUiy should allow the dirtci. m.- 
medidK&ltachangeahilitv of MikIcI I and Mode! Ill diikct- 
tt*. No read-only liiniurinm. n.> niiiiersuiii/tc-reiiirdmii 
steps and no chance im he leli hiuh arid dry wh Mi-Jtl 111 
di>U-ncs thai cait'i be tun on j Model L 

WhiU'v the answer.' The answer is Percurr * OS-fi '"" 
famiU' til TRS-90 disk operanng nv>icms. 

OS-80 pnipums allow Jireci, im>nediiUeinleiLii:ineenh:.:i . 
oi Modcll and M,.JcI Ml diskcnes. 

Y.H) can nm Mi-di-l I sinek-dcnsiiy diskettes on a Model 
III. mstall Percoms plu((-in IX>UBLER« adaptci in your 
Model I. md you can tun diKiMe.dertslty Model illdidcettcs 
on a Model I 



t^ 



There's no conversion, no rc-recoidir^. 

Slip an OS-SO diskette out o( your ^lodcl I and insert 
directly in a Model Hi, 

And vice- vena. 

lust have (he correct OS-80 disk lUKnting system — 
OS-eO, OS-80n or OS-eO/m — in ea*«»niputef . 

Moreover, with OS-80 t^stems, you can add. delete, imd 
update fi les. You can read anJ u-nu diskettes regardless of the 
system of origin. 

OS-«0 IS the original Pctcom TRS-80 DOS Un BAMC 



proBramnien. 



n.'cn OS-SO utilities are wniten in BASIC. 

OS'80 it the PetCLini iv^itni dhout which a user wiute, in 
(Jrcarive CompurinE m^iKarine. ". . . the best $J0.00 you 
will ever spend. "t « 

Requirinf! onl v sei'cn Kbyte* of mcmoty, 05-80 disk oper- 
dimiisystetnsrcsidecofnpletely inRAM. There's no need to 
dedicate a dti\e eNclusively for a svsietn diskette. 

At»d, unlike TRSDOS. you i-un wurk at the track seciiu 
level, defining and ti^niroliing data lomun — in BASIL — 
to create simple or complex data stniciutes that execute 
more quickly than TRSDOS files. 

The Percom OS-8C DOS sup|yins iir^iilC'densit^ opera- 
tion of the Model I coitipmcr — price is $2^.95; ihe OS-90D 
supports double-density operation of Model I contpuicr» 
couipped with a LX^UBLER ot DOUBLER II; and. OS-SO' 
111 — (otthcMixIcllllotcoutw — supports both single- and 
duiihli-densitv operation. C>S-t*OD and OS-80'III each 
wll ior S49.95. 



PRICES ANDSPEC:iFICATIONS SLi RIECT TO CHANGE WITHOUT NOTICE. 



PRICES IXINOT INCLUDE HANDLING AND SHIPPING. 



PERCOM DATA COMFAMY inC. 211 ri. Kirby Street Qariand, Texas 75042 (214) 272-3421 ►-»» 

'^TrademarkciEVKDTnDataCunipany. liK. 'TRS-80mdTRSIX)S*MiTadeaHrtiotTandvCofperatMrti^lchhatnottbiiondiipiuIVfcaml^caCon^ ICmnvcOHnpuiinit Ma^Jiinc, June. i*»SO, piiie :^ 
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dressed to SO Microcomputing, Subscription 
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Language Quest '81 
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by G. Michael Vose 

You know there's some way to talk to a com- 
puter, but you're not sure what it is. Some- 
where there's got to be a computer that un- 
derstands you. Probably not, but don't worry 
—Vose provides a roadmap to the ways 
computers talk, and the languages they 
speak. 
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COBOL— Ready and Waiting 

by Robert L. Bradley 

COBOL is a computer language for businessmen, commonly 
used, and one of the few which have been standardized. It used to 
be available only on mainframes— now you can have it on your 
'80. 

Pilot— The Language of 

Computer Aided Instruction 122 

by Randy Hawkins 

Pilot is the language of computer aided Instruction, the language 
of students—simple, short, and infinitely patient. You can put 
Pilot in your '80; here's how, with suggestions for Its use. 
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News from Kitchen 
Table Software, Inc. 

by David Busch 

The debut of a new column from Kitchen 
Table Software describes the kind of utilities 
you only dream about. Get ready to giggle. 
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Microcomputers— Business or Pleasure 

by Bert Lata more 

80 examines the future of microcomputing in business. Ed Juge 
fences some Industry strategists whose opinions differ on growth 
and dollars in the next decade. You'll find out how three 
businessmen are defying the pessimists using their BO's in the of- 
fice today. 
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The August issue of 80 is our annual games issue. Wile away 
the summer with this 80 games sampler. Our roving journalist/ 
gamesman, Bert Latamore, shares some industry plans with you. 
In case the games prove too much for you (or your rpg character), 
there's a program that will help you generate a custom-designed 
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154 Modifying Tiny Pascal For Disk Don't mess witii cassette. Lt John B. Harrell 
202 Enhance Your Level II BASIC A travelogue. Gil Spencer 
243 Nag Analysis If you have a large fortune. Dave Crosby 



184 Lightning Strikes Twice Suppress those transients. Paul C. Fowler, Jr. 
254 Regression and Correlation Great math news. C. Brian Honness 
217 The Level II Black Box Random deviousness. Morris Jones 

102 A Macro Processor for BASIC— Part I The first of a philosophical series on a macro. 

J. Alan Olmstead 
112 Coming to Terms A short and sweet guide to what it is. Joe D. Fugate 
162 A First Look at Forth What you need to know to get hooked. John Krutch 
179 Getting Involved Would he do it again? Robert A. Batty 
294 A Quick Riff on Synthesizers What they did before the '80. 

Dave Keen and Dan Dischert 



171 The last CLOAD Fix If your seal Is broken. Walter L Stanley 

262 Recipe for Hard Copy If you don't have big bucks. Larry Keith 

289 The Real Rule of 78s Another loan formula. R. L Conhaim 

86 Lobo Connections Commander drives his disks hard. Jake Commander 

168 Tiny Pascal from Supersoft How it looks and what it does. Curtis H. Kyle 

236 Archbold's Mod I Speed-up Kit By an electronic weakling. Richard C. McGarvey 

0) 

199 Never Ready Add variety to your life. Ron Balewski 

296 Undocumented Instructions Register commands from the heights. Brian Cameron 

146 Join the Pascal Crusade Tiny Pascal explicated. Margaret M. Grothman 

271 

291 



How to Handle Those Random Files For random seekers. Ken Knecht 
To Err is. . .Forbidden— Part II A second installment. John D. Adams 
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226 Everyman's Mod II Word Processor A modified program. Mike Kilroy 

244 A BASIC Disassembler Machine code with BASIC. Frank Delfine 

259 The Variable Lister Tohelp with documentation and development. John L. Webster 

280 High Speed Data Tapes Machine code to speed up BASIC. Jim Glosser 
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FEATURES: 

11 Radio Shack compatibility 

2) Error free variable length records 

3) Full lower case detection and support 

4) Repealing keyboard with NO keybounce EVER 

5) Shift |0| typewriter keyboard option 

6) Execute only protection feature for BASIC programs 

7) Automatic track support for 35 Ihrougfi 80 track drives (mixed) 

8) Device i/0 handling with FORCE command 

9) Supports high speed clock modification (up to 4.0mtiz) 

10] Supports mixed mode (single & double density) automatically 

11) Allows disable-enable of break key 

12) Allows user to define step rate per drive and re-configure system disk 

13) Allows for efticienl use of double-headed drives 

14) Built in screen printer (shift [CLEAR]) with [BREAK] key abort 

15) Multiple command chaining i/*ith "DO" 

16) Built m memory lest with CLEAR command 

17) New printer driver which allows complete forms control and paging 

18) Automatic senal printer driver with optional auto linefeed 
19] Execute any OOS command from BASIC and return to BASIC 
20] Free space map ot diskette with optional output to printer 
21} Copy with variable length files 

22} Complete RS232 control from keyboard with status check 
23} Create and pre-allocate tiles from DOS 
24} Display current date and time from DOS 

25) l^ore information from Directory with optional printer output 

26) Enter DEBUG with shift [BREAK] to allow use of [BREAK] from BASIC 

27] New DISKOUMP/CMD sector display/modify program (works with filespecs) 
28] New DISKZAP/ClvID single/double density disk editor 

29) New BACKUP (more reliable, no more pack ID check) 

30) New FORMAT (more reliable, no need to bulk erase disk first) 

31) New MAP utility (maps out disk, showing where files are located) 

New DOSPLUS Z80 Extended Disk BASIC 

1) Faster loads and saves 

2) BASIC Reference utility (lines, variables, keywords, printer option} 

3) BASIC Renumber utility (renumber section of text, block text move) 

4) Shorthand features for almost ANY direct command (LOAD, SAVE, etc.) 

5) Shorthand features for editing (listing and editing with single key) 
6] CMD'M" instantly displays currently set variables 

7) Global search and replace in BASIC text 

8] Line printer TAB to 255 

5) OPEN"E" to end of sequential file (for output) 

10) D( (delete and insert text line) 

11) OLi (duplicate text line] 

12) ,R" & ■ ,V options after LOAD and RUN (tiles open & save variables) 
13] OPEN'D" allowed (Model II compatible) equal to OPEN"R" 

14) DOS commands from BASIC 

15] Automatic, error-free variable length records 

16} Single step execution with TRON (fabulous for debugging) 

17) CRUNCH [BASIC program compressor) 

18) New TBASIC (tiny BASIC} offers full BASIC commands 

19) TBASIC and DOSPLUS together only useSK of RAM (40K left in 48K TRS-80) 

***** 7 MORE UTILITIES ***** 

1} Single drive copy 

2) Restore (dead files) 

3) Purge (unwanted files] 

4) Clearfile (destroys data by writing zeros to file) 

5) Transfer (moves all user tiles from one disk to another) 

6) Spooler (allows pnnting of text while freeing up the CPU) 

7) Crunch (Basic program compressor} 
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DOSPLUS gives you more of what you buy an opera- 
ting system for. Speed and reliability without sacrificing 
simplicity and power. If you need extra power without 
extra wait, then you need DOSPLUS! 

Single or double density systems available for Model I. 
Model 1 1 1 DOSPLUS ready for immediate delivery. 

Perhaps the best investment you can make for your 
TRS-80 1 Listen to what others have had to say about 
DOSPLUS. 

"Overall, DOSPLUS is the fastest operating system 
I have seen..." 

Pete Carr in 80-US Journal. 

"DOSPLUS. ..the better mousetrap." 

Stewart Fason in 80-Microcomputing 

"On a scale of 1 to 10, 1 give DOSPLUS a solid 9." 

Reese Fowler in 80-Microcomputing 
(Model til DOSPLUS review) 

For the BASIC programmer, our features are un- 
matched. For the average businessman, our speed and 
simplicity cannot be beat. 

So, join the satisfied users who have joined DOSPLUS. 
Experience excellence! Experience DOSPLUS! 

DOSPLUS comes complete with full utilities, PLUS 
a FREE patch to enable Model I Scripsit/Super 
Script to run on Model III , UNLIMITED Backups! 
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Model! DOSPLUS - 
Model III DOSPLUS — '99" { 

Model I double density upgrade— *175" 
Master Directory 1.2 (double density)— *29^ 



New I/O package 30% faster 

No BREAK key death from DOS 

No closing killed liles and ruining diskettes 



STEP ON THOSE 

DOS BUGS!! 
ORDER TODAY!! 




Specializing in the Tandy Line 




(305) 983-3390 



5846 Funston Street 
Hollywood, FL 33023 



CALL TOLL FREE FOR FAST SERVICE 

(800) 824-7888, OPERATOR 193 

FOR VISA/MASTERCHARGE/C.O.D. ORDERS 

California dial (800| 852-7777. Operator 1 93 
Alaska and Hawan dial (800) 824-7919, Operalor 193 
TOLL FREE LINESWILL ACCEPT ORDERS ONLY! 

For Applications and Technical information, call 
1305) 983-3390 or drop us a card 



Dealers mqumes invited 



go REMARKS 

%^^^ bv Wavnfi Green 



by Wayne Green 



"We need a flexible language 
mated to that tiardware. . . 
without (it), software 
development moves very slowly." 



Where Are The 
Business Programs? 

I'm constantly running into people who 
have written a program to help with 
some business chore, but who have never 
thought about brushing it up for publica- 
tion. Ye!, it could be exactly what new- 
comers to computers are looking for. Use- 
ful business programs don't end with ac- 
counting and word processing. These are 
important programs, but in the long run 
every business needs specific applica- 
tions software. Schools need programs to 
keep track of students, grades and sched- 
ules. Cities and towns need software to 
keep track of residents, voting lists, prop- 
erty evaluations, taxes and licenses- 
hunting, fishing and driving. 

With this huge need for software, why 
are there so few programs available for 
business use in computer stores? The 
answer is complex. 

Three fundamental items are needed 
before we can produce sophisticated bus- 
iness software. First we need a reason- 
ably good hardware system, sold in 
enough quantity to support software de- 
velopment, and which will be around for a 
while. We have that in the TRS-80. 

Next we need a flexible language mated 
to that hardware: we have this in f^flicro- 
soft BASIC. Without a high level lan- 
guage, software development moves very 
slowly. 

Finally, we need a good disk operating 
system. We have had our best DOS sys- 
tems for the TRS-80 for only about a year. 
I'm talking particularly ot NEWDOS + and 
DOSPLUS. Thus, in practical terms, pro- 
grammers have had the tools they need 
for only about a year. Since complicated 
programs can take weeks or even months 
to write, and far longer to debug, is it any 
wonder we are just now beginning to see 
some really first rale business programs 
emerging? 

Further, there is the major problem of 
Radio Shack being uncooperative with 
outside suppliers of products for the 
TRS*80. If you try to deal with Radio Shack 
you need a barrage of lawyers and an ex- 
tremely sharp business manager. And, 



even if you've written a good program, it 
can take them years to make a decision. 

If you decide to go to an independent 
publisher, you still have to watch your 
step; too few have a reputation for being 
honest with programmers. Fewer still 
have the distribution faciitties necessary 
to see that your program is advertised 
properly and distributed to enough com- 
puter stores to earn you significant royal- 
ties. 

One answer is the large-scale program 
publishing house. ..such as Instant Soft- 
ware. Yes, I'm biased— Instant Software 
is a division of Wayne Green, Inc. Keep 
that in mind as you read the following. 

The Marketplace 

A couple of years ago I sensed the im- 
portance of business programs as a way 



^'With this huge need 

for software, why 

are there so few 

programs available. , '^" 



to help computer stores sell systems. Yet, 
the Instant Software group has not been 
able to publish anywhere near the number 
of business programs they would like to. 
However, the number of good business 
programs submitted has been increasing 
in recent weeks. 

Now, to put in a word for Instant Soft- 
ware. It does take quite a while to get a 
program published there, but this is im- 
portant to you. Customers and dealers 
alike have been ripped off by poor quality 
software; Instant Software takes the time 
to carefully evaluate every submission. 
From over 10,000 programs submitted for 
publication during the last three years, on- 
ly about 1,000 have been okayed for pro- 
duction. 

If you don't have the experience in 



some business field to write the needed 
programs, get together with someone 
who does. Not only will specialized appli- 
cations programs sell well, in many cases 
they can bring about an equipment sale, I 
believe that the more good programs we 
have, the more computers will be sold. 

For this reason it's unfortunate that Ra- 
dio Shack has been so reluctant to coop- 
erate with program publishers. Instant 
Software has been trying to distribute pro- 
grams through Radio Shack stores for 
over two years without success. I feei that 
they have everything to win and little to 
lose by stocking more programs m their 
stores. Radio Shacks philosophy is to sell 
only high volume programs. That mer- 
chandising philosophy prohibits their 
even considering handling slower selling 
but specialized programs. Pily, , .and an 
opportunity for some other firm to meet 
the needs of the market. 

Instant Software has had considerable 
success reaching the Radio Shack fran- 
chise stores and these store owners tell 
us repeatedly that our programs are a key 
to many of their sales. 

Instant Software plans to maintain a 
libfary ot several thousand programs. For 
now, most will be sold through computer 
stores, but with technology evolving the 
time may come when it will no longer be 
necessary for a store to carry an inventory 
ot programs. We may eventually be able to 
load them via telephone or even by satel- 
lite. 

By the way. Instant Softwares looking 
for more sales reps for several areas of the 
country, to handle software, books, maga- 
zines, and even some advertising sales. If 
you have sales experience and are inter- 
ested in working with a fast growing firm, 
let me know. a 

What To Do 

After you've written your business pro- 
gram, debug it. Then, do the best you can 
writing documentation. Put as much of 
the documentation as possible into the 
program, so people like me who hate to 
read instructions will be able to blunder 
through it with ease. Then, submit it to a 
top-notch software publisher of your 
choice. ■ 



80 Microcomputing, July 1981 • 7 



INSIDE go 

by Ed Juge, director of 

computer merchandising, Tandy Radio Shack 



"We're aware of the difficulty 

some of you have had in getting 

through. . . weVe recently 

expanded the staff. . . " 



This month completes my first full year 
of Inside 80. It's been fun, and I'm 
tfiankful every month hasn't been quite 
like this one. I'm writing this in early May, 
a time when bad weather is traditional in 
Texas. Anyway, I had left this writing for 
the weekend. Friday night high winds, 
rain, and hail hit the Fort Worth/Dallas 
area.Ourelectricity went off at 11 p.m. Fri- 
day, and remained off for just over 20 
hours. Needless to say, Scripsit and I 
didn't get together. 

Finally, I was able to get started. I 
cranked out Inside 80, and was about to 
repaginate and print it, so I could get on 
with some other homework. During repag- 
ination, I got a disk I/O error, and was 
never able to recover any of the text. For- 
tunately, my Scripsit disks are all backed 
up periodically, so that one file was all 
that was lost. 
Pocket Computer News 

This month, we're introducing an ex- 
citing add-on for the TRS-80 Pocket Com- 
puter — a printer with built-in cassette in- 
terface! It uses plain paper one and three 
fourths inches wide, and a cartridge rib- 
bon. It prints 16 characters per line, at 60 
lines per minute, and it responds to Print 
and List commands, when the print switch 
is on. Power comes from built-in recharge- 
able batteries, with a charger included. 



"... in early May. . . bad 
weather is traditional 

in Texas. . . .high winds, 
rain and hail hit. . . " 



You'll get about 8,000 lines of printing on a 
single battery charge! Also, so you won't 
have to carry so many pieces along with 
you, the printer also contains a cassette 
interface. It's the most often requested 
item to go with the Pocket Computer, and 



it's available now for only $149. 

You're probably thinking that if you 
knew about the printer while the Pocket 
Computer sale was on in May, you'd have 
bought one. Well, don't worry. We've an- 
nounced a new low everyday price on the 
pocket computer, $229. Now you can en- 
joy a complete system at a good price. 

During the coming months, I'll have 
some news for Color Computer and Model 
II owners. At this point, I hesitate to hint 
what it might be, because of the chastis- 
ing mail 1 get talking about products 
before you can actually buy them. 

I would like to encourage your com- 
ments on what subjects you'd like me to 
cover in this column. Would you like to 
hear about new products. In-depth prod- 
uct information, bugs and fixes, insight in- 
to our thinking and actions, or, . . .? Let 
me hear from you! 

Computer Services (Hot Line) Expanded 

Routine questions are being answered 
by our Computer Services group. Frankly, 
the merchandising team is too limited to 
be able to reply to those kind of questions 
and still bring you products. 

We're aware of the difficulty some of 
you have had in getting through to our 
Computer Services group. In an effort to 
relieve the problem, we've recently ex- 
panded the staff from 32 to about 45 peo- 
ple. Since the first of the year, we've also 
added another 15 WATS lines, bringing 
the total to 41. 

There have also been many requests for 
specific telephone numbers for business 
software questions. They are: 

Model I/Ill 

Business Software 1-800-433-5641 

In Texas 1-800-772-5973 

Model II 

Business Software 1-800-433-5640 

In Texas 1-800-772-5972 

All other calls 1-800-433-1679 

In Texas 1-800-772-5914 

The new Business Software numbers 
are set up to beanswereddirectly by a ser- 
vice representative, not by a receptionist. 
Those folks are specialists, and probably 
won't be able to answer any questions not 
related to their specific responsibilities, 



so don't just keep trying numbers un- 
til you get an answer. Call the proper 
number. 

To get information to you quicker. Com- 
puter Services asks that you have the 
following information on hand when you 
place the call; 

1) Your name 

2} Your phone number 

3) What TRS-80 computer system you're 
using, and the number of disk drives, 
etc. 

4) The name and catalog number of the 
software package you're using and the 
version number of the software if you 
Know it. 

5) What error codes you've received. 

6) How the error occurred, and the func- 
tion you were executing when it oc- 
curred. 

7) Information about any patches or 
program corrections you may have 
made. 

If you have this information for us the 
whole system should function much more 
effectively- I'd also like to recommend that 
when the phone is answered, you ask who 
you're talking to. Write the name down, so 
you can refer back to the same person 
later, if you need to. 



Software Progress 

You might be interested to know that 
during March and April we began shipping 
16 new software packages, and released 
11 more, most of which will be shipped in 
May, (Color Computer ROM packs take 
much longer, of course). Among them 
were a couple of educational packages 
for the Models I and III; our long-waited 
Medical Office System for 48K, four-drive 
Mod I/Ill; our first three-disk Model II ac- 
counting package including Accounts Re- 
ceivable, and the Model II Mailing List II 
which interacts with Profile to produce 
personalized form letters. We've also 
shipped a program called Reformatter, 
which allows the Model 11 with at least two 
drives and 64K RAM to transfer files be- 
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PLAIN JANETM 

DISKETTES 

$19^^ 

BOX OF 10 
SS, SS, 5V4" 



DISKETTE 

FILE BOX 

J2295 

HOLDS 50-60 
51/4" DISKS 



YOUR 
ROAD TO 
VALUE 
IS. . . 



DISK DRIVE 

EXTENDER' 
CABLE 

$995 

FOR VISTA, MTI, 

^PERTEC. PERCOM 

& OTHERS 



EPSON 

MX-70 
& MX-80 

-PRINTERS- 
CALL FOR 
PRICE 



JULY 
SPECIALS! 



CABLE 
J2495 

CONNECTS EPSON 

.PRINTER &TRS-80 

MICRO 



(mSetatronics 

^m/ corporation .,a2 

TO ORDER 

CALL TOLL FREE 1-800-321 -9390 

IN OHIO, call (216) 289-1210 (COLLECT) 



"OTHER 
MYSTERIES" 

VOLUMES I & II 

95 



RETAIL STORE 

22297 EUCLID AVENUE 

EUCLID, OHIO 44117 

(EAST 222nd & EUCLID AVE.) 



OFFICES 

26111 BRUSH AVENUE 

EUCLID, OHIO 44132 

(SEND MAIL ORDERS HERE) 



$39 



SAVE 
$12.50 



TRISTAR 

FLOPPY 
SAVER™ 

HUB RING KIT 
95 



$8 



FOR5V4" 
DISKS 



VISA 




TRS-80 is a trademark ot the 
Radio Shack Division of Tandy 
Corporation. PLAIN JANE is a 
Trademark of Meta Technologies 
Corporation. 



PRICES IN EFFECT 

July 1, 1981 THRU 

July 31, 1981 

Prices, Specifications, 

and Offerings subject to change 

without notice. 



• Add S3. 00 tot shipping & handling. 
.$3.00 EXTRA for C.O.D. 

• Ohio residents add 6V2% sales 
tax. 



MOST ORDERS 

SHIPPED WITHIN 

ONE BUSINESS DAY 



1981 by Melatronlcs Corp 
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"If you set a transistor radio 

near the keyboard, an astonishing 

range of sound effects may be 

heard. . . from train whisties to birdcaiis." 



Paper Tiger Graphics 

Bob Boothe's "Advanced Graphics 
Techniques— Pari 2" (May, 1981) is a qual- 
ity article that makes 80 Microcomputing 
many times worth its cover price, 

A few simple changes to the assembly 
language program make it compatible 
with the IDS Paper Tiger. Since the Paper 
Tiger looks only for the six least signifi- 
cant bits (0—5), each byte of the storage 
area should never contain a value higher 
than 63. This means more memory is re- 
quired and more lines are needed to get a 
complete printout. 

What young Mr. Boothe has given us are 
true hi-res vector graphics. Many plotter 
routines may be simply converted to the 
indicated format. The printouts obtained 
are something that will show those skep- 
tics just what your TRS-80 can do! 

One note: If you set a transistor radio 
near the keyboard, an astonishing range 
of sound effects may be heard as the pro- 
gram runs— everything from train whis- 
tles to bird calls! 

I anxiously await Part 3 of the series. 
Dan Rollins 
Azusa, CA 
Micronet: 70250,631 

Computing Misfit 

Though "A Field Guide to Computer- 
ists"(May, 1981) wasa tunny and interest- 
ing article, I feel it brought up one problem 
about the image of a kid in computers. I 
am 14, and have been programming for a 
little morethan two years. Besides myself, 
nobody in my family knows anything 
about computers, so most of what I know 
came from experimenting and many ac- 
cidental and non-accidental discoveries. 
In my two years. I have learned BASIC and 
assembly language. I recently sold pro- 
grams to CLOAD magazine. I've mastered 
S-80 sound. I can make sound effects 
superior to all the sound I've heard in the 
past. I'd discovered text strings long 
beforethemany articles about them came 
out. I know a hundred POKEs and other 
tricks or my S-80 that have it doing some 



interesting things. I've even found a high 
resolution graphics trick for a 384x192 
display, through software and no hard- 
ware Some call mea Whiz Kid on comput- 
ers. 

Only one problem: I don't wear plaid 
pants and shirt, as "A Field Guide To 
Computerists" suggests, I wear Levi's 
and an OP shirt. I don't have a "plastic 
shirt pocket protector containing an inor- 
dinate amount of pencils." And my TI-30 
calculator stays home, rather than with 
me in a leather calculator pouch, I quote 
from the article, "Don't try to find the whiz 
kid at sporting events, or at discos; try the 
local computer store or library instead." 
Well, I happen to love watching basketball 
and football, and even more, I like to play 
them. I play tennis all the time. True, I 
won't be found at a disco, because you 
know what they say, "Disco is dead, but 
rock is rolling." Rock is much better than 
disco. On occasion, I do stop by a com- 
puter store to buy something, but you'd be 
wasting your time looking for me there, 
because I'm usually not. I hate reading, 
except of course reading 80 Microcom- 
puting- 

So t don't fit the image of a Whiz Kid. 
And I'm sure that there are other kids who 
don't, but are quick on the computer. By 
this stereotype, we can't be Whiz Kids, Do 
I have to dress differently, act differently, 
and think differently before I can become 
a Whiz Kid? 

Ron Goodman 
North Hollywood. CA 

Micro 'Master Teachers' 

I read with interest 80 Remarks in the 
May edition of 80 Microcomputing. As an 
educator and computer hobbyist I agree 
that the microcomputer may be one of the 
most important innovations happening in 
today's education environment. However, 
before the microcomputer is accepted by 
the better teachers and administrators, I 
see a great need for the makers of the pro- 
grams to involve the "master teachers" in 
subject/content aid. I see too many good 
programs (from a computer program 
sense) with poor educational methodolo- 



gy. As the computer industry starts mak- 
ing programs for the more subjective cur- 
riculum (history, political science, lan- 
guage arts), you must begin to recruit 
some non-computer "master teachers" to 
aid the cause!! 

Brian James, Media Specialist 

Winston Churchill High School 

Eugene, OR 

Descending Sort Program 

Once again Mr. Barden has come to my 
rescue with his assembly language bub- 
ble sort in the April, 1981, issue. Please 
keep up the good work. 

Some readers might be interested to 
know that changing one particular byte of 
the sort program can cause it to sort in a 
descending rather than an ascending 
order. 

To implement the change, replace loca- 
tion 7F52 with F2; originally it was FA, 

Peter Gibbs 

University of the West Indies 

Bridgetown, Barbados 

Erase First 

I purchased a Percom TFD-100 disk 
drive for my TRS-80 in July, 1980. One of 
the reasons I purchased this particular 
drive was because of the claim that the 
drive would read and write to both sides of 
a diskette, thus increasing potential 
storage to 204K for a diskette. 

I have never had any problems with the 
drive since it arrived, except for one small 
glitch: 1 couldn't get the drive to write to 
Side B of a diskette! I tried nearly every- 
thing I could think of to get that drive to 
write to Side B, but it totally refused, Final- 
ly, after fiddling with this for quite awhile, I 
simply put the matter out of my mind, fig- 
uring it would come to me someday. 

One afternoon I committed the cardinal 
disk drive sin: I shut off the drive with a 
disk in it. I zipped up to Radio Shack and 
purchased a bulk eraser, came back home 
and erased the disk, front and back, I put 

Continued to page 14 
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1001 



333 pages 



META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 

CALL TOLL FREE 1-800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



3^20 



THINGS TO 



BT MARK SAWUSCH 



$7.95 



333 pages, written in simple terms, of 
"what-to-do" and "how-to-do-it". Suitable 
not only for microcomputers, but for pro- 
grammable calculators as well. Includes 
program listings, formulas, a glossary of 
computer terms and more! Definitely a 
MUST BUY! 

A PARTIAL LIST OF APPLICATIONS 
Real Estate Evaluation Test Vour Typing Speed 



Astrology 
ncome Tax 
Speed Reading 
Personality Test 
Statistical Analysis 
Logic Circurt Analysis 
Carpenter and Mechanics Helper 
General Purpose Cloch Timer 



Finances & Investments 

Borythm 

Energy Efficiency 

Antenna Design 

Letter Writing 

Recipe Index, Calcdlator 



"OTHER MYSTERIES" 
VOLUME III 

by Dennis Kitsz 

Call now and place your order for this new 
book. THE CUSTOM TRS-SO™ & OTHER 
MYSTERIES", from IJG, Inc. More than 
300 pages, with over 60 photographs, of 
projects for the hardware hobbyist. In- 
cludes schematics, PC layouts, software 
driver code, etc. for such do-it-yourself 
undertakings as high resolution graphics, 
reverse video, real-time clock/calender, 
music synthesis, ROM/RAM additions and 
more! 

THE CUSTOM TRS-80™ $29.00 

CALL FOR AVAILABILITY 



MICROPARAPHERNALIA 

NEWDOS by APPARAT 

NEWDOS/80 by Apparat $149.95 

NEWDOS + to 

NEWDOS/80 UPGRADE CALL 

NEWDOS + with ALL UTILITIES 

35-track $69.95 

40-track $79.95 

BOOKS 

TRS-SOTM DISK 

AND OTHER MYSTERIES . . $19.95 
MtCROSOFFM BASIC DECODED $29.95 



Let your TRS-80™ Teach You 

ASSEMBLY 
LANGUAGE 

REMSOFT's unique package, "INTRODUCTION 
TO TRS-80- ASSEMBLY PROG RAf^if MING" in- 
cludes ten 45-minute lessons on audio cassettes, a 
display program for each lesson providing illustra- 
tion & reinforcement, and a text book on TRS-SO' 
Assembly Language Programming. Includes use- 
ful routines to access keyboard, video, printer and 
ROM. Requires 16K ■ Level il. Model I. 

REMASSEM-1 $69.95 

FOR DISK SYSTEMS $74.95 



Let Your TRS-80'' Teach You 

ASSEMBLY LANGUAGE 
DISK I/O TECHNIQUES 

REMSOFT does [t again! REMDISK-1 is a concise, 
capsulated supplement to REMA5SEM-1. Package 
consists of two 45-minute lessons on audio casset- 
tes, and display programs providing illustration 
and reinforcement Provides specific tracit and 
sector I/O techniques, and sequential and random 
file access methods and routines. 

REMDISK-1 $29.95 



Let Your TRS-80™ Test Itself With 

THE FLOPPY DOCTOR & 
MEMORY DIAGNOSTIC 



by THE MICRO CLINIC 

A complete checl^up tor your Model I. THE 
FLOPPY DOCTOR completely checks every sec- 
tor of 35- or 40-track disk drives Tests motor 
speed, head positioning, controller functions, 
status bits and provides complete error logging. 
THE MEMORY DIAGNOSTiC ciiecks for proper 
write.'read. refresh, executability and exclusivity 
of all address locations Includes both 
diagnostics and complete instruction manual. 
SYSTEM DIAGNOSTICS $19.95 

An improved version of the SYSTEM 
DIAGNOSTICS above. Designed for single 
or double density, 35-. 40-, 77-, or 80- 
track disk drives. Includes new and 
modified tests. Features THE FLOPPY 
DOCTOR, Version 3.0 

SYSTEM DIAGN0STICS-V3, . $24.95 



Single Sided. Soft Sectored 5' a inch, 
(for TRS-SO^*^) Mini-floppy 

DISKETTES 



$21 



95 



box of 10 



PLAIN JANE™ 

These are factory fresh, absolutely first 
quality (no seconds! ) mini-floppies- They are 
complete with envelopes, labels and write- 
protect tabs in a shrink-wrapped box. 

PLAIN JANETM Diskettes $21.95 

10 boxes of 10 (each box)$21 .50 

PUINJANE™ ^<,/€/ 

Introducing MTC's premium generic 
diskette. Single Sided, Soft Sectored, 
DOUBLE DENSITY, SW-inch diskettes with 
reinforcing HUB-RINGS. Individually 100% 
ERROR-FREE certified, Invest in GOLD! 
PLAIN JANETM '.^^V,/ $25.95 

VERBATIM'S PREMIUM DISKETTES 

DATALIFE" 

Seven data-shielding Improvements mean 
greater durability and longer data life. 
These individually, 100% error free cer- 
tified diskettes feature thicker oxide 
coating, longer-lasting lubricant, improved 
liner, superior polishing and more! Meets 
or exceeds IBM, Shugart, ANSI. ECMA 
and ISO standards. 
VERBATIM DATALIFE™ DISKETTES 
5- 1 inch (box of 10) 

MD52501 $26.95 

10 boxes of 10 (each box)$25.95 

8-inch FLOPPIES 

Double Density, FD34 8000 .$43.95 



'RINGS' & 
THINGS 

HUB RING KIT for 5' /' disks SIC 95 

HUB RING KIT tor 8' disks 512.95 

REFILLS(5a Hub Rings) $ 5.95 

CLEANING KIT for 5' 4" drives 524.95 

5'/.-inch diskette case $3.50 

8-inch diskette case $3,95 

5 1/4-inch File Box for 
50 diskettes $24.95 

8 inch File Box for 
50 diskettes $29.95 



TRS-80 is 3 tratJemark ot the 

Radio Shack Division ol Tandy 

Corporation DATALIFE is a 

trademark of VERBATIM. PLAIN 

JANE, AIDS r, AIDS-lil, CALCS-III, 

CALCSIV. MERGE-IN are 

trademarks ol MTC. 

Cq 1981 b^ M eta tech no logics 

Corporation, Inc. 



MOST ORDERS 

SHIPPED WITHIN 
ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged. 



PRICES IN EFFECT 
July 1, 1981 THRU 

July 31, 1981 

Prices, Specifications, 

and Offerings subject to 

change without notice. 

8107 



WE ACCEPT 

■ VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 
•COD 



•Add S3.00for shipping 

& handling 
• $3.00 EXTRA for C O.D. 
•Ohto reskJents add 6'-!% 

sales tax. 
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With reference to the inquiry form A. 
E. Kazee in your May issue, about 
CRTs made by Clinton Manufacturing 
The company is Clinton Electronics 
Corp., 6701 Clinton Rd., Rockford, IL 
61111, telephone (815) 633-1444, They 
have a sales office In Vista, CA, at 1764 
Kent Place, telephone (714) 758-3160. 

A12-inch Clinton CRT designed for a 
Motorola monitor is available, new 
with documentation, tor $38.97 from 
Technical Electronics, P.O Box 2361, 
Woburn, MA 01888, telephone (617) 
935-7328. This is Clinton Part No. 
CE394 — M12P39TE15, with 90 ■" deflec- 
tion and a 7-pin octal base. I do not 
know If this is a replacement for the 
Radio Shack CRT, nor the color of the 
phosphor. 

G. F, McClure 

1730 Shiloh Lane 

Winter Parlf. FL 32789 

Low-cost 
Component Interface 

I Just discovered Mr. Mike Bloom's 
letter in your February issue. I am 
faced with the very same problem: I 
use a Model I, Level II, 48K, and a MIN 
printer. I used it for some time in 110 
bauds, then discovered how to get 
something reliable at 300 bauds, but it 
is still very slow 

Where and how could I buy the two- 
component interface for less than $75? 
Marie-Claude Weber 
23 Rue P. Brossolette 
F 93500 
Pantm. France 



Eliminate Memory Waste 

Like Joe Brandiner [April 1981), I use 
a BASIC software driver to operate my 

printer. However, I rarely have any 
reason to print lowercase material 
other than from Scripsit. I did notice 
that the program bombed the one time 



I tried, but 1 didn't make the connection 
until I read Joe's letter. 

My printer is a Dynatyper from Ro- 
chester Data. It Is a little slow, but it 
gives excellent copy on an electric of- 
fice typewriter. It uses BASIC to POKE 
a driver program into high memory 
when I want to use the LLIST or 
LPRINT commands. Since my system 
has 48K, I reserve memory at 65280 
before POKEing the 256-byte program. 

Sure enough, ULCBAS destroys the 
driver program. After rebooting, I tried 
answering the memory size question 
with 28672, which is the starting ad- 
dress for ULCBAS. Everything worked 
fine, but this approach is grossly 
wasteful of memory. 

With the data from page 4 of the 
ULCBAS booklet, I rebooted the sys- 
tem and answered the memory size 
question with 64500 (an easy number 
to remember). From available data, It 
appeared thai I needed only 815 bytes. 
By changing one number in my driver 
program, I relocated it between 64511 
and 64743, leaving 729 bytes for 
ULCBAS. This is still wasteful of mem- 
ory, but it made changing the driver 
program easier: 150 P = 4'(P -t- 16) - 1 
to P = 4-(P-i-16)-4. 

Finally, I used a PEEK/LPRINT pro- 
gram to obtain a copy of the combined 
programs. The ULCBAS program was 
relocated just below the protected 
memory. The driver program was easi- 
ly Identified just above protected mem- 
ory, followed by a new program that 
has little resemblance to the original 
ULCBAS program. I'm not sure I under- 
stand what happened, but it works, 
and I hope it will solve Joe's problem. 

Now maybe someone can solve my 
problem. I have some machine lan- 
guage programs, including In-Memory 
information, that give a "printer not 
ready" message, since I am using a 
non-standard printer connected to the 
TRS-80 bus. I would like to know how to 
defeat these printer signals or alter the 
programs. 

Scoff Smith 

2919 26th Ave. Wesi 

Seattle. WA 98199 



Tab Solution 



I have noted many people trying to 
find solutions to the LPRINTTAB(63 -t- ) 
problem. The solution that I received 
from Fort Worth over two years ago 
{and forgotten by them) is the follow- 
ing: 

STHINGtiT Pf:EKil6539),32i 
T = tab selling 

Sample; LPHINTSTRINGS(4Q - PEEK(16539l.32l 
■40"'.STRINGS(80 PEEK)1 6531,32)' 100" 

All items tabbed as above will ap- 
pear in the same column. 1 even used it 
to tab to 162 with an IBM Selectric. I 
use this for all my programs and have 
had no trouble at all. 

Lou Wiener 

20776 W Plum Cyn. Road 

Saugus. CA 91350 



English Aid 



I am interested in software applica- 
tions in Life Insurance, Training Man- 
agement Games and Computer Assist- 
ed Training. I would appreciate any in- 
formation anyone has on programs, re- 
search, or contacts from the United 
States with similar interests. 

A. E. Shell 

Refuge Assurance 

Oxford St. 

Manchester, M60 7HA 

England 



Hi-Res Grapiiics Games 

I'm looking for hi-res graphical 
games for the TRS-80 Level II 16K.They 
could be run on the following products: 
Percom's Electric Crayon, Program- 
ma's 80-Grafix Board, and E/RAM. 

Percom's Electric Crayon gives you 
hi-res graphics using a 256 x 192 pixel 

Continued to page 18 
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META TECHNOLOGIES 

26111 Brush Avenue, Euclid Ohio 44132 

CALL TOLL FREE 1.800-321-3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



MTCAIDS- 



^20 



MODEL I . . $69.95 



MODEL II , . $99.95 



Introducing the latest addition to MTC's family ot data management systems AIDS-III NO 
PROGRAMMING, easy to use COMPLETF PACKAGE including demonstration application 
documental on and MAPS III isee below) 

• Up to 20 USER DtFINED FIELDS ol either numeric- or character-type. 

• CHARACTER type fields may be any length (total up to 254 characters}. 

• NUMERIC type delds feature automatic formatting, rounding, decimal alignment and 

validation 

• Full feature EDITING when adding or changing records: 

tNTFR FIELD (can't type in more cttaracters than specifiedt 

BACKSPACE Idelete last character tyoedi RIGHT-JUSTIFY FIELD contents 

DELETE FIELD contents -SKIP FIELD (to next or previous field) 

RESTORE FIELD contents ■ SKIP RECORD {to next or previous record) 

• SORTING of records is MACHINE CODE assisted 

200 RECORDS (40 characters) in about 5 SECONDS. 

ANY COMBINATION of fields (including numerics} with each field m ascending or 
descending order 

• SELECTION of records for Loading, Updating, Deleting, Printing and Saving is 
MACHINE CODE assisted ^ 

Specify up to 4 CRITERIA, each using one of 6 RELATIONAL COMPARISONS 

LOAD or SAVE selected records using MULTIPLE FILES 
- Example Select records representing those people who live in tfie state of Col- 
orado, but not in the city of Denver, whose last names begin with "F " 
and whose incomes exceed $9000,00. 

Example Select records representing those sales made to XYZ COMPANY that 
exceed $25 00, between ttie dates 03 15 and 04 10 

MAPS III (MTCAIDS PRINT SUBSYSTEM I, included at no charge, has the following features 

• Full AIDS-III SELECTION capabilities 

• Prints user specified fields DOWN THE PAGE 

• Prints user specified fields in titled, columnar REPORT FORMAT, automatically 
generating column headings, paging and (optionally) indentation 

• Can create d single report from MULTIPLE FILES. 

• Prints user detmed formats for CUSTOM LABELS, custom forms, etc 

BELOW ARE TESTIMONIALS from owners of AIDS systems These are atjsolutely authentic 
statements and are typical of the comments we receive 

"This program will do more for my business than all the other programs I 
have, combined," 

David Wareham, Vice President (EDP), National Hospital and Health Care Services Inc 
"We have 32 different Data Base Management packages for the TRS-80 AIDS-III is easily 
the best It also makes it easier tor us to step up to our Mode! II since the package is 
available for both computers." 

Jack Bilinski, President, 80 Microcomputer Services 

"Your AIDS program is far and away the finest information management system that I've 

ever seen I am currently using it to maintain a clear picture ot the demographic data on all 
the kids in our residential treatment program and it is working for me superbly." 

Frank Boehm, Director, Front Door Residential Treatm ent Program 

MTC AIDS CALCULATION SUBSYSTEM I 



MODEL I . . .$24.95 

MTC's most popular AIDS subsystem. Use 
for report generation involving basic 
manipulation of numeric data. Features are: 

• User specified page title 

• Columnar Headings 

• Optional Indentation 

• Use for accounting, inventory, financial 
and other numeric-based information 
systems. 



MODEL II . . .$39.95 

Columnar subtotals generated when 
there is a change in a user- specified 
column. 

User specified Columnar Totals 
Columnar values computed using con- 
stants and/or column values 
Balance forward calculations (Ex: Gross 
sates equals previous gross sales + sale 
amount + sales tax). 



Compare AIDS-lir''/CALCS-lir" with any other data management package under $100! 



CALCSIII 



w 



TRS 80 is a trademark ot the 

Radio Shack Division of Tandy 

Corpofalion. DATALIFE is a 

Irademark ot VERBATIM. PLAIN 

JANE, AIDS-l, AIDSIII, CALCSIII 

CALCS-IV, MERGE III are 

trademarks of MTC 

■■i 1981 by Metatectinologies 

Corporation. Inc. 



REQUIRES THE PURCH AS^^ID^ir 

^ PRICES IN EFFECT ^ 

July 1, 1981 THRU 

July 31, 1981 

Prk:es, Specifications, 
and Offerings subject to 



AIDS OWNERS! 

WE HAVE WHAT 

YOU'VE BEEN 

WAITING IV. . . 

MTC CALCS-IV^", that is. 

• More Computations 

• Save Report Formats on Disk 

• Faster, and more! 

MTC CALCSIVTM $39.95 

For Model II $59.95 

CALL FOR CALCS-lll 
UPGRADE PRICING 



MTC AIDS MERGE-Hr'' 

This subsystem will combine up to 14 AIDS 
created data tiles into a single, large file. An op- 
tional purge capability removes duplicate entries 
while perlorming the merge operation (can even 
be used to eliminate duplicates in a single tile) 
Machine code assisted for high speed perfor 
mance. MERGE-lltTM properly handles tiles sorted 
by any combination ot fields, including numerics 
with each (ield in ascending or descending order. 

MTC AIDS MERGE-III™ S19.96 

For Model II S29.95 



MICROPA RA PHERNA LI A 

DISKETTES (box of ten) 

5U" PLAIN JANE"^" $21.95 

5'*" PLAIN JANETM '/,^,/r/ $25.95 

5W DATALIFETM MD 525-01 . . $26,95 
8" DATALIFETM FD34-8000 ... $43.95 

NEWDOS by APPARAT 

NEWDOS/BObyApparat $149.95 

NEWDOS ( to 

NEWDOS/80 UPGRADE CALL 

NEWDOS + with ALL UTILITIES 

35-track $69.95 

40-track $79.95 

BOOKS 

TRS-80™ DISK 

AND OTHER MYSTERIES. $19.95 
microsoft™ BASIC DECODED $29.95 
1001 THINGS TO DO WITH YOUR 

PERSONAL COMPUTER ..,$ 7 95 



MORE 

PRODUCTS 



MOST ORDERS 

SHIPPED WITHIN 
ONE BUSINESS DAY 



Products damaged in 
transit will be exchanged. 



dk 



change without notice. 

8107 



WE ACCEPT 

• VISA 

. MASTER CHARGE 

• CHECKS 

. MONEY ORDERS 
•COD 



■Add S3, 00 for shipping 

& handling 

•13.00 EXTRA for CO, D, 
' Ohio residents add 6'/; % 

sales tax. 



^0 INPUT 



the disk back in the drive, reformatted it, 
and, pureiy by chance, puiied it out, flipped 
it over, and tried to format Side B. imagine 
my utter astonishment when it worked! 

I immediately took a blank, never- 
before-used disk and erased both sides 
and formatted it. Again, it worked. Since 
that day, I have always first erased the 
new diskette, and i have never had an 
ounce of troubie reading or writing lo both 
Side A and Side B. 

I'm happy lo report that I'm finaliy get- 
ting my 204K's worth of storage. 

Michael K. Salsgiver 
Portland, OR 



RSM-2 for Model III 



This short note may be of interest to 
new Model lit owners who have Model I ex- 
perience. I, as manv others, have found 
that Smali System Software's RSM-2 mon- 
itor is a very valuable tool for debugging 
and otherwise studying software prob- 
lems. Small System Software is working 
on a version for the Model 111, but the re- 
lease date IS unknown. However, a cas- 
sette tape version of RSM-2, or RSM-2D, 
will load and execute many of RSM's func- 
tions in a Model 111. Since the Model 111 is a 
port-based system, whereas the Model I is 
memory mapped for everything but cas- 
sette, the printer and disk operations have 
been changed. Also, the difference in 
baud rates means that RSM-2 cannot read 
or write the 500-baud tapes on the Model 
111, and likewise that the Model 111 System 
command cannot read tapes written by 
RSM-2 on a Model III. 

However, there is a simple way to allevi- 
ate this problem using RSM-2 itseU. All 
you need to do is change four memory lo- 
cations using the RSM-2 edit command: 

Aadress Change From To 

6CBD a 1 92 

8CC7 OF 11 

60CF OF '1 

■6C07 60 6C 

These addresses are for a 16K version 
of RSM-2, For a 32K version the addresses 
are 4000 (hex) larger, that is, they begin 
with A, and in a 48K system they begin 
with E. The last three digits are the same 
for all three sets of numbers. These values 
reflect the faster clock rate in the Model 
III. With the memory changed, you can 
now use RSM-2's P command to write a 
system tape that will save the changes. 
You will find that you will have to start and 
stop the cassette yourself, as that is also 
done differently by the Model III, Never- 



theless, this simple change will let you 
have most of the features of RSM for a 
Model III until Small System Software re- 
leases the complete package, 

Maynard B. Neher 
Columbus, OH 

Software Incompatibility 

After many, many moons of waiting, in- 
cluding numerous periods of total frustra- 
tion, I finally received our first piece of 
Radio Shack software specifically written 
for the new Model 111: Scripsit (cassette 
version). 

Anyone who has tried knows that the 
older Model I version (regardless of what 
RS advertising or storepersons state) will 
load but not work, , ,and we spent consid- 
erable time and long-distance phone 
calls, not to mention repeated trips to no 
less than three RS Computer Centers, try- 
ing to separate the "fly-specks from the 
pepper", so we were understandably quite 
elated when our tape finally arrived from 
Fort Worth. (We finally went direct lo solve 
our problem, ., and I must admit, the 
Computer Services people were great!!!) 

Much to our delight, the program is a 
gem! Everything works! We were, how- 
ever, suprised to find the cassette manu- 
factured to load at the low 500 baud speed 
instead of the newer 1500 baud capability 
inherent in the Model III. And in investigat- 
ing why, I was advised by Radio Shack at 
Fort Worth that they: '■Do not plan to sup- 
port the 1500 baud cassette rate with any 
of the RS software created for the Model 
III.'- 

Is Radio Shack telling me that the 
single-most valuable difference (for us 
non-diskers) between the Model I and 111 is 
not going to be utilized? I'd sure like Mr, 
Juge or one of his people to address this 
small question. One could almost start 
believing this is RS's not-too-subtle way of 
getting me to buy a disk!!! 

tarry M. Mohr 

Design Systems 

Kankakee, IL 

Radio Shack Replies 

80 Microcomputing has forwarded your 
recent letter to me, regarding your com- 
plaint on our Mode! Ill software. I'm sorry 
you had the problem you had, and I'm 
pleased that Computer Services was able 
to help. I'll be happy to address your ques- 
tion. 

First of all, let me assure you that we do 
intend to support the 1500 baud f^odel III 



tape format. Your tape was created before 
we had generated the 1500 baud version 
of the in-house software we use to verify 
cassettes. Rather than take a chance, we 
produced them at 500 baud. 

Our November 1980 newsletter dealt 
very thoroughly with Model I/ill program 
compatibility, detailing which programs 
will and which won't work, as does a sheet 
shipped with each Model lit (which I must 
assume you didn't receive). We specified 
those requiring modification, and those 
(including Scripsit) for which a Model III 
specific version would be required. I 
believe some 20 percent of Model I soft- 
ware turned out to be not compatible or 
need modification or revision. 

We regret the incompatibilities that 
were necessary between Models I and III. 
Our hope had been total compatibility, but 
we weren't designing a "warmed-over" 
Model I, we were trying for an enhanced 
and improved computer. Some conces- 
sions were unavoidable. We've also in- 
vested considerable time and expense 
upgrading existing warehouse stocks of 
Model I programs as Model III compatible 
versions have become available. 

Ed Juge. Director 

Computer Merchandising 

Tandy-Radio Shack 

Fort Worth, TX 

Disk BASIC Adaptation 



I just finished the article "A Turn of the 
Screw" in the April 1981 80 Microcomput- 
ing 

After typing in and attempting to run 
program seven on page 123, 1 found that it 
would not work with TRSDOS BASIC and 
a 48K machine. 

After some debugging I added an addi- 
tional line to the program (245 
DEFUSR-&HFE53) so it would work 
under Disk BASIC. 

The hex address in the above might 
have to be changed for different size sys- 
tems. It's used on my 48K machine. 

The program listed in the magazine 
works fine with Level II BASIC. 

Richard P. Stiles 
Windsor. CT 



Know-lt-AII? 



Alan Sehmer's VARD0C2 ("Know-lt- 
All", May 1981) is a super program, albeit 
(as he admits) rather slow. I'm not sure 
whether I did something wrong, but I 

couldn't get it to work until I changed line 



Continued on page 19 
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META TECHNOLOGIES 

26111 Brush Avenue. Euclid Ohio 44132 
CALL TOLL FREE 1 ■800-321 -3552 TO ORDER 

IN OHIO, call (216) 289-7500 (COLLECT) 



TAKE YOUR 

MODEL li TO 

NEW HEIGHTS 




MTC Is proud to announce MTC EXTENDED 
BASIC tor the Model II. by R. Ryen. Features in- 
clude "fixes" to existing BASIC, multiline tunc 
tions. extending an existing sequential file, PEEK, 
POKE, greatly enfianced screen control and ex- 
panded editing capabilities. The contents of 
variables are NOT CHANGED when editing, delet- 
ing, inserting or merging lines, allowing continued 
program execution! All this and much more. 

MTC EXTENDED BASIC S 99 95 



80 "20=12995 

THE ORIGINAL NEWDOS/80 

WITH MTC QUE CARD 

-k SPECIAL PRICE ic 
SAVE $20 $129.95 

Apparat's lone-awaited successor to NEWDOS+ ts here! This is not an enhanced ver- 
sion of NEWDOS, but a completely new product. Simplified DOS commands can be in- 
stantly executed Irom BASIC, even within a program, without disturbing the resident 
code. System options, such as password protection, number and type of disk drives, 
BREAK key enabie/disable and lowercase modification recognition, can be quickly and 
easily changed. Five new random access file types allow record lengths of up to 4096 
bytes, and no FIELDing! A powerful CHAIN facility allows keyboard INPUTs to be read 
from a disk file. An improved RENUMBER facility permits groups of statements to be 
relocated within program code. Diskettes may even be designated as RUN ONLY! 
Features all NEWDOS + utilities (SUPERZAP 3.0, etc) and much more! One MTC 
technical staff member said having NEWDOS/80 is 'better than sex" (you'll have to 
judge for yourself!). Includes 180-page instruction manual and MTC QUE card. 

NEWDOS/80 # SPECIAL # $ 129 95 

MTC QUE Card only $ 7 60 

CALL REGARDING OUR NEWDOS + UPGRADE PRICING 
MODEL III VERSION 
Has all ttie features of the Model I version plus enhancements. Allows any mix of 
single- or dual-sided 40- or SOtrack disk drives. Most BASIC and many machine 
code programs written for the Model I will run without modification. Includes a 
utility tor converting Model I single density to Model Ml double density. 

NEWDOS/80 for Model III $149 95 

CALL FOR AVAILABILITY 



MICROPARAPHERNALIA 

DISKETTES (box of ten) 

5'/." PLAIN JANETM S21.95 

5VV PLAIN JANE^M '.f;,,/^ $25.95 

5'/." DATALIFETM MD 526-01 . . S26.95 
8" DATALIFETM FD34-8000 .... S43.95 

NEWDOS by APPARAT 

NEWDOS/80 by Apparat $149.95 

NEWDOS- to 

NEWDOS/80 UPGRADE CALL 

NEWDOS + with ALL UTILITIES 

35-track J69.95 

40-track $79.95 

BOOKS 

TRS-8OTM DISK 

AND OTHER MYSTERIES . . $19.95 
MICROSOFTTM BASIC DECODED S29.95 
1001 THINGS TO DO WITH YOUR 

PERSONAL COMPUTER . . . , $ 7.95 



Michael Shrayer's 

ELECTRIC PENCIL 
VERSION II 

for 
Model I and Model III 

An expanded version ot the critically ac- 
claimed original word processing system! 
Includes all features of Version I plus many 
new extensions- Runs under most disk 
operating systems, has improved video 
text handling, loads any ASCII file for 
editing (including BASIC files), single sheet 
mode for printing on letterhead and more! 
Simple to use, features 2-key commands. 
An incredible package at an incredible 
price! 

SPECIFY MODEL I OR III 

Disk Version $79,95 

Tape Version $69,95 

CALL FOR AVAILABILITY 



Complete for Model I with all utilities 
Plus exclusive fVlTC QUE card! 

NEWDOS + 



$69 



95 



by Apparat 



Includes REF, RENUM. SUPERZAP, 
EDITOR ASSEM., DISASSEM , DIRCHECK. and 
more' This is the original NEWDOS with all ot 
Apparat s utility programs Includes exclusive 
MTC QUE (Quick User Education] card. 



40-Track Version . . 
MTC QUE Card only , , 



, S79 95 
, J 1 50 



TRS-80 IS a trademark ot the 

Radio Shack Division ol Tardy 

Corporation DATALIFE is a 

trademark o( VERBATIM PLAIN 

JANE, AIDS-I, AIDS-III CALCS-lil 

CALCS IV. MERGE III are 

trademarks of MTC 
1981 by Melatechnologies 
CofDoralion, Inc 



MOST ORDERS 

SHIPPED WITHIN 
ONE BUSINESS DAY 

Products damaged in 
transit will be exchanged. 



A 



PRICES IN EFFECT 
July 1, 1981 THRU 

July 31, 1981 

Prices, Specifications. 

and Offerings subject to 

change without notice. 

8107 



WE ACCEPT 

• VISA 

• MASTER CHARGE 
■ CHECKS 

• MONEY ORDERS 
•COD 



•Add S3.00 (or shipping 

& handling 

• S3 00 EXTRA for C.O.D 
•Ohw residents add 6'-;% 

sales tai. 



Si9 INPUT 




Babydub Flub 



It was bound to happen. Total in- 
compatibility, and my mailbox shows 
it. Babydub, March, 1981, just won't 
work on machines which have the 
Radio Shacl^ cassette modification in- 
stalled, or which are running under just 
about any DOS. These improved tape 
loaders are more stern with their lim- 
ing than the original CLOAD routine. 
The timing after the synchronization 
byte is just a few microseconds too 
fast for it to catch, so a delay must be 
inserted in the program. Okay, so make 
the five changes below: 

LINE 10: CHANGE 20701 TO 20711 

LINE 90 CHANGE THE 8TH DATA ITEM FROM 

208 TO 218. 
LINE 100. CHANGE THE 2ND DATA ITEM FROM 

179 TO 189. 
LINE 170: CHANGE THE 7TH DATA ITEM FROM 

193 TO 203. 
LINE 200- AFTER THE 3RD DATA ITEM [WHICH IS 

79), ADD THESE TEN ITEMS: 

245.197,1.32,0.205,96,0,193,241 

If you're entering the hexadecimal ver- 
sion, change byte 4301 from B3 to BD; 
byte 4376 from CI to CB; and starting 
at 43A3, insert these ten bytes: F5 05 
01 20 00 CD 60 00 CI F1. Move the re- 
mainder of the program along ten 
places. 

Also, high-memory freaks should 
note that you can't relocate this pro- 
gram to high memory without crashing 
It. Why? Because it reads the tape in- 
formation into memory starting at 
7FFF and filling memory backwards. If 
you relocate it to high memory, it will 
wipe itself out within seconds. 

Dennis Kitsz 
Roxbury. VT 05669 



Disk Error 



There are several potential problems 
with the program listed in my article 
"Sans Disks" (April 1981). 

1. When using the Select If, Change 
If, or Delete If commands, don't use 
spaces just before or after the =,>,<, 
or <> symbols. That will cause errors. 



For example: 

SELECT IF NAME = JONES 

SELEGT1FNAME = J0NES 



Is wrong 
Is correct 



2. When records are being entered, 
there is no indication when memory is 
full. To correct this add the following 

lines: 

305 IF(D2-^(F2-1)K32767 THEN 310 

308 D2 = D2-1:IF PEEK!D2|<>2 THEN 308 ELSE 

POKE 02-^ 1,5 PRINT '■MEMORY IS FULL' 

GOTO 360 

With 16K memory use 32767 in line 305. 
With 32K, use - 16385 and with 48K, 
use - 1. 

3. The program was written only for 
16K memory. For 32K or 48K make the 
changes to the lines indicated in List- 
ing 1. 

Stewart F. Hunter 
155W Murray Hill 
Detroit. Ml 48227 

Wherzit Fixit 

I am the proud owner of a TRS-80 
Model III. Since I'm also a novice to mi- 
crocomputing, I have difficulty spot- 
ting bugs in my programs. Having en- 



tered the "Wherzit" program on page 
252 of the April issue, I discovered, 
much to my dismay, that not only was 
line 83 missing entirely, but also that 
the delete (/) function was incomplete 
as printed. 

Any time a record is deleted from 
storage, it is duplicated at the end of 
the file and the first record disappears. 
Line 69 is the offending line in the pro- 
gram. To remedy the situation, I have 
added this statement at the beginning 
of line 69: R$(N)-B$(1). 

It sets the first record in the file 
equal to the Nth record, thereby pro- 
tecting it from oblivion {when the rest 
of the line alters the file record se- 
quence). 

The duplicate of the deleted record 
is not saved to tape and is over-written 
by any subsequent record additions. 
Line 83, as I constructed it, reads: 83 N 
= N-fS;GOT0 63, 

Another typo is the omission of a 
semicolon at the end of line 64 before 
A$(8). 

Colin Alexander 

120-28th St. 

San Francisco. CA 94131 

Continued fo page 20 



94 DATA0,58,224,1 16.254,1,202,10,117,33.1,128,205.132,2,126,35,305,100,2,254,4,194,239,116,33, 

232,131,126,35,205,100,2,254.5,194,252,116,205,248,1,201,205,147,2,33,1,128.205,53.2,119. 

35,254,4.194,16,117,33,232,131.305.53,2.119,35,254,5,194 
127 Dl= -32767 
235 D1 = - 32767:D2 = - 31767 

330 IF PEEK(D1) = 4 THEN D1 = -32767:POKE D2,2:D2 = D2-i- 1:PR1NT;G0T0 240 
500 D1 = - 32767:02 = - 31767 
640 Dl= -32767:CT = 
660 D2= -31768 
705 OST= -31767 
805 D1= -32767 

900 D1= -32767:FORI= -3176rrO- 16386:IFPEEK(I)<>5NEXT:ELSE905 
910 X = 29610:Y = INT(X;256):Z = X -(Y.256):POKE16536,Z:POKE16527,Y:HH$ = MID$(C0$,9,244): 

D1= -31767:CT = 0:GOSUB9800 
925 nP= -31767:5 = 
9102 D5 = D1:D1 = - 32767 GOSUB9200:GOSUB3000:MS$ = F1$.GOSUB9600:MS$ = '■ = ": 

GOSUB9600 
9800 C = 0:FI(0) = 0:FORI= -32767Ta -31768.IFPEEK(I) = 4THEN9810 
9810 S = 020:03 = - 32767:FORI ^ 1T0S:D3 = D3 -f 16 
9903 IFCT = 1THEND9=D2:II = 1:GOT09906 
9906 IFD9<0 THEN D9 = 09 -1-65536 



Listing 1. Sans Disks Corrections 
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The Newest NEWDOS/80 Version 2.0 
For Model I And Model 



THE HOTTEST DISK OPERATING SYSTEM FOR THE 
TRS-80® COMPUTER IS NOW READY FOR THE MODEL 
III AND VERSION 2.0 IS READY FOR THE MODEL I. 
MANY ENHANCEMENTS AND ADDED FEATURES 
SUCH AS NEW COMMANDS MAKE YOUR COMPUTER 
MORE POWERFUL! 



• DOUBLE DENSITY ON MODEL I 

UseoftheLNWDOUBLERorthePERCOM 
DOUBLER to expand storage 80% under 
NEWDOS/80 Version 2.0, mixing single 
and double density specifications without 
any patches. 

• SINGLE DENSITY ON MODEL III 

Wilt allow the MODEL III to read disks from 
MODEL I and to write disks the MODEL I 
can read, making it easy to move programs 
between the two machines. 

• EXPANDED DIRECTORIES 

Directories can be expanded three times 

the normal number of available entries, 
even on DOS disks. This is extremely useful 
when using double density. 

• DYNAMICALLY MERGE IN BASIC 

To allow sections of BASIC programs to be 
deleted and replaced with lines from a disk 
file during program execution. Also allows 
merging of non-ASC II format files. 

• SELECTIVE VARIABLE CLEARING 

Allows the programmer to keep some vari- 
ables and release the space used by the 
rest; also, specific variables may be erased 
releasing the space they use. 

(CALL OR WRITE FOR MORE INFORMATION ON OUR 
COMPLETE LINE OF PRODUCTS AND HARDWARE 
REPAIR SERVICES FOR YOUR TRS-80' COMPUTER) 



• PAGE SCROLLING IN BASIC 

Scrolling has been modified to allow the 
user to display programs page by page, in 
addition to the regular line scrolling. 

• REPEAT FUNCTIONS 

Keys in MODEL I repeat when held down. 
Entering "R" as a DOS command causes 
the previous DOS command to be repeated. 

• ROUTING FOR DEVICE HANDLING 

To send input and output from one device 
(display, printer, keyboard, etc.) to others or 
to a routine in main memory. 

• DISASSEMBLER OUTPUT TO DISK 

The Disassembler will now write a source 

code file to disk, which the editor assembler 
can read and edit. 

• CHAINING ENHANCEMENTS 

Features to allow chain files to be written 
from SCRIPSIT; also, chaining may be 
switched on and off without changing 
chain file positioning, and may be executed 
via CMD "XXX" and DOS-CALL. 

• SUPERZAP 

has the ability to scan diskettes or disk files 
to find the occurences of specific values. 
Also will generate disk file passwords and 
hashcode. 




MASTER CHARGE 
AMD VISA 

WELCOME 



$149.00 



. Data Resources Corp. 



Send vout card nurnDer and 
expiTdi o'l Dale -u "^ >ci,r order 

1-800-525-7958 



Business S Professional Center 
BOOO East QuincyAvB. 
Denver, Colorado 80?3/' 



(303) /;3-6665 



TPS-aO' IS a Registered IradeniarK o( Tandy Corp 
1981 Data Resources Corporation 



so INPUT 



65095 to read 

65095 . . ELSE IF CS'-ASlJ) THEN 65)25 (not 
CS>A$|J1|. 

Also, the readout was in reverse 
alphabetical order until I changed iine 
65160 to read: 

65160 FOR R = A1 TO 1 STEP - 1 : LE = . . elc. 

A change in 65085 will tell whether ar- 
rays are single or multi-dimensioned: 

65085 IF T = « AND (PEEK[F + 2) = 44 QH PEEK(F + 3) 
= 44 0RPEEK(F +4| = 44| AND PEEK(F + 2K>41 AND 
PEEK(F + 3)<>'11 THEN CI = CS + "{(t,!*)" ELSE IF 
T = 4QTHENC$ = C$+'|#)' 

Richard R Losch 
Salem. MA 



Small Business Needs 

Your publication regularly asks for arti- 
cles by businessmen on their use of small 
computers. 1 know next to nothing about 
them, but I do have a complete Radio 
Shack Model M System installed in my 
small business and thought that a letter 
would suffice as input from a typical user. 

We are a small manufacturer of photo- 
grahic equipment, with about 20 employ- 
ees and sales of a little under $1 million. 

Our system includes the 64K computer, 
an expansion drive and the Line Printer III. 
We use all standard Radio Shack software 
including general ledger, payroll, ac- 
counts receivable, accounts payable, 
mailing list and profile. 

After using this system for just about a 
year, we feel quite comfortable with it and 
accept the fact that off-the-shelf will never 
be more than 80 percent of what you 
might want. However, that is an accept- 
able compromise. Our problems have gen- 
erally centered around repeated disk fail- 
ures which were finally solved by switch- 
ing to Verbatim disks. In our application at 
least, these seem to be the most depend- 
able. 

While those who write the prograrTis are 
undoubtedly muchsmarterthanlam, they 
seem to know little about the routine 
needs of business. For example, pro- 
grams such as accounts receivable and 
accounts payable simply must have a 
mailing list option where you can easily 
print out customer names and addresses 
on standard mailing labels. Every busi- 
ness has to send out price announce- 
ments, special promotions, notification of 
vacation closings, etc. It is frustrating to 
have to type out all of the customer or ven- 
dor names and addresses when these are 
already in the computer. In short, those 
suppliers who intend to provide accounts 
receivable and accounts payable pro- 
grams for the small businessman must in- 
corporate an address label option with 



SipAID 



screen with the TRS-80 Level II 16K, It . 
also includes eight different colors. It 
costs $249.95. 

Programma's 80-Grafix Board gives 
you hi-res graphics using a 384 x 192 
pixel screen; it's in black and white. I 
don't recommend this product be- 
cause it goes inside the keyboard, and 
that would cancel Radio Shack's guar- 
antee. 

E/RAM gives you the same graphics 
as the Electric Crayon, but no color. 1 
think it is priced too high for its perfor- 
mance. It costs $349.95. 

I have been reading your magazine 
for about four months now and haven't 
seen any programs except for the hi- 
res add-ons. It really is a shame that 
the TRS-80 can have better graphics 
than the Apple II -i- . or almost as good, 
and there aren't any programs out for 
them, I want to see that changed. By 
having hi-res programs for the TR3-80 
there will be more people buying the 
TRS-80, this magazine, the products 
above, and software in hi-res. 

The TRS-80 may have the most 
games out on the market, but its time 
for a change in TRS-80 gaming. TRS-80 
owners could stand high and proud 
knowing they have the best home com- 
puter on the market, The United States 
needs a home computer like this to 
keep us ahead of the Japanese market. 
The TRS-80 can be that computer and 
more with your help. 

Sean Hockabout 
210 tronwood Road 
Alameda. CA 94501 

Sean fells us he's 13 years old.-Eds. 



Computerese 



1 would appreciate any information 
concerning a computer program re- 
ported in Computer Power For The 
Small Business, by Charles J. Sippl 
and Fred Dahl and published by Pren- 
tiss-Hall, page 156, developed by Mr. 
Ashok Nagrani and called "SPREG." 

Quote from the book: 

Vou might become so piotlcienl al progomming 
ifial you whi come up with a piogrsm as cievei 



and as daring as that of Mr. Ashok Nagrani who 
mvenled SPREG. Using Altaits Exiended BASIC 
version 3.2, he composed a program Ihal would 
spout 'Computerese,' a language very similar to 
that used tiy po'ittcians. diplomats, and double 
talkers iwho 'ind -hemselves pressed 'or an 
nonest answer Drawing on a data base ot nouns, 
verbs, adjectiwes, and oiner parts ol speech, the 
program structures ihom In a way !hal is gram- 
matically correcl (well, almost) Dui essentially 
meaningless. The beauty of the program is that it 
can generate up to a trillion such meaningless 
sentences without ever repeating itself. 

If you have any information concern- 
ing the above we would appreciate 
your notifying us. 

Sam W. Atlred. Administrator 

Capitol Home Health Agency 

307-A Clinton Blvd 

Clinton. MS 39056 



On First Command 

After having read so much about 
KBEEPFIX I was delighted to find the 
disk version featured in the March 
issue. Since the article stated this par- 
ticular version was identical to the 
original, save for a couple of minor 
code changes. I found it easy enough 
to modify so that it should be the same 
as the original. I deleted the first five 
bytes, changed the jump in 7F95 to 
jump to 1A19 (BASIC'S starting point) 
and changed the instruction in loca- 
tion 7F91 to 7 F. as I have a 16K system. 

When I loaded the T-BUG-created 
system tape and tried it out, I found I 
got ail the benefits claimed. However, ! 
have to issue a New or CI ear as my first 
command, or I will get an OM error 
on entering any other command as my 
first command. My question is whether 
this is normal, or a problem with my 
RAM or program. Although the prob- 
lem is minor and easily circumvented, 
it is still an irritation. Any help you can 
give me would be appreciated. 

Lastly, 1 would like to see more arti- 
cles on assembly programming, espe- 
cially articles dealing with uses of 
ROM routines. 

Bernard F. Galfney Jr. 

524 Riley St. 

Lansing, Ml 48910 
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NEVER UNDERSOLD. 



Thats right. If you can find a lower 
price in this magazine WE WILL BEAT IT! Period.* 



SPECIALS 



SPECIAL #1 



S44.50 



TRS-BO Disk ana OUier Mystenes Bcwk. Bo" 
o! Verbatim Diskettes, and a Ptoetic Library 

SPECIAL #3 ai4S 

.'.|i.,.it NfcWDOaaO, Bo* of VertiaHTi 
■ ■ "rr., and a Raatc L*)r8ry Case 

SPECIAL#4 SISO 

\'i.i ..=jU. Basic CompHw, Box of Verbaim 
- ; '■-■".t^, and a Ftestic bbrary Case 

SPECIAL «S . . . .S49.95 

Wicro&olt Basic Decoded and Other 
Mysteries. Ba> of Verbotirr DisHBttas, and B 
fflflstic Ubrary Case 



PRINTERS 

EPSON MX-80 ... CALL 
MX-80 Graphics ROM , CALL 
NEW EPSON MX-80 TFCALL 
Okjdata Microline 80 S41 5 
Okidata Microline 82 . S625 
Okidata Microline 83 . $899 
IDS Paper Tiger 460GS1 050 
Anadex DP-9000.1 $11 95 
AnadexDP-950a,1 . .$1295 
Centronics 737 .... S689 

NEC Spinwnter SCALL 

NEC w/ Sellum Option , SCALL 
Starwnter 25 cps $1 440 
Starwnter 45 cps . $1770 

Malibu165 $1995 

MPI 88G $495 



TRS-80 HARDWARE 


TRS-80's 


. $CALL 


Micropolis 77 track 


, $399 


Percom Doubler 


$199 


Percom Separator 


$27 


Orchestra 80 . . 


$79 


Shugart40tr. . . , 


, ..$299 


Pertec 40 tr 


. . .$299 


MPI40tr 


, $299 


1 6K Memory Kit 


$19 95 


Cat Modem . ... 


$145 


D-Cat Modem 


. . $155 


Lexicon Modem . . , 


, $125 


Verbatim 525-01 


$26.50 


Verbatim 8" DD 


$44.00 


Isolator ISO-2 


$49,95 



NEW! Double Density Special 

A Percom Doubler, Apparafs NEWDDS/80, Double Zap II [to 
convert the NEVVDOS/BD to single and double density], a box 
of Verbatim Datalife diskettes, and a Plastic Library Case. A 
S436 Value... for 

$359 



*lneludi S2.00 shipping mrf handlins on all snicrt. Vtu and M«nw> Card accsptsd. ruevar unilt-i 
•oM dHm- mrfi.. only ts ItMn. cifPrMftly d«ltwvr.W« *rvm oth.r rM.ll vendor, at uAiimrti%a6 pnco. 
Alt n.vw wnMrMtld oMw. good as supply laats. PlesGc add SS.OO far all COD order.. Plo... call tar 
ttom. not liotorf. W. i)adiy .nsMcr uny quBBiions on all ot our hardMara. softwu^, and Mip|dy 
noods. Ouanltity diocount. owailabla. ScKosI purchaas orders uubopted. Please r i^nHnbor M Hfura 
compKitoPS ohfpfinB .nd handlint charg.. writan arriuing at imhm- undarsuld pnc. 



Send For 
Our New 
Free Catalog 



POWERFUL SOFTWARE 

Racst's New DISCAT S45 

'lirs New rrechine language dek catatog program wil help ywi teep trec^ ot 
ycxjT programs jn a neat. (xtJer+y liDrai^ It can caUtog up to 1 900 DrogrHTS 
in each of 9 catagones fur a total o( 1 7CXXD program location ratxiras 

Snapp Spooler S90 

h.D, „L,Ujnabc pnrt spooler tor the fixxW I mcTBMoa your cccnputerr- r'fi 
ricfi , ;iv !r>fi!ifiij the computer i^i4B prmtng 

TRACKSESS 824 

Tins 16 tfie complete disk mp uUity. capable o) coping slatxlarO arW nor. 
btanoard lormaCtrig The dynamic etJting stows you to change any byte iri 
riny aeclor m'XJI-: amazing Base 

SCRIISIPUT 829 

r-j'r-ra: ,oij!" screen dispieys ard inpul roucnes vwth tf»s machine language 

SLC'Duti-* G -es yixir prnqram a more :>■ :iIi:S'.l)iw)I k>n* 




WORD PROCESSING 
SPECIAL DELIVERY 



•118 



The Deet f TLaiimg list progreme (or the TRS-80 Modole I fi 
III Siiecial Detiveny « eaey 10 use & is written r fast 
"Dirrhne lenguaQe. Special Dekvery allows you Lti Tierge ycjT 
"■laii.ig list He 'MOx text dies written with the Elect/-* 
^pr^' or Scnpsit' tf create personalized form fetters 

XTRA SPECIAL DELIVERY S189 



PR080FT 



"V Ooes and more Extra alkiws 
>:^;sage9 n your teit Me and 
sortng or multiple fields 



S78.95 



pnnsorr Wordprtwessnasoftwaraawtten for t^e THS-BO 
ari:. tne Centroncs 737 Takes hi aaiianHIOii ot al the capa 
bii-ties available on the 717 indUdna true proportonai 
spacing Gomes compir-r ,vith p ^ 'p :"fi" j !■■•' -T.,".nl 



213-883-8594 




BYTC 
STORC/ 



5115 Douglae Fir Road 

Suite B 

Calabssas, Catifomia 

91302 




^6 INPUT 



their software. 

Another thing that is annoying, al- 
though less so, is that the basic menu for- 
mats and operating procedures will differ 
substantially for different programs from 
the same supplier (Radio Shack). On one 
program you type in the password and you 
see it on the screen. On another program 
you type in the password and all you get is 
a series of number signs so that someone 
viewing the screen can't see the pass- 
word. It would be a lot easier if the pro- 
grams were consistent so that an opera- 
tor wouldn't have to follow different pro- 
cedures for different programs. Similarly, 
on some programs you use the Break key 
and on other programs this would court di- 
saster. Again, if these programs were 
from different manufacturers it would be 
understandable, but coming from the 
same source they should be similar. 

Finally, when printing out several re- 
ports, an option that lets you initialize the 
accounts receivable program and indicate 
which type of paper or form should be 
used would be a nice touch. If you could 
put in a 10 or 12-letter identifier next to 
each report on the menu, the operator 
would immediately know whether to use 
three-part paper, invoices, labels, etc. 

Steven Hess 

President. Saunders Photo/Graphic 

Rochester, NY 



Backup Change 



I found the article "Backup/Display" by 
Craig Lindley in the May 1980 issue very 
useful, but had some difficulty with the 
printout part, because I have the official 
Radio Shack lowercase modification. 

When the transfer is made from the 
video memory, I lose all the alphabetic 
characters. After some experimenting, I 
found that the alphabetic characters are 
stored on the screen in the range 00-1 F 
hex, so the trick is to add 40H to all 
characters below 20H as they are brought 
from the screen. 

The following changes to the code in 
the article should correct things: 

1. Change line 1400 to read; 
1400 LDATA LD A,(HL) 

2. Add lines 1402-1408 as (ollows; 
1402 CP 20H 

1404 JR NC,GT20H 

1406 ADO A,40H 

1408 GT20H LD C,A 

After this change, I had no further prob- 
lems, and I am now busy making backup 
copies of all my programs. 

George Rogers 
St. Laurent du Var, France 




Cursor Correction 

In my article "Block That Cursor" 
(April, 1981), it seems that the Tab 
function doesn't work with the block 
cursor running. 

Fortunately, the fix is as easy as 
swapping a couple numbers around in 
the data statement. The first five num- 
bers of line 50 should read as follows: 

50 DATA205.88,4,245,197-allihe rest are the same. 

An updated listing to the program 
with the corrections made follows. 

Ron Balewski 

412 E- Ridge St. 

Nanticoke. PA 18634 



1 REM BLOCK CURSOR PATCH 

2 REM BY RONALD A. BALEWSKI 
10 F0RK = 32635TO32654 

20 READX 

30 POKEK.X 

40 NEXTK 

50 □ATA205,88,4,245, 197,237,75.32,64,10 

254,96,32,3,62,143,2.193,241,201 
60 POKE16414,123 
70 POKE16415,127 

Block That Cursor Correction 



Ledger Tape 



A number of readers have experi- 
enced trouble making the initial run of 
my program, "The General Ledger" 
(page 222, May, 1981). The program is 
designed to run with a data tape, but if 
a blank tape is used as a data tape " FD 
Error in 3000" will be displayed. 

To make a suitable data tape with 
zero balances in the various accounts 
the following procedure may be used: 

1. Enter the program. 

2. Place a blank cassette in the re- 
corder and set it lo record. 

3. Key in: RUN 620, and Enter. 

4. Press Enter again. The recorder 
will then record the various ac- 
counts with zero balances. This 



tape may then be used as a data 
tape to run the program initially. 

If the user wishes to start entering 
account data without making a zero 
balance data tape, he can load the pro- 
gram and enter: RUN 220. This data 
can then be recorded after a trial bal- 
ance of the new data has been run. 

Also note that a number has been 
left off in line 1340 of the published 
program. The end of the line should 
read: If X=1 GOTO 130. 

R. L. Conhaim 

15506 Kiamichi Road 

Apt. 1 

Apple Valley. CA 92307 

Car Error 

One of your readers has found an er- 
ror in my article, "The Auto Mentor," in 
the May 1981 issue. The error is in lines 
1220 and 1230. The correct lines are: 



1220 X1 = DR-(X(21)n2M00) :EFFECTIVE RATE 

FOR OLD CAR FUEL 
1230 X2 = DR-(X(22)n2; 100) :EFFECTIVE RATE 

FOR NEW CAR FUEL 

The time to replace the old car in the 
example with these changes is 49 
months. 

Leslie E. Sparks 

1014 Evergreen Drive 

Durham, NC 27712 



Once Again 



The "80 Input" department of your 
April issue published a comment from 
me with a fix for the chi square pro- 
gram of the Radio Shack Advanced 
Statistical Analysis package. Unfortu- 
nately, some of those pesky parenthe- 
ses in the fix were not typeset accur- 
ately, so the correction won't work. 

The proper version of the fix for the 
last statement in line 280 is: CS = OS -i- 
(ABS(0(l,J) - E(I,J)) - CC)t2/E(l,J). 

Alfred L. Brophy. Ph.D. 

Director, Guidance Exchange 

421 Mackenzie Drive 

West Chester, PA 19380 
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THE ALPHA I/O SYSTEM 

A COMPLETE FAILURE? 



t Naooe-ec 3 years ago, when m Pres-flei: ■naae a decision Ai me me wt specian/eO 
iti cusiom a"aiog ann tJigiial circui! assign irif oecismn was to 3\'.e<^o\ 'o develop a litie ot 
suoMrO imeflace nafOware Iw ihe einergmg micocompufefs Ai me n™ 1 1977. we fiaa ro 
OkiiM whtcfi a' lie ne* machiries couiO become Ide inOusH, stanOarO ' o1 Ihe cw CM 

nucros 

Despile a lew aggravaring Bui minor Oeficiancies me lRS-80 seemed lonave me -nosi 
chance ol success and ii Had tne Desi pfice/ performance raiw Also wilh some r.aginaiion 
imt lafffe sales wflanizalMW coulO Become me ■.aiflesl 5erv.;e r^elwork m me *or a a reassui ■ 
mg mrouflm lot Itta many novbces w Ihis new t«ia 

It became cWai tnai trie TRS-BO touia ue used (wif ou' meti nypoinetcai s.vsl9m> lo solve 
c-oOtems in many tieWs whete comouiefs were fioi ye! useo , mostly Because ol men fiign cosl. 

Tne IDEA was simple' *LPMA PRODUCT would suDOiy tne missmg imn Mlween itie THS- 
Boanome ■ Outside wDi a moreauoul ttiis ' sjis^ce wor'd" latet* 

DAN6ERI I' Radio 5facn entered me same mar-et we oroOaBly would not nave survived Out 
(tie eipetiaiion was itiat ttiey wou'd Da too nusy Oeveloping mei-' Basic une (Onves, 0'">ie'5 
modBT-elc ■■ Itiankstoourmorespecaiiiedproaucis we would not Decomoenng wim merr 
BAD STAftT! We Began *itl » 'S'Iu^b Our lirsl pfoduct was susassefl to ne a simple low cost 
general cjtpose device it would aiiow tne THS-80 to accep' mouts ottier man me keyDoa'O 
Many kincs o' eilernai devices (the 'outside worm' -e-^iioned before! I'kb oMloce:!! 
sensors ihermostals swiicnes contacts elc . could 3« connecieo easily In aflcmon mere 
were two relays lo tc-'-j m or odl enterna .wds sjcn as moiofs. lar-ps aoo'iances 
r-ealers etc eic - oiner words, il wouW n ic« --"i i:ompuler lo ne'ai:' w interlace wiin 
e.ierndi devices '.Ve called i! the iNTERFUHFa : nvnal a mistake' .: sounded too much Kka 
expansion mle'lace' Many ewnusiasi t 'RS-80 osers caiieo tanking that ouf ■iNItfl- 
FACEH 2 ■ was a (ow cosi Expansion -iie-iaca lat S«5lhal would Have oeen a real Ba'gamt! 
We warned to change the contusmg nar^e Inal meant reprni,nj me manual, changing me aC 
scrapp-ng the "yers, discarding the siik scfsened caws Weil iNTERFACEP 2 ■■ would 

stay 

TROUBLEI We also louno itiat the maionly o( TfiS-80 users were AfftAlD ol me narOwave Iney 
could Be very comlorUWe wilh fancy Bfograrm.ng Bui ihought you had to Be a computer 
speCMtisi 3' leclmically inclined lo pul the iNTEBFACtR 2 lo worn in trum some IMAGINA- 
TION ana a SCREWDfliVE" is ail you really naeO Anyone aoie ID wire a switch could use ihis 

device 

WORSEI There was a^so the tear of p'ugginB a ■foreign device mio me o'eciObs cs-^auier 
TfTts notion nas ali Out disappeared as mere are now so many auaniy products designed lot me 
IRS-aO ittai plugging m a non Radio-Shac» device has Become tajti'iion 

Our ad in Cieaiive Computing (BO- Microcomputing did noi yel e.tst nardiv paid for iiself 



We had a decision to mahe Were we wrong or |usl loo earty^ Our first INTEHFACER 7 was sold 
to someone who warned lo and succeeded in, controlling tiis lancy mode* railroad »im his 
TFS80 inie-esling. But whal mjo* us slicV wilh me Loncepl was Ihal some ol Our '.ft'.lf- 
FACERS Began Imding use m appiicalions wilh tascinatirg BOssiBilllies Space is lacking lo 
descride them U'jt Ihe most eicilmg was me success'ul use ol me system m asSrsMq a nanai 
capped young Boy We were pleased to hear o' such a meaningful application 

Ttiree years 'aier, as you car> see m our ads. The IMEPfACER 2 is aiive and well Tr>e 
D'ice went up a Bit, and despite the mlioOuclion of Ifie more poweiiui INTEBFACER 80 me 
sales nave Been steady 

Then came ihe leasi understood producl' Itie ANAiOG 80 This St39 nicety designed 
module Is an Analog to digital conva-ler witti 8 moul channels Used with your THS-80 it 
provides i powerful ' Qala acouismon system This largon simpiy means mat you can 
monitor, measure and record 8 indepandanl varying voltages Very tew people realized "; real 
power Such a systeiT^ would have cosi over ler^ thousand dollars (usi a few years ago 

The possiDiiil'es in scientific and engineering envrronments are endless TBis system 
could replace chart recorders digiia' oala reiids'S r/ngiammabfecalcj .iics, data ar^aly^ers 
and many other speciahzed ann eipensive pietei o' ■■(:.:. -.r-'C"' Fu-lhermoie, up lo H ANALOG 
80 5 could Be used simulaneously loi a total ol 64 cnan.ne b ■-■' ^■'aiog 'npul' They s^r^piy plug 
into the THS-60 using out x senes ol bus extenders ;tXPANDABUS I 

Ou' neil producl was lo Be a second genetation input'Ouiput mierlace with mote 
lleiiBiiily than Ihe INTERFACEP 2 Careiul design and relmemenl yielded the INIERFACFR 80, 
the nos; powe'lul real world interlace on the market today It has 8 inpuls. eatn opi cjiiy- 
Isoiaiec and 8 outputs eacn wiih a -eiay coniaci The it.TFHFACER BO is luiiy compalioie witn 
our ANALOG 80. allowing these to ne used togeiher m oroei to cieaie systems that conitni 
external devices BaseCon ' sensed mpul _ le; coniroi Otthe TRS-80 
A FAILUHEl in Sflile ol our extensne adveilising. very few are aware Ol me emsience Ol the 
powerful ALPHA I/O SVSTEM 

THE FACTS ARE. 
-the AlPHA SYSTeM/TRS-BO comDmation torms an incredtWy versaWe and powwlul WW for 

acQuisii onip'oeessing/control 

-In spite ol lis moderale cosl. ihe system is sophist k;a ted and reliable. 

■'he entire system can oe easily p'ogrammed in BASIC usirtg iNPfXiandOUT K,¥comm»nos 

■he modular aoo'oach and our EXPANDABUS allow tor insiaol expansion as requiretnenls 

demand 

TtieloHowing pages contain more inlormaiionatwui me devices mentioned here We invite 

you 10 ca« or wnie lo (Mcuss your panicuUi appiiuilan 



TIMEDATE 80 




Neat. Compact D«sign 
3 Years Batlety Life 



Slips Inside F. ■ 
(Y Option Shown) 



Real Time Without 
Exparulon Interiace 



•Complete set contained lri,e real time clock/calendar , TIMEDATE 90 conimues to keep 

accurate time and date wnen me tomputer is turned otl or eiperiencei a power failure. 

•TIMEDATE Ml on;y needs lo oe set once and H s two replaceaOle AAA ' pallerles (not 

included) keep TIMEDATE BO lunnmg in eicass ol 3 years Costly U-. Cad oaitejies and 

charging circuits are eiimrnaled 

•rne inslani power is applied to the IfiS-80 TIMEDATE 80 provides MO/DATE'Vfl, DAY 

Of WEEK Hfl MIN SEC and AM ' pm .nfo-mation with quarli accuracy 

•TtMEDATE SO replaces me computers internal clock Eii-emeiy uselu' fO' automatic 

operat'O" Of 'emote systems wiih no operjio- t ailendance i me power tails and then is 
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PRINTER 
STAND 
$59" 



WHY LOSE PRECIOUS TIME ?" 

■es'oreo only TIMEDATE 80 will update the system with current time and DATE ir-immalion 

t . utillity wilh the computer s internal Clock 
• IlMFCft'E BD .s guam crystal oased with INTELLIGENT CALENDAB, including pioviswns 
■ . '11,. ie;r' IiME display may Be By i! hour AM/PM ot By 2A hour military and Eruopean 
for mat 

•TIMEDATE BO plugs directly inlo the rear ol the TRS-80 keyCioarO and gives the 'iMEi 
function even wimoul an Expansion Inlertace For those with a disk system , it plugs into me 
left Side panel c' the Eipansion Interface An optional V connectot tan ptovWe lor funtiei 
expansion 

•TIMEDATE B0'» small si?e leeps me computer taot* unclutlered if you have an Eipansion 
inte-tace TiMECATE 80 literally -DISAPPEARS' By 5;ipping mto the empty soace in the 
Boiiorr. of :ne interlace 

•Two sets of software on cassette come with T fi^EDATE BD- TiMfcSET' and -IIMEJ ' 
TMESET ' is a slep By step sei ol simple ^nst-uctioos lor selling TIMEDATE 80. TIMES" 
IS a sel 0' pone roi,tines which paicn OOS and Level n TIMEJ 10 read TIMEDATE 80 and is 
easily incorporaieO into any user software TIMEJ' "ill always prni me time and dale 
when listing a program — gieal for kuep.ngiracK Ol revision.s' 

•Other vaiuaoie uses fot TiMEDAtE 80 are accurale dale anc time miofmation lor Business 
■eporis ■"■( payroll records financial reports eic or lo various I/O devices iBQUiring H 
nour clock inpi.,t. sued as aDoraio'y insiru-'e-'^diion. and to communication systems 
needng ' luy n, Log Out ' data lOuHelm tjoarii;.,. 

■TIMEDATE BO, fuily assempled and lesteC 90 day warranty complete with inslrucl^crns 
and sottwa-e on cassette S35 00 ■V optioc. ad<lS12 OO 

PRINTER CABLE 
EXTENDER 

Adds 4 ft. to your existing cable» p *nter 
extension connects between Exp. Int. and 
your present printer cable. .♦...».*27.50 



AIPHA Product Co. 



ADDS? SOPEHQRDEfl FOB SHICPIKG »N0 MANOLING 
AUOHOEHS SHIPPED flHST CLASS M All 
WEACCfptVIS* MASTER CHARGE CHECH; 
COO ADOS? DOEKTRA 
OUANTltT DISCOUNTS AVAILUBLt 



85-71 79 Sl.WOODHAVEN NY 11421 
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Edited by Pamela Petrakos 



"The primary message is dear: 

to avoid time-consuming costly pitfalfs 

wlien acquiring a first computer system/* 



So you are thinking about 
a Smaii Business Computer 
Canning Publications 
Vista, Caiifornia 
Softcover 100 pp. 
$12.50 

by David W. Smith 

Here is a manuai designed to help the 
person who is unfamiiiar with com- 
puters learn how to select a small comput- 
er system successfully. This is a highly or- 
ganized book and the reader should have 
no difficulty following and comprehend- 
ing the material. 

The book is written for the small busi- 
ness owner who possesses a limited 
knowledge of computers, but who has at 
least one problem or task he/she believes 
a computer can solve or perform. This 
manual presents full coverage of the ba- 
sic information you need for making an in- 
telligent decision on system acquisition, 
without getting caught up in inappropri- 
ate technical detail. 

The primary message is clear: to avoid 
time-consuming and costly pitfalls when 
acquiring a first computer system. This re- 
quires that the business person do his/her 
homework. Before seeing a single task 
performed by the newly installed comput- 
er, you will need to assimilate a fair 
amount of information on the subject. 
This manual contains most of the infor- 
mation you will need to know, and lists 
references for all the rest. 

Dispelling Myths 

In preparing you for the learning task 
ahead, the authors enumerate many of 
the benefits to be gained by computeriza- 
tion. This is no pie-in-the-sky outlook, but 
rather a highly realistic analysis. Warn- 
ings and cautions are given to help dispel 
common myths concerning computers. 
For example, the authors point out that 
anticipated savings in payroll frequently 
do not occur at first in the small business 
lust because a computer has been put in- 
to service. Such a business usually has 
too few employees for the computer to 
replace any one of them entirely. The sav- 
ings in payroll Is likely to occur, however. 



when business volume begins to grow, 
and the company finds it can do without 
proportional increases in staff. This is on- 
ly one of the many illustrations given to 
help you develop a truer sense of the po- 
tential impact of the computer on your 
business. 

The authors are thorough in their cover- 
age of important basic information— how 
a computer works; what constitutes hard- 
ware and software; the differences among 
maxi, mini, and microcomputers and their 
manufacturers and sales procedures. A 
glossary of common computer terms is 
provided. There is also an excellent dis- 
cussion on how to use a computer consul- 
tant effectively. The book includes many 
photographs of representative systems 
with captions describing the components, 
the capabilities and prices. An appendix 
lists leading suppliers of different sized 
computers. 

Alt Facets of the Subject 

All facets of the subject appear to have 
been examined. In laying out the proce- 
dure to help the business person assess 
his/her computer needs, the authors even 



introduce and discuss the possibility of 
avoiding an in-house system by farming 
out the tasks to a computer service in- 
stead. Heavily emphasized, however, is 
the goals-oriented approach to choosing 
a system, starting first with the software. 
The authors repeatedly suggest search- 
ing out existing combinations of hard- 
ware and software which are already per- 
forming the desired job, and In the same 
line of business. 

Finally, the text closes on the sugges- 
tion that, no matter what reason has 
prompted a business person to investi- 
gate computerization, chances are very 
high that a successful acquisition will 
open up more avenues of use for the sys- 
tem. The recommendation is that future 
expenses can be reduced or eliminated by 
purchasing or leasing a somewhat larger 
system than is required forthe immediate 
job at hand. 

For organization and thoroughness this 
text can not be surpassed. It will lead you 
to a clear understanding of the elements 
involved in the wise selection of a com- 
puter system without overwhelming you 
with technological jargon. ■ 



Programming in BASIC 
for Persona/ Computers 
David L. Heiserman 
Prentice-Hall, Inc. 
Englewood Cliffs, NJ 
Softcover, 333 pp. 
$7.95 

by Bryan Moran 



If you just bought a microcomputer this 
book may be a worthwhile investment, 
but for anyone who has written a few 
BASIC programs it's not worth the price. 
There are no special techniques or innova- 
tive programming ideas introduced that 
are not covered in any elementary pro- 
gramming text. 

Although the programs developed in 
this text are designed to run on any 
machine using Microsoft BASIC, the 
author had the TRS-80 user in mind. 



Flogged Unmercifully 

For the new TRS-80 owner, who has 
never programmed and needs to be led 
step by step through beginning BASIC 
statements, something is to be gained 
from studying this book. The reader is 
taken in a very deliberate fashion from 
powering up the computer through the 
common BASIC statements. Statements 
are Illustrated by examples as they are in- 
troduced. Some, however, are flogged un- 
mercifully. For example, in chapter four 1 
counted nine illustrations of FOR... 
NEXT loops for timing delays, with little 
else of value in the examples. I considered 



t)Ooks . 

. [ rwi i ffeft,-'Tjj| I 
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Zprinters 



o printers on line at all timei 
and select printer 1 or 2 by software or 
built-in push-button. End the hassle of 
plugging and unplugging printer cables 
with our new PRINSELECT 80. $95.00 
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this an overkill. 

I found it somewhat amusing that the 
author refused to refer to a BASIC inter- 
preter- No reference was made to any pro- 
gram that allows the user's program to ex- 
ecute. Interpreters were referred to as 
"brands" of BASIC or even as (BASIC) 
"schemes." 

Troubles 

There are enough typographical errors 
scattered through the book to discourage 
the novice. However, most, if not all, 
should be picked up by the alert reader. 
On at least one flow chart arrows are mis- 
labelled, but if the reader understands 
IF... THEN statements there should be 
no real problem. 

More disturbing than typos Is a sorting 
routine that works beautifully as long as 
at least one of the data is positive. The 
problem is in a segment where a search is 
made in an array for the largest element. 
Why the author chooses to set a tempor- 
ary variable equal to zero instead of equal 
to the first entry of the array Is beyond me. 

An additional trouble spot is the 



author's inconsistency when referring to 
rows and columns in two dimensional ar- 
rays. In one instance, the first subscript 
refers to a row while in the next it refers to 
a column. 

Baited Breath 

After learning how to use data state- 
ments we are told in chapter 12 that better 
ways to input data will be presented in 
chapters 13 through 15. With baited 
breath we wait. What? There is no chapter 
15. What have we missed? This is in keep- 
ing with a reference in chapter five made 
to a nonexistent figure. 

A habit a programmer should develop 
early on is to write good, accurate, and 
meaningful documentation. The author 
seems to think that simply keeping list- 
ings of a program, as it is developed, con- 
stitutes documentation. There is no real 
emphasis on variable listings, descrip- 
tions of what variables represent, how 
program segments or subroutines work, 
either in the form of REMarks or with ac- 
companying written text. 

A sore point with a lot of cornputerists 
is the use of multiple-statement lines. The 



TRS-80 Interfacing Book 2 
Jonathan A. Titus, 
Christopher A. Titus, 
and David G. Larsen 
IHoward W. Sams 
Indianapolis, IN 
Softcover, 254 pp. 
$9.95 

by George D. Dooley 

This book, written by the Blacksburg 
Group, is the second volume of a ser- 
ies on interfacing the TRS-80. The first vol- 
ume dealt with the signals available on 
the TRS-80 and software commands used 
to control I/O devices. Italsodealtwiththe 
construction of simple I/O ports, address 
decoders and interfacing A/D and D/A 
converters.Thesecond volume deals with 
more advanced and sophisticated inter- 
facing techniques, such as data acquisi- 
tion, signal processing, remotecontrol, in- 
terrupts, and using D/A converters for 
graphics. 

The first chapter is dedicated to the in- 
terface circuitry required to use the micro- 
computer to drive devices such as lamps 
and ac motors. This chapter includes a 
thorough discussion of open-collecter 
type integrated circuits that can drive 
small loads. The rest of the chapter deals 
with controlling devices that are powered 
by the ac line. It covers the theory of the 
triac, the optical isolator (used to electric- 



ally isolate the microcomputer from the 
ac line) and the solid state relay. All dis- 
cussions are clearly illustrated by ample 
use of diagrams and by design examples 
using common integrated circuits. 

Chapter 2 explains how to use the 
TRS-80 to generate and measure a signal 
that represents a physical measurement. 
To generate an external voltage a D/A con- 
verter is required. This chapter covers the 
construction and design considerations 
of interfaces using eight and ten-bit D/A 
converters. The discussion of D/A conver- 
sion continues, carrying into their applica- 
tion in computer graphics. The graphics 
are generated on an X-Y plotter, printing 
out data or forming patterns such as the 
sine wave. 

An A/D converter is used to measure an 
analog voltage and use that value in a 
computer program. The interfacing re- 
quirements for an A/D converter are more 
complex than for a D/A converter and this 
section details the control circuitry well. 
Two data acquisition design projects are 
described. One measures the intensity of 
a light bulb as a function of its distance 
from a photocell, and the other measures 
ambient temperature from a solid state 
temperature sensing element. 

These data acquisition projects lead in- 
to a discussion of the more practical as- 
pects of the subject. Anyone who has ever 
operated a television nearTRS-80 is aware 
ot the noise it generates. The noise can be 



only advantage I see is memory conserva- 
tion, which is rarely a problem for a begin- 
ning programmer. The author uses multi- 
ple-statement lines and encourages their 
use if the machine has a good editor. But 
he fails to point out difficulties with a line, 
such as: 

120 IF A = 5 THEN 40: GOTO 10 

Which is taken from an example in the 
text. Under what condition is "GOTO 10" 
ever executed on the TRS-80? Never, but 
this fact is not pointed out. 

In a text designed for a novice program- 
mer it would seem that the concept of an 
algorithm should be introduced. The word 
is never used. This seems to be a disser- 
vice to the new programmer. What better 
time to introduce the idea? 

In summary, I cannot recommend this 
book to anyone with even a moderate 
amount of programming experience. The 
book is inadequate in its coverage and 
suffers from poor editing. The novice 
could, however, learn enough from mak- 
ing corrections to programs to justify the 
expense.B 




superimposed on the signal we are trying 
to measure and induce serious errors. The 
effect of the imposed noise can be 
countered by techniques such as data 
averaging and digital filtering. Examples 
of both techniques are given. 

Serial communication and remote con- 
trol are the subject of chapter four. In some 
applications it's necessary to control 
events or to measure signals at a location 
removed from the computer. The problems 
that arise from using long lengths of ex- 
pensive multiconductor cable to connect 
to the data acquisition unit, and the degra- 
dation of analog signals (resulting from 
the extended distance), can be solved by 
using a serial data link to a remote I/O de- 
vice. This project, along with a detailed 
study of a serial data transmission, can be 
used as a basis for designing a home 
solar control system. 
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GAME BREAKTHROUGH: 



THE STICK 80 




TO 
TRS-80 



E' FEATURES THE FAMOUS ATARI JOYSTICK. 
gf WORKS WITH ANY LEVEL 2 AND DISK SYSTEMS, 
a' PLUGS DIRECTLY INTO KB, DRE/I( expansion PORT). 
la INCLUDES SIMPLE. DETAILED INSTRUCTIONS TO MAKE 

JOYSTICK VERSIONS OF MOST ACTION GAMES, 
gf COMPATIBLE WITH ANY OTHER TRS-80 ACCESSORIES. 
gf FULLY ASSEMBLED AND TESTED. READY TO PLUG IN AND 

ENJOY. 
^ FUN TO EXPERIMENT WITH IN BASIC; SIMPLY USE INP{d). 
gf 90 DAY PART AND LABOR WARRANTY. 



UNCONDITIONAL MONEY BACK GUARANTEEJry your STICK-80 for 14 days. If for any reason you are 
not delighted with it, return it for a prompt and courteous refund (including shipping and handling). 
PRICE INCLUDES ATARIJOYSTICK + ALPHA INTERFACE + DETAILED INSTRUCTIONS + DEMO 
PROGRAM .ONLY $39.95 

)IG FIVE SOFTWARE SUPER FAST MACHINE LANGUAGE ACTION GAMES 
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and tVf AH right' You «a don* it' You va clural >wbv *II Tht ttlMoa))' Bu< m^ 
B l^(! tauctr with Iht list> dang' QuKk' You must dtitroy twn fiti bacWM Ari 
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SPECIAL 

INTRODUCTORY OFFER: 



Order the STICK-80 with one or more 
games and choose one: 

•FREE ALPHA GREEN SCREEN 

OR 
>FREE MAGIC ARTIST PROGRAM 
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,«und' ♦♦♦..i.t^*^^*** COSMIC FIGHTER' 
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JIN ADDITION YOU MAY: 

* ORDER 2 GAMES AND TAKE 10% .„ ,. 

X ORDER 3 GAMES AND TAKE 1 5% *""" 

AN gMFiM m% wnllwi m mich^it lingutg* mm) tuppliwl on CMsMIt 

EACH GAME IS AVAILABLE IN 2 VERSIONS 
SIDE 1:LEVELII16K FOR MODEL 1 
SIDE 2: LEVEL II 16K FOR MODEL 3 $15.95 
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Q/SIDE 1 : DISK 32K FOR MODEL 1 
DVSIDE 2: LEVEL II 16K FOR MODEL 1 
THE DISK VERSION SAVES THE HIGH 
SCORES ON DISK 517.95 

• ALL THESE NEW JOYSTICK GAMES WILL ALSO WORK 
USING THE KEYBOARD WITHOUT ANY MOOIFtCATlONS, 

GOOD MEWS: If you already have a non- joystick 
version ot these BIG FIVE SOFTWARE games, 
send Ihe original tape{s) with your STICK-80 
order + $3 per game. W/e will send you a new 
Joystick version of your game{s). 

ALSO AVAILABLE DOUBLE-STICK 80: 2 ATARI "" 
JOYSTICKS + ALPHA DUALINTERFACE + 
INSTRUCTIONS + DEMO PROGRAM: 559.95 



ALPHA Product Co. 



85-71 79 St WOODHAVEN NY 11421 



^5St ADD S? 50 PfH OHOER fW SHIPPING «N0 HANDLING 

All OROEBS SMIPPEO FtRST ClASS MAH 
Wt ACCEPT W'SA MASTER CHAtlH CHECKS MO 
COD «DDS;O0EXTR« ^1^ 

QUANTITY DISCOUNTS AVAIIABIE ^ffJ^K 
HI HfSIOENTSADOSAlfS I»I ^S" 



phone: (212) 296 5916 
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Interrupts are the subject of ttie final 
chapter. Since the operation of interrupts 
can be confusing to a novice, visual aids 
illustrate the basic concepts of how a 
computer acts when it has been interrupt- 
ed. Luckily, the text is full of useful dia- 
grams. It's difficult to discuss interrupts 
while limiting the discussion to only Levei 
II BASIC. The authors have developed BA- 
SIC language programs that POKE ma- 
chine language commands into memory 
and then execute the program by cailing it 
from the BASIC program, to illustrate cer- 
tain principles of interrupt operation. 

Clear and Unpretentious 

Apart from the subject matter itself, 
what I enjoyed most about this book is its 
style. The writing style, like other books in 
the Blacksburg series, is clear and unpre- 



tentious. Liberal use of diagrams, sample 
programs and tables make complicated 
concepts understandable. The authors 
describe useful interfacing projects that 
are general enough to be used for a wide 
variety of applications. 

The only thing I didn't like about the 
book Is the lack of documentation for 
some of the larger programs. Programs of 
only a few lines are not difficult to figure 
out, but a few well placed comments and a 
description of variables would sure help 
reader understanding of the larger pro- 
grams. 

Over all, my praises of this book far out- 
number my criticisms. The authors have 
tackled a complex subject and have pro- 
duced a book that is an excellent addition 
to the library of anyone who is interested 
in using the TRS-80 as a control system. ■ 



Pascal 

David L. Heiserman 

Tab Books, Inc. 

Blue Ridge Summit, PA 

Softcover, 350 pp. 

$9.95 

by William L Colsher 

Pascal has recently become the num- 
ber one buzz word among program- 
mers just about everywhere. It is called 
the hottest thing since 16K RAM, and it's 
also said to be the language of the future. 

Unfortunately, most of us haven't been 
able to determine whether any of the 
stories are true: the cost of admission has 
been far too high. First, there is the 48K 
two disk machine you need to run it, and 
then the $150-plus price of a compiler. 
Pretty steep for an experiment! 

Not long ago (1978) a couple of grad stu- 
dents at the University of Illinois devel- 
oped a Pascal compiler called Tiny Pas- 
cal. Then in 1979, a company called Super- 
soft brought out a version of that compiler 
for the world's most popular micro— the 
TRS-80. Best of all, that compiler operates 
on a 18K tape-based system, the most 
popular TRS-80 configuration. Today that 
compiler Is available from Radio Shack 
(and elsewhere) for only $19.95! 

Programmer's Guide 

Heiserman has written the definitive 
programmer's and user's guide to Tiny 
Pascal. Three hundred and fifty pages of 
examples and exercises take you from 
loading the tape to writing sophisticated 
programs, in 16 easy chapters. 

The first two chapters of Pascal are es- 
sential introductory material. How to load 



the tape and use the various editing fea- 
tures are covered in enough detail to en- 
able the first time user to sit down and get 
a program running within a few minutes. 
Saving a program on tape, compiling it 
(including the use of several compiler 
options and what to do about a number of 
errors) are all explaimed clearly and suc- 
cinctly. 

None of the pedantry that seems to in- 
fect many books on Pascal is apparent in 
this book. No "Integration by Simpson's 
Rule" here; just practical, hobbyist stuff 
like dice rolling and drawing pictures on 
the screen. 

Chapter three introduces Pascal syntax 
diagrams. Learning to read these dia- 
grams is critical to learning Pascal well. 
Once they are mastered you'll find it a sim- 
ple matter to actually write programs in 
Pascal. After introducing the syntax dia- 
grams, Heiserman dives Into I/O with the 
Write statement. Chapter four goes into 
more detail on the many things that can 
be done using Write, including graphics 
and screen control. The idea of string and 
integer constants is also introduced 
through their use in the many examples of 
Write that are given. 

Introducing Variables 

The next two chapters, five and six, in- 
troduce variables and what to do with 
them. Special care is taken not to confuse 
BASIC programmers with the difference 
between an equal sign ( = ) and the Pascal 
assignment statement (: =). 

IF.. .THEN.. .ELSE Is covered in de- 
tail along with the Boolean operators 
AND, OR, and NOT. As is the case 
throughout this book, examples are clear 
and easy to understand; in virtually every 
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case there are complete programs you 
can enter and check out for yourself. Fi- 
nally, syntax diagrams for all parts of Tiny 
Pascal are presented. 

Chapters seven and eight present the 
looping features of Tiny Pascal: REPEAT- 
UNTIL, WHILE-DO, and FOR-DO. GOTO 
is not included in the list; the designers of 
Tiny Pascal refused to make any conces- 
sion leading to unstructured program- 
ming and design. Once more, the when 
and why of using these statements are de- 
veloped with clear examples that are 
meant to be typed in and run, not just 
read. 

Chapter nine presents "A Miscellaney 
of Pascal. . . "; a collection of most of the 
features you'll need when writing pro- 
grams. The most important statement dis- 
cussed here is the CASE-OF which is 
similar to BASIC'S ON-GOTO. CASE-OF 
gives you the ability to do various things 
based on the value of some expression. 
PLOT and INKEY, for graphics and "on- 
the-fly" keyboard input, are also intro- 
duced. 

Chapter 10 completes the introduction 
of Tiny Pascal features with procedures, 
functions and arrays. This chapter begins 
to use more sophisticated programs as 
examples. An animation of an inchworm 
is used as an example of the use of pro- 
cedures with a parameter. 

The next three chapters of Pasca/ con- 
sist of the practical uses of the language 
introduced in the first ten. Dice games, 
roulette, a slot machine, etc. 

Chapter 14 is a good introduction to 
structured design and programming. 
Numerous examples show the develop- 
ment of several programs from idea to 
completion. A long program called Screw- 
ball Golf finishes off the chapter— 15 
pages of development and explanation! 

Chapter 1 5 really puts it all together in a 
long game called Space Ranger. Detailed 
explanations are given of the techniques 
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used, including the reasons for structur- 
ing the program as it Is. This makes the 
chapter a iong one, but the 25 pages have 
a lot of detail to cover, not to mention ex- 
plaining how to play the game. 

Putting Ideas Into Familiar Light 

The final chapter of Pascal is one that I 
would have welcomed when learning the 
language: translating BASIC into Pascal. 
Each statement is covered in good detail, 
but because of the highly structured na- 
ture of Pascal and the unstructured na- 
ture of most BASIC programs, there is 



really no easy way to make direct transla- 
tions. Nevertheless, the chapter is useful 
because It helps the beginner put things 
Into a more familiar light. 

The appendix contains tables of cursor 
control codes, TRS-80 graphics charac- 
ters, and the Pascal syntax diagrams. For 
some reason, a list of errors has been om- 
itted, though one is mentioned early in the 
book, a minor probiem considering the 
overall excellence of the book. 

Pascal is, as I said, an excellent book, 
especially for the beginner. For less than 



$30 (the cost of this book plus Tiny Pascal) 
anyone with a TRS-80 can begin to learn 
the techniques of structured program- 
ming. However, I would like to voice one 
complaint. Many of the longer programs 
have evidently been typeset directly from 
computer printouts, although most of the 
examples are not. This can occasionally 
cause some ludicrous errors, such as 
spelling tomb "toumb". 

If you are Interested In Pascal program- 
ming get this book, the Radio Shack tape 
and get to work. It'll be the best 30 bucks 
you've spent on your computer. ■ 



Boss 

Soft Sector Marketing Inc. ^ 

Garden City, Ml 

$29.95 

by Bruce Douglass 

Boss, a utility program for the TRS-80, 
has several features useful in writing 
and debugging BASIC programs. They 
are: improved trace capability, single 
stepping through BASIC programs, re- 
viewing variables, stacking programs, set- 
ting breakpoints and complete relocat- 
ability of the utility itself. Each of these 
capabilities will be dealt with separately. 

The first thing you should know about 
Boss is that it comes on cassette along 
with a separate lowercase driver (if you 
have the modification) and manual. The 
program may be loaded into memory, relo- 
cated and saved on tape or disk. It runs in 
Level II BASIC or Disk BASIC. 

Generally, when using Boss, you don't 
need to worry about it interfering with 
other machine language programs you 
may have In memory. When it loads, it will 
prompt you for the lowest address you 
wish to protect, and will relocate itself 
beneath that address. It also gives you the 
proper response to the memory size ques- 
tion. 

I use Boss with a full-screen text editor 
for BASIC called XBE. In my 48K disk sys- 
tem, XBE loads in from 60416 and up. 
Boss loads in underneath and informs me 
to set memory size to 57571. 

The nice thing is that I can keep both in 
memory, and both are operable. The pro- 
grams will run well except when I use the 
command to review my variables; some- 
how that seems to eat the XBE program 
above Boss. The @ key becomes the con- 
trol key for Boss (you must use<Shlft> 
for the normal @, but <Shlft> @ re- 
mains the same). By pressing @ and a 
character you may access various Boss 
functions. The manual refers to @ as 



<CON>, and 1 will use that notation here. 

Trace Function 

The first capability to be mentioned is 
the improved Trace functon. By pressing 
<CON> and 1 at the same time, you turn 
the Trace off. <CON> 2 turns the Trace on 
and <CON> sends the Trace to a printer. 

If you have ever tried to use the Level II 
Trace function, you noticed that it is hard 
to follow and destroys the display. The 
Boss Trace sets up the Trace so that it is 
only displayed In four rows in the right- 
hand corner. A right arrow moves to the 
row containing the executing line number. 
If the line is multi-statement, the line 
number is displayed only once during the 
execution of that line. 

Sending Trace to the printer results in 
the line numbers being printed out along a 
horizontal line. The printer will continue to 
print the Trace until the program ends, the 
Trace is redirected, or turned off. 

Boss is one of the most powerful tools I 
can use. It allows me to single step 
through the routines In the program and 
review just what the variables are doing. 

To single step through BASIC, the fol- 
lowing functions are available: 

• <CON> 4 to turn single step off. 

• <CON> 5 to single step to the end of 
line. 

• <CON> 6 to single step each instruc- 
tion. 

• <CON> 7 to single step with a vari- 
able time delay. 

All may be used in conjuntion with 
Trace functions as well. 

<CON> 5 single steps each line it ex- 
ecutes. That Is, when it begins to execute 
the next line, it will execute the entire line, 
and pause at the end of that line. Pressing 
<Space> will cause the next line to be ex- 
ecuted. 

<CON> 6 will pause at each statement 
terminator (":"). Otherwise it Is similar to 
<CON> 5. 

<CON> 7 will cause a time delay before 



executing the next line. The time delay 
default value is about one-fourth of a se- 
cond. This single step mode may also be 
used in conjunction with single stepping 
by statement (rather than by line) and 
pressing "<C0N>7 <C0N>6." The time 
delay may be increased or decreased with 
<CON> <Up Arrow> or <CON> <Down 
Arrow>. 

You may use as many breakpoints in 
the program as you like by inserting the 
line POKE 16667,5 wherever you need to 
break. You may Include most of the Boss 
commands as POKE statements, so that 
your program will run normally until It 
reaches these commands, whereupon the 
Boss functions it calls for (for example, 
single stepping) will begin to execute. 
Thus you needn't worry about doing every- 
thing In Command mode. 

The next useful capability is that of re- 
viewing variables. <CON> N allows you to 
select the variables you wish to review, 
while <CON> actually displays them. 
<CON> N may be invoked at any time. 
Upon the Invocation of <CON> N, you will 
be asked for maximum variable length, 
followed by the variables to be reviewed. 
The number of variables you may review Is 
inversely proportional to the maximum 
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variable name length. This is explained in 
the manual. <Break> terminates the func- 
tion. 

Any time during program execution, 
<CON> may be invoked and the first 
variable will be displayed. From here, you 
may return to the program execution 
(Vi'here it left off) or select another variable 
to be displayed by pressing <BREAK> or 
C, respectively. Pressing any other key 
vj'\\\ cause the next variable (previously 
selected) to be displayed. As previously 
mentioned, use of this Boss function eats 
the program residing above it in high 
memory despite the claims by the manual 
that the other programs are protected. 
When I attempt to jump to the latter pro- 
gram with a SYSTEM ? and /60416, 1 get a 
reboot. I have taken to doing my text 
editing before using the <CON> N com- 
mand. 

In my opinion, the reviewing capability, 
together with Trace and Single Step make 
up the important functions of the pro- 
gram. You may stack BASIC programs up 
in memory and PUSH and POP them 
around as you like. You are, of course, 
limited by available RAM. In a disk system 
this is of little consequence. When you 
download a BASIC program from memory. 



Command 


Function 


<CON> 1 


Trace off 


<CON> 2 


Trace on (video) 


<C0N>3 


Trace on (printer) 


<C0N> 4 


Single Step (SS) off 


<CON> 5 


SB to end of line 


<C0N>6 


SS instruction 


<CGN> 7 


SS with Hme delay 


<CON>up 


slow execution (time delay) 


<CON>down 


speed execution (time delay) 


<CON> N 


select variables lor review 


<CON> O 


review variables 


<G0N> - 


Save BASIC program in higfi memory 




(pusti) 


<C0N> : 


Recall last saved BASIC program from 




fiigh memory 


<CON>a 


Append last saved program to current 




pfogrsm 


<CON> («) 


Recall next.io-iasl saved program 




Fig. 1. 



it will destroy the current one in memory, 
SO you also may switch the curren tone 
with the one in high memory. Memory size 
is adjusted automatically, so that the pro- 
grams won't get eaten by BASIC variables 
and stack useage. 

You do have the capability of append- 
ing programs, either the current program 



with the last saved program or the current 
program with the next-to-last saved pro- 
gram. Line sequence must be correct for 
the appending to work properly. That is, 
the saved program line numbers should 
all be higher than the current program line 
numbers. Again, with a disk system and 
the ability to merge programs this is not 
particularly useful, but for Level II users it 
is a very handy ability to have. Thus their 
favorite routines {such as matrix inver- 
sion, or line printer routines) may be 
stored on tape with high line numbers and 
appended to the current program. If you 
append several routines, make sure you 
do them in the right line number se- 
quence! 

DOS users should be aware that re- 
boots are an inconvenience here, as 
BASIC * will not recover the utility. 

For the sake of completeness. See Fig. 
1 for a list of the commands available in 
Boss. 

In conclusion, this utility is a powerful 
debugging tool. Of importance to Level II 
users is the ability to append programs, 
even though a Merge would be more use- 
ful. This program is very useful for anyone 
who would like to spend some time away 
from program debugging. ■ 



Discat 

Model I 32K/46K 
Myatt & Smith 
Tustin, CA 
$50 

by Robert C. Daigh 

When a little voice in your diskette 
storage box whispers "One of these 
days we've really got to get organized!", 
don't get upset— help is on the way. 

If you are like most of us, you know 
you've saved a wonderful little program in 
there somewhere. And you need it right 
now, . .if only you could find it. 

Bill Myattof Myatt and Smith solved his 
frustrations, and ours too, with a machine 
language program named Discat. The 
Disk Catalog Index Program is for the 
TRS-80 Model I, with a Model HI version 
soon to be released. The program is being 
marketed through Racet Computes. 

Discat will load an index file of your pro- 




software 



grams in about twenty seconds, and then 
tell you where to find any one of some 
17,000 different programs by displaying 
the disk number and indicating which side 
the program is on. (For a 32K system, 
reduce that number to around 7,200 pro- 
grams.) The complete program listing for 
either side of any disk in your index can be 
displayed in answer to a Disk Number 
query. 

The program automatically keeps track 
of the free space available and, on com- 
mand, will display a listing of free grans 
on each disk in the index. You no longer 
need to search for free space to dump a 
program in memory. 

For those of us who really mean it when 
we say organized, Discat permits not one, 
but nine different index files, each of 
which can hold 800 program locations. 
Now you can have separate index files for 
business, games, utilities, data base, and 
so on. 

The program requires an expansion in- 
terface, a minimum of 32K of memory and 
at least one disk drive. Up to four drives 
are supported. For best utilization of the 
program capabilities, a parallel printer 
should be part of the system. 

Getting Started 

Detailed instructions describe each 
step involved in transferring Discat from 



its distribution diskette to merge with 
your DOS system diskette under TRSDOS, 
NEWDOS-f, NEWDOS80 or VTOS. The 
machine language program is called from 
DOS in the usual manner. During the short 
initialization period the program will 
search all active disk drives, loading the 
names of up to nine index files. 

Each segment of the program is menu- 
driven. The main menu has the following 
options: 

• Display catalog of indexes 

• Program / disk search menu 

• Display free disk space 

• Create (or update) index 

• Display the current index 

• Print the current index 

• Sort the current index 

• Editing menu 

• Special utilities 

• Save the current index to disk 

Setting up your own catalog of indexes 
is very simple; the program does all the 
tedious work for you. Two optional 
systems are discussed. If, for example, 
you choose to arrange all your utility pro- 
grams onto one group of diskettes, the 
documentation suggests that you assign a 
diskette number in the 500-599 series for 
utility. Then you have only to insert each 
disk into the drive you have selected as 
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Orange micro 



a^ (XWCfO "THE COMPUTER PRINTER 

je mH.IW SPECIALISTS" 

UP TO 25% DISCOUNTS! — SAME DA V SHIPMENT! 



^•kavft i^v^.^o.k ii^^^ ^«*«« / RADIOSHACK v 

CENTRONICS 739 (lne printer iv) 

With Graphics and 

Word Processing Print Quality 




• 18 X 9 dot matrix, suitable lor word 
processing • Underlirjng ■ proponional 
spacing • nghl margin justificalion • serif 
typeface • 8&100 CPS • SVj - Pjn 
Feed'Fnction feed • Reverse Platen • 
80M 32 columns • Top ol lorm 



CENTRONICS 739-1 (Parallel 
CENTRONICS 739-3 (Serial) 



ANADEX 






Dot Graphics. Wide Carriage 



• 11x9 del matrix, lower case descen- 
ders • Dot resolution graphics • Bi- 
directional, logic seeking • Up to 2CX) 
CPS • RS 232 Serial 8. Parallel • Forms 
control ■ X-ON.'X-OFF • Up to 6 pad 
copy 



ANADEX 9S01 



(Ust$1650) S1350 



AXIOM 



l-^'l 




Dot Graphics. Low Price 



• Dot addressable graphics • 70 CPS 

• 12 characters per inch • 80 columns 

• adjustable tractors • 3 pan copies 

• Manufactured bv SieKo • Parallel 
RS232 serial, lEEE-dSe interfaces 
available 




AXIOM GP80M (L.St $399) $349 

IDS PAPER TIGERS 

Dot Resolution Graphics, quality print, speed 



• 7 wire printhead (445), 9 wire printhead 
(460) with lower case descenders • Over 
150 CPS " bi-directional, logic seehiing 
(460) • 8 character sizes; 80-132 columns 
■ Adjustable tractors • High-resolution dot 
graphics • Proponional spacing & text 
justification (460). 

IDS 4450 7 wlr« printhead, graphics . , , , (List $895) $ 750 

IDS460G 9 wire printhead, graphics (List $1394) $1150 

IDS 560G 9 wire, wide carnage, graphics . (List $1794) $1400 



CALL FOR FREE CATALOG 

(800) 854-8275 

CA,AK, HI (714) 630-3322 

At Orange Micro, we try to fit the right printer to your application. 
Call our printer specialists tor Iree consultation 



EPSON MX80/MX70 



Low- Priced 
Professional Print Quality 

5^-^^ ■ 9x9dot rnatrlx • Lower case descenders 

\» "90 CPS • Bidirectional, Logic seeking • 

40. 66, 80, 132 columns per line • 64 special 
graphic characters: TRS-80 Compatible • 
Forms handling • Multi-pass printing • Ad- 
justable tractors 

We also carry a full line 
of Epson Accessories. 

EPSON MX80 (Li5t$645) $Call 

EPSON MX 70 Dot graphics, 5x7 malrU (List $450) $Call 

EPSON MX100 wide carnage |ListS995l $Call 

GRAPPLER^'^ Apple graphics parallel 

interface and cable . $165 

MX80/70 FRICTION FEED KIT 

Uses installable kit for single sheets 

Easy 15 minute Installation. $ 75 



ANACOM 

Low Cost. High Speed, Wide Carriage 

"9x9 dot matrix • Lower case descenders • Wide carnage 
Adjustable tractors to 16" • 150 CPS, Bidirectional, Logic Seeking 




NEC SPINWRITER 

High Speed Letter Quality 

• 55 CPS ■ Typewriter quality • Biaiieciional • Plolt-ng 
ponional spacing 

5510-5RO, Serial, w/tractofs (Li5tS2995) $2675 

5530-5 RO. Parallel, w/lractors (LislS2970) $2650 



TELEVIDEO CRT'S 

AT DISCOUNT PRICES! 





QUANTITY PRICINQ AVAILABLt 



TVI910 

TVI912C 
TV1920C 
TVI950 



} 



Please Call Toll Free 
Prices are too low to 
advertise 



PRINTERS 

MALIBU leSwidecafnage graphics .etlef gualily lList$2495} $1975 
QUME SMS lyo^'wriler Quality (List $2905* $ 2559 

VISTA-C. ITOH Starwnter, letter quality (List S1895i $ Call 

INTERFACE EQUIPMENT 

EPSON ACCESSORIES $ Call 

ORANGE INTERFACE lorAppleil 

parallel mteftace board S cable $ 110 

MICROTRONICS Alan oarailei interface S 69 

TRS-BO CABLES ID keyboa-d Of Eip mlenace ' Call 

NOVATION DC AT direct connect moaem S Call 



RETAIL PRINTER STORES: 

3150 E I^Palma.itl. Anaheim, CA 

13604 Ventura Bl . Stierman Oaks. CA 

Store Hours M-F 10* Sat. 10-4 
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Phono orders WELCOME: same 
day shipment. Free use o' VISA & 
MASTERCARD. Personal Checks 
require 2 weeks lo clear Manu- 
facturer's warranty included on ad 
equipment Prices subiecl to 
revision. 



Ofonge 

fniCfO. Inc. 



3150 E La Palma. Suite I 
Anaheim, C A 92806 
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update drive. Respond to the query with 
the diskette number and F {front) or B 
(back) side and the diskette data is read 
automatically. The screen now displays 
disk number, side, free grans, and the list- 
ing of each program with name, exten- 
sions and size in grans. At this point you 
may choose (Y/N) to add this entire disk- 
ette directory to the current index. 

The authors have thoughtfully provided 
a much simpler system for you program- 
mers w^ho are a little lazy. You do not have 
to reorganize your entire disk inventory 
just to fit the program. (Who really has 
time^o cull all his utility programs onto 
separate disks?) As each disk directory is 
read and displayed, you may selectively 
add to the current index any program on 
the display. You are asked: 

— > ADD DIRCHECK/CMD TO CURRENT INDEX (Y/N) ? 

Your response is displayed on the 
screen and the next program on that 
diskette scrolls by in sequence. Now you 
can select all your utility programs from 
wherever they may appear on your disk- 
ettes and organize them into a separate 
index. 

Once the diskette identification is 
assigned, it is written to the diskette and 
need not be entered again. \\ can, how- 
ever, be changed under the editing sub- 
menu. When you later prepare an index, 
let's say for games, you will have to insert 
each disk again and select all the game 
programs as they appear for inclusion in- 
to the games index. 

The user is warned that non-standard 
DOS diskettes such as Pascal, Forth, and 
CP/M must not be inserted into the update 
drive. The writing of diskette identification 
might cause irreparable damage to non- 
standard systems. Fear not that these 
disks must lie unwanted and unclassified 
in your collection. Discat allows manual 
entry of the diskette number and all its 
programs into whichever index you may 
choose. 

This is all easier to do than it is to ex- 
plain. On my first trial run I assembled a 
composite index of 529 programs from 
both sides of 32 diskettes. The time went 
by quickly and I enjoyed seeing al! those 
program names I had forgotten I owned. 

Using the Indexes 

Nine separate indexes can be assem- 
bled and saved by the program. Now let's 
find out how to use an index. 

From the main menu, one calls the sort 
sub-menu, then chooses to sort the cur- 
rent index either by program name or by 
disk number. 

A short buzz sound from the expansion 
interface notified me that my 529 pro- 



grams were now sorted; it took less than 
14 seconds, after which I was returned to 
the main menu. Display of the current in- 
dex can be either in streak or page mode. 
Streak provides a scrolling display that 
can be stopped and restarted by touching 
any key. The X key aborts the scroll and 
returns to the main menu. One may select 
to display only those programs with like 
extensions, for example /PCL or /CMD. 

A hardcopy printout of the current file In 
memory can be set for either single col- 
umn or double column format. The user is 
asked to set the number of lines per page; 
each page is numbered and identified by 
index name. The listing includes program 
name and number, diskette number and 
side, and the size of the program in grans. 
Each page lists 110 programs under the 
double column format. 

Probably the most useful routine in 
Discat is the search program. The sub- 
menu lists: 

1— Display Disk Directory 
2— Program Search 
Choice ? 

If <1> is selected, the user is asked for 
diskette number and side, whereupon the 
chosen directory is displayed. Upon key- 
ing the <2> selection from menu, you are 
asked to enter program name and exten- 
sion. Searching by program name does 
not require that the entire name be 
entered. Suppose you wanted to locate 
the program named Termites/BAS. You 
could shorten the program name to Ter- 
mites without the extension and the 
screen would respond with: 
Termltes/BAS 



Termites/CIM 
Termites/CMO 

provided, of course, that your index con- 
tained all three items. 

The search could be broadened by ask- 
ing for Term, in which case the screen will 
respond with all programs beginning with 
the key letters TERM--. The search key 
could be just T, which would display every 
program beginning with the letter T and 
your Termites/BAS would be there in prop- 
er alphabetical order. 

A full editing menu allows deletion of a 
specific program or an entire diskfull of 
program names. 

All sub-menus return the user to the 
main menu where the name of the current 
index is always displayed along with the 
total number of disks and of programs in 
that Index. 

The current index in memory may be 
saved to disk at any time. The program al- 
lows the index to be saved under the cur- 
rent name or under a different name keyed 
in by the user. 

The program satisfies just about every 
need I could envision for a disk file organi- 
zer. It is easy to use, fast, adequately 
documented and capable of handling far 
more information than most TRS-80 users 
will probably need. 

When I discovered how many diskettes 
i could recover just by eliminating duplica- 
tion and recapturing unused space, the 
savings in diskettes nearly equalled the 
price of the program. 

Best of all, though, I know what pro- 
gram material I have and where to find it in 
a hurry. 

At last, I'm organized. ■ 



Siiver-it 

Fuller Software 
Grand Prarie, TX 
$5 

by Paul R. Prescott 

As with most TRS-80 users I was slowly 
being driven crazy by the unreliable 
contacts between the keyboard and the 
expansion interface, Although the well- 
known trick of cleaning the circuit board 
connections with an eraser worked, my 
'80 had reached the point where this was 
necessary before each session! Then a 
small Fuller Software ad caught my eye. 
They promised that a $5 investment in 
Silver-it would put an end to spontaneous 
reboots. Their response was quick, and 
the kit was received within one week. 



Not For the Beginner 

Imagine my surprise when I opened the 
package and found no instructions for 
use. A disclaimer was enclosed that 
warned the purchaser that silver soldering 
is not for the beginner and that computer 
circuits are delicate. To their credit, Fuller 
offers a full refund to anyone who does 
not feel up to the challenge, but I feel this 
warning should be included in the adver- 
tisement. 

The kit consists of a small piece of 
solder wick and several inches of silver 
solder. Being the brave sort, with a lot of 
soldering experience, I pressed on. For 
those of you who might wish to give it a 
try, here's my approach. 

First, you need a 25-watt soldering iron, 
absolute alcohol, and liquid rosin flux. Ab- 
solute alcohol is available at liquor stores 
under the name "Everclear," and is used 
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to clean the contacts. Don't try to substi- 
tute with rubbing alcohol. The rosin flux is 
needed as the solder rod Is flux free. Be 
certain not to use the acid flux that is gen- 
erally used for soldering. 

Place the keyboard face down on a 
clean cloth to avoid marring the keys. 
Remove the six screws from the bottom, 
keeping track of which screws belong in 
which holes, and place the base off to the 
side. Very gently lift the main circuit 
board; you will see spacers separating it 
from the keyboard circuit. Remove the 
spacers without flexing the cable connec- 
ting the two boards, then lift both boards 
out as a unit. Use the alcohol to clean both 
sides of the circuit board contacts and 
allow them to dry. 

Radio Shack saved a few pennies by 
coating the contacts with regular solder 
instead of silver or gold; this solder must 
be removed. Heat each contact with the 
soldering iron while using the solder wick 
to remove the old solder. Be careful not to 
cause a solder bridge between contacts. 



Next, clean the contacts again and im- 
mediately coat the surface with the rosin 

flux. 

Applying the silver solder is relatively 
simple. Start at the outer edge and heat 
the contacts with the Iron. Touch the 
silver solder to the edge, at the same time 
start to move the Iron and the solder 
towards the center of the board. Keep the 
solder just behind the iron in continuous 
contact with the board. When the inner 
edge is reached lift both off together. You 
should achieve an even, shiny coating 
without much trouble. After all the con- 
tacts on both sides have been soldered 
use the alcohol to remove any residual 
flux. 

After checking your work for solder 
bridges or large lumps in the solder track, 
gently place the circuit boards back in the 
keyboard top. Very carefully reinstall the 
plastic separators on the posts and 
reassemble the base. 

The interface procedure is exactly the 



Speak-2-Me-2 
Percom Data Co., Inc. 
Qarland, Texas 
$69.95 

by Edward Louis 

This is a review of the Percom Speak- 
2-Me-2 interface hardware, and the ac- 
companying manual and software, used 
in conjunction with a modified Texas In- 
strument Speak&Spell and a TRS-80 
Model I computer. Although I used a disk 
system with TRSDOS 2.3., the Radio 
Shack Expansion Interface unit and a 
General Electric Terminet 300 printer, 
these additional peripherals are not nec- 
essary to make good use of the hardware. 

A few years ago I was associated with a 
Navy project that made use of a Votrax 
speech synthesizer. Every time I walked 
into the lab and heard the droning voice 
giving voltage and power readings In what 
seemed to be a slightly Swedish accent, I 
had to pause for a moment to realize that 
this was a computer "talking" and not 
some poor lab assistant chained to a set 
of meters. Needless to say, I was intrigued 
by the prospect of having this kind of elec- 
tronic wizardry to experiment with. 

Then an advertisement for a Percom in- 
terface device to work with the Tl 
Speak&Spell caught my eye. It was called 
Speak-2-Me-2 and it sounded like the an- 
swer. 

I took the plunge and bought the 
Speak&Spell and ordered the Speak-2- 
Me-2 unit from Percom. 



The Percom advertisement said that 
the device, when used in conjuction with a 
modified Speak&Spell, could be the voice 
of a computer through the use of a few 
BASIC program lines. It stated that some 
modification of the Speak&Spell was nec- 
essary and that an external power source 
was needed. It also mentioned that either 
an expansion interface or printer cable 
adaptor were required, and that an ad- 
vanced speech driver and games disk was 
available. 

When my package came, I examined 
the contents and found a small printed cir- 
cuit board and a twenty-two page manual. 

Glancing through the material I noticed 
a standard warranty, a release form if I 
were to choose to send the interface and 
the Speak&Spell back to Percom for modi- 
fication (along with $25), and a number of 
warnings. There was also a separate enve- 
lope containing a ribbon cable wth con- 
nectors at both ends. 

As well as this overall package was pre- 
sented, there were two items that con- 
fused me from the start: First, I could not 
tell from the advertisement, the documen- 
tation or any marking on the hardware 
which cable assembly I had. In any case, it 
eventually worked with my expansion in- 
terface. Second, one of the separate 
sheets of warnings and cautions stated 
that under no circumstances would Per- 
com undertake installation of the Speak- 
2-Me-2 interface in a previously tampered- 
with SpeakfiSpell. Within the manual, 
however, I found a statement that sug- 
gested that after one had tried everything 



same. I silver soldered all the edge con- 
nectors on the interface board in hopes of 
avoiding any future problems. The entire 
procedure took about two hours. 

Practice First 

Since reconnecting the computer six 
months ago, I have found no immediate 
problems. Everything still functions 
perfectly, no spontaneous reboots and no 
more eraser cleaning sessions! 

This method, however, is not a cure to 
be applied by anyone not familiar with 
good soldering techniques or aware of the 
delicacy of computer circuits. With the 
keyboard wide open a stray static dis- 
charge could easily zap a chip. It you have 
soldered before but not along edge con- 
nectors, I suggest that you pick up a blank 
board with connectors at Radio Shack 
and practice first. There is more than 
enough silver solder to do this provided 
you don't go overboard. If you have the ex- 
perience, join the fun! My TRS-80 now 
works as reliably as a new unitlH 




and been unable to get the combination of 
devices to work, they could be sent back 

to Percom with an initial repair fee of $15 
and Percom would attempt to correct the 
difficulty. In fact, the statement went on 
to say that they had never found a unit 
that couldn't be repaired satisfactorily. 

Initially I was disappointed because 
there seemed to be a very small amount of 
hardware for $69. 1 eventually realized that 
more than half of what I paid for was the 
knowledge and facility to get to the heart 
of the Speak&Spell and make it work with 
my system. 

The manual stated that if the modifica- 
tion was beyond the buyer's capability or 
if the hardware in the Speak&Spetl was in 
any way different than that depicted in the 
manual, the whole package, including the 
Speak&Spell, could be returned to Percom 
along with $25 for them to do the modifi- 
cation. The other alternative was to send 
Percom's package back and get a full re- 
fund. 

Documentation 

In the main body of the manual, several 
detailed diagrams were found which 
showed a number of different views of the 
circuit board inside the SpeakfiSpell. The 
warning was repeated in the text stating 
that unless the circuit board of the 
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Speak&Spell being modified looked ex- 
actly like the diagrams, the modification 
should not be made. 

An additional page In the manual de- 
scribed a new keying technique for the 
two connectors which connect the Speak- 
2-Me-2 Interface to the Speak&Spell and 
to the computer. My unit did not employ 
the missing pin keying as described, but 
used red paint on the connector and on 
the board to indicate connector polarity. 
This worked well, along with the explicit 
diagrams showing proper ribbon cable 
dres& 

1 have to conclude that the manual is 
quite thorough. The mechanical and elec- 
trical detail was precise and understand- 
able, there are some BASIC programs to 
run on the new system, and an additional 
section contains not only a machine lan- 
guage program and a verbal flow diagram, 
but also some explanation of how this de- 
vice could be Interfaced with other com- 
puters, {although none were specifically 
identified). 

The software in the manual was limited 
to a driver program In the form of a BASIC 
data POKE, a short program producing a 
single sentence (rather humorous but I'll 
let Percom surprise you) and a simple 
game program with part of the interaction 
coming through the SpeakSSpell. 

These programs were easy to type In 
and use, as soon as I realized I was under 
TRSDOS BASIC and had to use DEFUSR 
instead of POKEing the starting address 
of the machine language portion Into the 
locations. The only other problem I had 
with Percom's software was the format 
used. For some reason, the programmer 
decided to use multiple statement lines 
and to place the ; separating them at the 
beginning of each new line. For example: 



10X = 1 TOIOO 
: A=PEEK(X) 
: PRINT A,X 
20 NEXT X 

In my opinion, this is a difficult form to 
edit and doesn't add to clarity. 

Modifying Speak & Spell 

First, there was the mechanical prob- 
lem of opening up the Speak&Spell box 
and getting access to the circuit board on 
both sides. 

Next, the trick was to locate a pattern 
on the printed circuit board Identical with 
that in the diagram. I found this more diffi- 
cult, but I finally thought I had come close 
enough to do the deed. The modification 
required either cutting or unsoldering the 
Integrated circuit leads or cutting the runs 
from those leads to the rest of the board. 



The manual suggested that cutting the 
runs would result In less risk to the chip in 
question. Fortunately, I followed their 
suggestion, as It turned out I made the 
wrong cuts on this first try. 

After making these changes. It was a 
simple matter to solder the two jumper 
wires and the six ribbon cable connec- 
tions as specified. Somehow, when I fin- 
ished things didn't look exactly right, but I 
proceeded to insert the Speak-2-Me-2 In 
the battery compartment and connect the 
external power supply. Before connecting 
the finished product to the computer, I 
turned on the power and found that most 
of the Speak&Spell still worked normally, 
although a few of the letters would not re- 
spond audibly when pressed. 

I proceeded to tie in the computer and 
then typed in the various programs de- 
scribed above and ended up spending an 
entire evening debugging programs and 
trying to figure out why there was no com- 
puter control. 

The next evening, after having thought 
a bit about the problem, I decided 1 had 
been and should take the unit apart again 
to see If I could figure out where I went 
wrong. 

Somewhere during this activity, I hap- 
pened to turn to the end of the manual and 
found an addendum with a circuit diagram 
which exactly matched my unit. 

I had to restore the original condition of 
the circuit board and start over. The differ- 
ence was essentially a 180 degree reversal 



of the chip on the board. Within a few min- 
utes I was ready to try the unit again. 

I turned the power on before tying Into 
the computer. This time nothing at all hap- 
pened. This could be disaster ... or maybe 
the computer had to be in the circuit to 
turn the unit on. 

After connecting to the parallel printer 
connection on the expansion interface 
unit and going over all of my programs, I 
still could get nothing from the unit. 

At this point, I decided to break down 
and haul my old Tektronix 514 oscillo- 
scope up from the depths of the cellar and 
see where things were going awry. I did 
this, but in the process I had removed and 
replaced the connector to the expansion 
interface unit and—you guessed it— the 
SpeakfiSpell started to talk although it 
was mostly R2D2 type noise with only a 
couple recognizable words. 

I had been using a home-brew 10-voit 
supply to run the unit after finding that a 
standard nine-volt battery did not have 
sufficient current capacity. The manual 
suggested using the Radio Shack PN 
274-251 power adapter. I purchased one 
and found It to work very well, with more 
than enough current capacity. 

At this point I had added a useful new 
peripheral to my system and I was ready 
to experiment. Percom offers a separate 
software package to give an expanded vo- 
cabulary of partial words, etc. For myself, 
I much prefer thechallenge of experiment- 
ing on my own.B 



The MIcroConnection 

The Ml era Peripheral Corporation 

Redmond. WA 

$249 

by Eric Keener 

Dial-up systems for the computer hob- 
byist are relatively new. Such a sys- 
tem used to require an expansion inter- 
face, the optional RS-232 board, and then, 
an expensive acoustically coupled mo- 
dem. This adds up to at least $650 just to 
get on-line. 

The MicroPerlpheral Corporation {for- 
merly the Peripheral People) now has the 
MIcroConnection. As a matter of fact, 
they have a whole line of MicroConnec- 
tions, but, I will only deal with the version 
for the Model I TRS-80. This modem is 
FCC accepted, directly connects to the 
phone line, and does not require an expan- 
sion interface or any sort of RS-232 inter- 
face. Forthat matter, it has itsown RS-232 
port for driving a serial printer. Also, its 
RS-232 port provides It with the ability to 



operate as a stand-alone modem. That is, 
you can disconnect the MIcroConnection 
from your TRS-80 and connect a standard 
RS-232 compatible serial terminal (set for 
300 baud) to the serial port on the modem. 
This allows you to connect your terminal 
to the phone lines without your TRS-80. 

The MIcroConnection operates at 300 
baud, but can t)e converted to run at 110 
baud through a simple hardware modifi- 
cation that Is descritwd In the operator's 
manual. The word protocol Is under soft- 
ware control, thus, you set the MIcroCon- 
nection to operate with even, odd, or no 
parity, a 5, 6, 7, or 8-bit word, and 1, 1.5, 
or 2-stop bits. The magic behind this con- 
trol Is an 8251 USART that is used in the 
MIcroConnection. The MIcroConnection 
also provides an input and output to be 
used with your amateur radio equipment 
for ASCII Bell 103 standard teletype. So 
far, though, I have not tried this feature as 
I haven't been able to find any activity us- 
ing the Bell 103 standard (200 cps shift). 

The MIcroConnection comes with a 
dumb terminal program, on cassette. 
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YOUR WAIT IS OVER! 
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The fast, simple, affordable way to step up 
your printing... 



FAST. The PBI" (Programmable Butter Interface) is a 
unique new solution to an age-old problem If you've had 
It wilh waiting for your printer to complete a run so that 
you coutd continue with your work, the PBi is for you Let 
our PBI wait for your print-out so neither you nor your 
computer has to do any waiting The computer doesn't 
wait on the printer and the printer dosn't wait on the 
computer. The PBI increases throughput and saves time 
by entering data while the printer is printing The PBI uses 
none of the host computer's memory and allows linking 
one or more host computers and one or more printers. 



SIMPLE. The PBI is easy to use Simpty plug the 
computer cable to the PBI and the PBI to the printer cable 

AFFORDABLE. The PBI will help you avoid the 
expensive purchase of a high speed printer We ve priced 
the PBI with the user m mind 
Choose From These PBI Models: 

Single Parallel" 

Dual Parallel" 

• Single Parallel and Single Serial (RS-232) 

• Dual Serial 

• Dual Parallel and Dual Serial 




MicroCompahble 



.^252 



P. O. BOX 7624 



ATLANTA, GA. 30357 



PHONE (404) 874-8366 



r'S** Uit ot AOiftrtifft on pap* 306 
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60 MICROCOMPUTING 
ANNOUNCES... 




. . . and saves you hours of typing and aggravation. 

LOAD-SO is a monthly dump of the major program listings in 80 Microcomputing on cassette. 
Publisher Wayne Green tells you more. . . 



"Frankly, after hundreds of hours of 
frustration, I seldom even try to keyboard a 
published program. Even if the magazine 
manages to gel the program typeset correctly 
(which seems rare). I inevitably screw it up 
when I keyboard it. Who needs the aggrava- 
tion? 

"This is why I've started a new series of 
cassettes called Load 80. Each cassette will 
have program dumps of the listings in an 
issue of 80 Microcomputing. These listings 
are direct from the authors and tested by the 
80 staff. All but the very short program 
listings will be on these Load 80 cassettes. 
Thus you will be able to save hours of input- 
ting programs and even more of debugging 
your keyboarding errors. 



"Though the authors of these programs 
will share the royalties from the sale of the 
cassettes, this will not preclude the better 
programs from being issued separately by In- 
stant Software (with royalties) with full 
documentation and associated hoopla. The 
documentation for the Load 80 programs 
will be entirely in 80 Microcomputing. 

"I originally was holding out for "Trash 
Dump" as a name for the cassettes, but cooler 
heads prevailed. If there turns out to be 
enough interest in Load 80, we'll set up a 
monthly subscription arrangement." 

Wayne Green, Publisher 



The LoadW casseire is simply the program listings Ihal app«ar in the arlictes In 80 Microcomputing. II was created to save 
you tt>o time involved in typing in the listings yourselt.Successlultoadinoolttw programs depends on readino the documen- 
tation in lt>e articles. II vou tiave your current rnagaiineat hand whanyoo loK) the cassette, you should have nodllflculty If 
you still have ofoBlems piease return the tape 'or e replacement. 



r 



Svnd in the attached card and you 

will receive the cassette for the major 

programs in this Issue 

If the card is K<"i€, photocop> the 

coupon. 



PlnH nalr rhof ti i*d ^^vritniy npmied or implmJ Ihal Ihii profrun 
tofiMn^ m domnylhiniolKfi ihin u«f v«j typinfl 



n Yes . . . send my LOAD 80 Cassette for only $9.95 
I D Check Enclosed Bill my D AE D MC D VISA 
I NAfvlE . 



ADDRESS 

CITY 



STATE. 



ZIP. 



CARD# 



_ EXPIRE DATE. 



SIGNATURE. 



INTERBANK #. 



Plaase allow 4-d w««ks tor a«iv«rv 

BO Ucfocomputlrx) FXna Street P«i*itx)rough KtH 034SS 

Attn: CMOta L Boudrieou 



n 



aoo7 
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called S60. This program provides rede- 
fined keys to transmit the following sym- 
t)ols: 



Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 
Up-arrow 



1- Escape 

2- Left brace 

3-Rlght brace 

4- Vert lea I broken 

5- Wave 

6 -Back slash 

7 -Back apostrophe 

8- Left bracket 

9-Right bracket 

0-Nofl 



By the way, the up-arrow is your control 
key so you can transmit any other control 
code. The manual provides the addresses 
to change, if you wish, to redefine the 
above special characters. Due to the 
uniqueness of the TRS-80 character gen- 
erator, characters six, eight and nine will 



show up on your screen as different sym- 
bols. If you have the new character gener- 
ator IC In your keyboard, characters five 
through nine will show up different on the 
screen, 

S80 also provides for printing the screen 
on a parallel printer. The command mode 
is accessed using a shift up-arrow. Shift 
up-arrow P turns on the printer and shift 
up-arrow S turns It off. Also, shift up-arrow 
E returns you to Memory Size? and shift 
up-arrow I returns you to the initialization 
routine for setting half or full duplex. 

I did have one problem which I attribute 
to my ignorance of word protocol. Regard- 
ing the changing of parity and word length, 
I tried changing the MicroConnection to 
transmit with even parity. Also, I attempted 
to transmit an eight-bit word. To those of 



MM -t- (Memory Expansion) 

Exatran 

Sunnyvale, CA 

$399 

by Harley Dyk 

Owners of the 16K Level H TRS-80 
Model 1 generally feel that they own 
a cost-effective computer. If you do a lot 
of programming you rapidly learn what 
the OM error means (programs always 
seem to grow and fill or exceed available 
memory). Most of you are not content with 
a cassette-based system and often turn to 
disks: Stringy Floppy, Beta-80, TC-8, etc. 
In either case, more memory and/or a flop- 
py controller is often needed. 

The MM-(- (memory -f interface) 
recently released by Exatron is a quality 
alternative to the Radio Shack expansion 
box and could cost you less depending on 
your situation. 

Standard Features 

The unit is designed to fit under the 
TRS-80 monitor and comes fully assem- 
bled. Standard features are-. 32K of 
memory, built-in power supply, serial 
printer port (RS232-C), real time clock, 
light pen port, parallel printer port (Radio 
Shack/Centronics compatible), and a gen- 
eral parallel port (IBM Model 50 compat- 
ible). A floppy interface was not included 
as a standard feature since the unit was 
designed for TRS-80 owners who need 
more memory but do not own a floppy 
disk. 

A floppy controller and an additional 
32K will be the first options available on a 
second circuit board (which will fit in the 



present chassis). The present power sup- 
ply runs at or under 50 percent capacity 
and will handle the additional load. 

Stringy Floppy owners are being polled 
by Exatron as to their preference regard- 
ing options for the second board. Exatron 
hopes to offer the options in the order of 
preference indicated by the needs of its 
customers. 

Options Under Consideration 

Some of the options under considera- 
tion are: RS232-C serial I/O, hard disk con- 
troller, color graphics, communications 



Size 


17- X 7- X 3" 


Stale 


Assembled only 


Memory 


32 K only 


Floppy Interface 


No (but an option soon) 


Real Time Clock 


Yes (can use with Level III 




Basic) 


Serial I/O 


Printer output only (300 & 600 




baud) 


Parallel Printer Port 


Yes 


Light Pen Port 


Yes 


Bus Extender 


Yes 


On-board power 




supply 


Yes 


Warranty 


1 year/30 day money back 


Dealers 


None, mail-order or order 




through program chairman 




(selected Stringy Floppy 




owners) 


Toll free number 


Yes— 800-538-8559 


Contact 


Exatron 




181 Commercial St. 




Sunnyvale, CA 94086 


Misc. 


Guaranteed to run at 3.55 MHz, 




has niemory bank select circuit 




so can add another 32 K, has 




on board memory- mapped ad- 




dress decoding 



you who don't know, the total of the parity 
bit plus the word bits can only equal eight. 
I tried transmitting nine. Needless to say. 
It didn't work. Once I discovered my error, 
changing the protocol was easy. POKEing 
a 122 Into 17229 produces even parity 
seven word bits, and one stop bit. A 90 pro- 
duces odd parity, seven word bits, and 
one step bit. So far, though, I have not 
found a need for odd parity. 

The MicroConnection provides an easy 
and efficient method of checking into the 
various bulletin boards (Forum-80, ABBS, 
etc.) as well as CompuServe and The 
Source. Also, the Micro Peripheral Corpo- 
ration has a whole line of smart terminal 
programs as well as the other MicroCon- 
nections. It is well worth the investment to 
get into this exciting and interesting facet 
of the computer hobby. ■ 




Fig, 1. Major Features of the MM + 



modem, IBM Model 50 bidirectional inter- 
face (use typewriter keyboard), port FF 
audio output circuit (for sound effects), 
IEEE-488 bus interface, A/D and D/A inter- 
face, multi-port parallel I/O, and a TRIAC/ 
SSR/OPTO- Isolator control interface. 

Unique Features 

The light pen port is a unique feature of 
the MM-K. Most light pens can be used 
with a cassette recorder serving as an 
amplifier, however the port on the MM + is 
more convenient and leaves the recorder 
free. The port was designed for the Photo- 
point light pen by MicroMatrix but should 
work with any light pen that is designed to 
connect to a cassette recorder. 

Exatron offers a speed-up kit for the 
TRS-80 that allows you to run the com- 
puter with a 50 percent or 100 percent in- 
crease in speed. The MM -»■ is guaranteed 
to handle the 100 percent Increase if your 
CPU board and memory will run at the 3.55 
MHz frequency. 

If you have no immediate need for a 
floppy interface and need more memory, 
this unit deserves your consideration. I 
have used my unit for several months with 
no problem, and have subjected it to over- 
night memory tests to confirm its quality. 
It works well with disk alternatives such 
as the Beta-80 and the Stringy Floppy. It 
should satisfy your memory requirements 
for the time and give you many additional, 
useful features.! 
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From p. 8 

tween TRSDOS and 3741 single-density 
IBM-format diskettes. Conversion be- 
tween EBCDIC and ASCII character sets 
is also done. So now, for $249, the Model II 
can become conversant with IBM at the 
disl<ette level. Catalog number is 26-4714. 
Around August 1, we should also be 
shipping two new BiSync Communica- 
tions packages for the Model II. One is a 
3270 package, which allows communica- 



tion with IBM Systems 360/370 and 
30-Series CPU's, or any non-IBM devices 
equipped with BSC 3270. Catalog number 
is 26-471 5, and the price is $995. The other 
BISync package (3780) allows the Model II 
to function as a remote job entry terminal. 
You can select the use of IBM 2770/2780/ 
3780/3741 protocols and communicate 
with IBM System 360/370, 30-Series, IBM 
2780/3780 terminals, DEC PDP-1 1 , VAX-1 1 
or other devices equ Ipped with binary syn- 
chronous communications capabilities. 



(Cat. no. 26-4716, also priced at $995.) For 
all three of these new packages, syn- 
chronous communications are through 
the A serial port on the Model II, and may 
operate at up to 19,200 baud, depending 
on length and type of communication con- 
nection used. Only half-duplex communi- 
cations facilities are required. Installation 
is also required. 

I have some plans for something very in- 
teresting next month. . .if I can do it. See 
you then.B 



j79 ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



The annual New York State Society of 
CPAs accounting show and conference 
was recently held in New York City. This 
show included a series of informative semi- 
nars and an exhibition of accounting-re- 
lated equipment and supplies provided by 
local and national vendors. 

Our firm provided a speaker for one of the 
scheduled seminars. The seminar, "Word 
Processing for the First-Time User", was 
completely filled. Obviously we had picked 
a topic of great interest. 

This Impression was amply confirmed as 
I toured the exhibition hall. It seemed that 
every other exhibit dealt with a computer 
related product or computer system. Ap- 
parently, the skepticism of the past is 
quickly yielding to enthusiasm as practi- 
tioners rush to embrace automated sys- 
tems. 

As I wandered through the exhibits, I 
found the large number of competing sys- 
tems bewildering. Every vendor seemed to 
have the same software packages on dis- 
play—word processors and general ac- 
counting systems. With each vendor tout- 
ing the technical superiority of his or her 
system, I could see how a novice could be- 
come quite confused. 

Whatever the apparent benefits of any 
software/hardware configuration, the novice 
should ask "How many are installed," 
"Where are they installed," and, "What 
users can be contacted". A vague or eva- 
sive answer to any of these questions 
should trigger an abrupt retreat. 

A new computer user should always pick 
hardware and software which have the 
widest distribution. If help is needed, other 
users can be contacted to provide advice. 
There is nothing more comforting than an 



informative talk with someone who has 
been there. 

Business Systems Users Group 

Although '80 owners have a lot of com- 
pany, there Is need for an '80 business sys- 
tems users group. The new COBOL busi- 
ness systems differ significantly from the 
BASIC systems initially offered for the Mod- 
el II. These systems have different file han- 
dling procedures and require the develop- 
ment of custom Interfaces to expedite data 
entry and processing. 

Many users of the new COBOL systems 
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have file problems caused by improper han- 
dling of system diskettes. If a job is not ter- 
minated by returning to the main menu and 
exiting to the operating system, an applica- 
tion file in use could be destroyed. The 
scary thing about this situation is that the 
bad file can then be backed up without any 
indication of error. The unfortunate system 
user finds out about the problem the next 
time the file is required. 

This situation and others occur because 
the COBOL business system users are, in a 
very real way, pioneers. In last month's col- 
umn, I indicated that COBOL is a business 
system language that has been In wide 



commercial use for over 20 years. But until 
very recently, COBOL systems were only 
available on large computers. The COBOL 
system available on the Model il is quite 
new. 

Tandy's decision to implement new Mod- 
el II business software in COBOL was a rea- 
sonable one. There is probably no other lan- 
guage in which more business program- 
ming talent is available. Also with COBOL, 
business system designs can be protected 
since the source code need not be distrib- 
uted with an executable system. 

ISAM 

The COBOL system implemented on the 
Model II gets much of its speed and flexibili- 
ty through the use of ISAM (Indexed Se- 
quential Access Method) file structures. 
This type of file organization stores key 
words used to control access to random da- 
ta files in special sequential files called In- 
dex files. When you want a record, locate 
the key word in the Index file and obtain a 
prointer to the random file. 

Although this method of file access is 
available to the BASIC programmer, use of 
the method requires coding. With the CO- 
BOL system, the COBOL compiler gener- 
ates ISAM coding. The use of ISAM file 
structures is, therefore, transparent to the 
programmer and easily implemented. 

Since the ISAM index must be updated 
after a random file is altered, the disk must 
remain in the computer until a job Is com- 
pletely terminated. Obviously, removing a 
disk in a COBOL system could be danger- 
ous. With this In mind It is a bit difficult to 
understand why Radio Shack is releasing a 
three-disk system which requires disk 
swapping. 



36 • 80 Microcomputing, July 1981 




ow s your 
love life? 



& 



A little dull around the ed 

Routine? Predictable? Boring? Maybe 

all il needs is a little Interlude. Interlude is 

the most stimulating computer game ever conceived. 

It combines a computer interview, an innovative 

programming concept, and a one-of-a-kind manual to 

turn your love life into exciting, adventurous, delicious fun! 



Interlude is: romantic- . . playful. . .outrageous, , , a fanicisv Interlude is: ■ A Bed of Roses (Inter- 
lude #1) ■ Mata Han (Intt^-rlude #49) ■ The Chast? (Interlude #7) ■ Rodeo! (Intedude #71) ■ The King and 1 
(Interlude #60) ■ Some Enchanted Evening (Interlude #84) ■ Caveman Caper (Interlude #82) ■ From Here 
to Ecstasy (Interlude No. 30) ■ Satin Dreams (Interlude #72). 



More than 100 Interludes arc included in the program. Most are described in detail in the accompanying manual. 

but several surprise Interludes are buried in the program awaiting that very « « i-^ 

special time when your interview says you're ready. (When you learn secret W^i^^^^^l« 1#1^> 



- Interlude #99. your love life may never again be the same!) Interiude 
can give you experiences you"]l never forget. Arc you ready for it? 



^287 



The Ultimate Experience. 



INTERLUDE, 10635 Richmond. Houston. Texas 77042, I'm really ready. Send my Interlude today. 

Apple II dt.Kl' TOS-SO (Level 11 I6K)" Poster Available for immediate shipment. 

D Cassette {J18.93) C Cassette ($18.95) ^ 20 x 24 reproduction of 
D Diskette ($21 .95) D Diskette ($21 .95) ^^^ ^^ ^^*"ioul ad copy 
G Diskette— Pascal or DOS 3.3 ($21.95) ($4.95— includes 
Add $1.75 for shipping and handling. shipping charges) 
n MASTERCARD I . VISA All charge customers must sign here — 
Account Na . txpiratioti date — 



Please enclose your check payable to INTERLUDE 
or complete the charge information. 



I 



MasterCard Bank Code 



I CHARGE CUSTOMERS: Oitier by phone totl-freel 1-800-231-5768 E«t. 306 (Texas: 1 800-392-2348 Ext 306) 
I Name _^ — - ^- ^^9^ 

I Address — — — 
City ^ ^ State Sp 

I • Applt; II is a regislered trademark o( Apple Computers. Inc ••TRS-80 is a registered trademark of Radto Shack, a Tandy Co 
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Examination of the directories of the first 
three-disk COBOL system, Accounts Re- 
ceivable, provides the answer. The package 
is suppiied with six diskettes: Three sys- 
tems diskettes containing programs and 
three data diskettes. The first systems disk 
contains 38 programs and six data flies, the 
second disk 14 programs, and the third 27 
programs. 

Obviously this system is too big to fit on a 
single diskette. Why three data diskettes? 
This system is only one element otan order/ 
invoicing system. The other elements— Or- 
der Entry, Sales Analysis, and General Led- 
ger use some of the same files. The Ac- 
counts Receivable system maintains per- 
manent data files and generates data which 
the other systems use for user reports. 

Advantages of the Receivable System 

I am tempted to compare the receivable 

system to the single-disk receivable system 
examined last month. If this is done care- 
lessly the new system hardly seems worth- 
while. The single-disk system, if expanded 
to its maximum capacity of three drives, 
can handle up to 1800 accounts with 4100 
open transactions. The latest system can 
only handle 800 accounts and 2500 open 
items, 

The difference between the two systems 
lies in the analytical data which the new 
system can accommodate. The new system 
increases the number of general ledger ac- 
count distributions from 26 to 100, With this 
quantity of general ledger accounts avail- 
able a more detailed sales analysis is feasi- 
ble. This should give a system user a belter 
handle on sources of gross profit contribu- 
tion by product line. 

The system also accommodates the ac- 
cumulation of standard cost data. With this 
statistic it is Dossible to develop a customer 
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profitability profile, and there is evidence 
that such reports will be developed by the 
sales analysis module. 

The new system accommodates up to 
100 salespeople, A report is available that 
can be used for the preparation of sales per- 
sonnel commission reports. To provide the 
detail required for this report, a special file 
is set up which accommodates up to 6000 
lines of data. 



In short, Tandy has developed a big busi- 
ness receivable system for the small firm. 
Unfortunately the relatively small number 
of accounts that the system can handle will 
limit its application. However, when and if 
the long rumored hard disk subsystem is 
released, the software wii! be ready. 

However, if the system fits your needs 
you get quite a bang for a buck. The system 
has a tab indexed oversized binder. The in- 
dexing divides the documentation into sep- 
arate sections for each processing opera- 
tion. Each section preserves detailed in- 
structions, and devotes particular care to 
specifying the range of acceptable entries 
required for each item on the CRT screen. 

Each section provides sample data to aid 
the novice in learning systems procedures. 
The user is urged to enter this data and 
compare the resulting reports with the sam- 
ple printouts provided. This method is quite 
effective in shortening the learning curve. 

This method also provides an insight into 
the enormous amount of company data 
which must be entered into the system 
before processing can commence. The 
problem becomes obvious on the first data 
screen. In addition to the company name 
and address the user must decide whether 
or not to use profit center accounting. A no 
answer will affect the output from the 
system and the resulting financial reports 
generated by the general ledger system. 

In the second screen, the user must 
decide on the format of the aging report, 
finance charges, and whether or not to use 
preprinted statements, account distribu- 
tions, and sales personnel commissions. 
The answers to some of these questions 
should not be developed while entering 
data on the CRT. 

Before you install a system with this po- 
tential, carefully review company records 
and the current management information 
system. Questions concerning profitabil- 
ity improvement and sales management 
should be considered. If possible, new 
directions should be defined and the order/ 
invoice system used as the means of im- 
plementation. 

In operation, the screens are clear and 
uncluttered. As options are selected, future 
data entry screens are affected. For exam- 
ple, if profit center accounting is not 
selectedon the first screen, only a four-digit 
account number would be allowed on the 
second screen. Consider the interaction of 
the screens carefully when answering each 
question. 

As data files are built, the files are used 
to check subsequent entries for validity. 
When entering a customer'sdata, the sales- 
man number, ship via code, terms code and 
tax code are validity tested. All of the above 
as well as customer safes, cost of sales, 



commission paid and account balance are 

part of the customer master file. 

The system then allows an open file to be 
created. At this point the documentation 
becomes somewhat confusing. The screen 
refers to two amounts which must be en- 
tered for each document. For unexplained 
reasons, the system requires freight 
charges to be separately identified on in- 
voices. Discounts and allowances must al- 
so be segregated on payments. A note of 
explanation from the system designers 
would be helpful at this point. Segregating 
these balances during conversion will be 
quite a job and the option of avoiding this 
messy operation should be available. 

This system, like all Radio Shack receiv- 
able systems, allows both balance forward 
and open item accounts. In addition, it can 
use miscellaneous account numbers. You 
can use these numbers for one-time or oc- 
casional customers. This avoids the trouble 
of setting up a master file for every new 
customer and should permit installation of 
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the system in many firms which ordinarily 
would have too high an account volume to 
be considered candidates. 

Once the files have been created, the 
system user will have a good familiarity 
with operation of the system and the screen 
design. Unfortunately the screens are not 
as informative and easy to use as previous 
Tandy accounting systems. 

Some Differences 

Unlike the General Ledger, the system 
doesn't make full use of cursor control for 
editing. If an error is made and not recog- 
nized until after Enter is pressed, backspac- 
ing the cursor to the previous line is not 
possible. The screen must be completed 
and the offending line number referenced 
for correction. 

In addition, the Tab stop terminates pro- 
cessing and escapes the screen. This dif- 
fers from procedures in other accounting 
packages and Scripsit where F1 and F2 are 
used. This system uses the special function 
keys during data entry and there may be 
some confusion for users of other 'Shack 
products. Regardless, the most regrettable 
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flaw is that these key functions appear only 
in the documentation and are not displayed 
on the screen during processing. 

Post Invoicing Sales Entry 

Although this receivable system is just 
one module in an order-invoice system, it 
does contain a post invoicing sales entry 
routine. II implemented as a stand-alone 
system, it is the normal method for entering 
sales invoices. With this routine, entering 
an invoice is a two-screen operation. First, 
details of the overall invoice are entered. 
This consists of the customer number and 
n other pieces of information required by 
the system. 

If the company requires a departmental 
sales analysis, the routine presents a sec- 
ond screen which allows distribution of the 
items sold to accounts affected. The user 
must enter a valid account number and 
amount. During the data entry procedure, 
the system displays the total amount and 
the amount distributed. Exit from the 
screen is not possible unless the amount 
distributed equals the amount invoiced. 

Clearly this information is best devel- 
oped during the preparation of an invoice. If 
invoice volume is substantial and the in- 
tegrated order entry system is not going to 
be purchased, a custom invoicing program 
should be considered. This will require pur- 
chase of the COBOL development system 
and the accounts receivable source code. 
A COBOL programmer will have to be re- 
tained to do the programming. 

Printing Capabilities 

Much thought has gone into the develop- 



ment of the cash applications module. 
Unlike most other small systems that I have 
reviewed, this system allows printing ot a 
cash applications worksheet. It prints a 
worksheet for all accounts or selected ac- 
counts and provides a convenient means of 
reconciling amounts received with items 
recorded m the accounts receivable ledger. 
Once the worksheet has been completed, it 
will guide the posting process and serve as 
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hard copy documentation of item key-off 
decisions. 

If a worksheet is not used, the system 
allows direct inquiry into the accounts af- 
fected. It the customer account number is 
not known, a search routine locates the 
customer's record. When it locates the 
customer number, the name of the custom 
er, balance method and payment terms on 
tiie are displayed. Because a customer 
number is required for all cash entries, a 
miscellaneous cuslomer number should be 
defined for processing non-receivable col- 
lections 

Cash Application Procedures 

Cash application procedures for open 
item and balance forward accounts differ. 



The system provides additional screens for 
open Item accounts and an automatic cash 
application routine. With this routine, the 
program automatically pays oft as many 
documents as it can, allowing discounts on 
qualifying documents where applicable. If 
the total amount received is not enough to 
cover all documents, then it applies a par- 
tial payment to the final document pro- 
cessed. It cash Is left over, it is listed as an 
open credit. 

All documents entered; cash, invoices, 
debit or credit memos, and adjustments, 
are retained in batch input files. While in 
this state, they can be altered without 
affecting the receivable balances. Each file 
can be printed and compared to input con- 
trols before posting Once they have been 
posted no change is possible. Only a debit 
or credit memo may adjust a posted entry 
Unlike other systems, there is no auto- 
matic purge of keyed-off items. This means 
that it returns all entries affecting an ac- 
count tor printing or display on demand and 
the system will rapidly become choked with 
completed transactions unless a periodic 
purge is run. The user has complete control 
over the purging procedure. First prepare an 
eligibility report. This report details every 
eligible item to be purged. Once he makes 
selection of accounts or dates to be purged, 
the system user can purge the file or purge 
the file and print the deleted records. 

The accounts receivable module is an im- 
pressive bit of work: I am quite eager to see 
the rest of the order-invoice system. I sus- 
pect that in combination they will provide a 
very useful management Information sys- 
tem for progressive business executives. ■ 



SERIES III H ttom Micro-Mainfiames. Haid disk drive(s) in a Model III, or. add to your Model I/Ill. 
SERIES III F. Model III with a controller board (available separately) and operating system which allowsyou to start with or 
move up to, dual-headed or eight-inch floppys. S 

RSGLMODl - $50.00 - Enhancements to Radio Shack General Ledger 1.1 Special feature - Copy ONLY ONE disk for back- 
up securily Ovei 30 added features and options, including a general ledger with beginning balances; current month 
activity ending balances'* Classified balance sheet" Check register" Omit current column in Income statement" Omit 
account numbers on balance sheet and/or income statement ** Previous document name, number of entries/total entries 
permitted for current session, and dollar total of current document are displayed " Use an ■■automatic account number " 
Re-do an entry oi the entire document. 

Supplied as program lines must be (MERGED into the original programs, or. send a disk copy of the original programs and 
ttie modifications will be installed on your diskette - no additional charge. Documentation (apply to purchase) - S5. 

FTDEM080 - SIZ ~ Displays and EXECUTES the NEWDOS/80 Appendix A programs and keyboard entries. A real time 
saver. 32K. 

NEWDOS/80- $135 LOOS -$130 EPSON MX-70/8O/FT - SCall 



AT-80 3827 Dismount Dallas, Texas 75211 (214) 339-0498 



►.^445 



■ See List ol flt/veffisers on page 306 
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Most people just sell disks. 

I sell you a complete system, and then 
I help you make it ^vork. 



It's called support, and it's a rare commodity 

in the microcomputer world- 
It's also one big reason why they call my programs 
"the standard of the industry." 

I'm Irwm Taranto, the one who changed the 
TRS-80' into a serious busmess computer. When you 
buy my TRS-80 systems (or, for that matter, one of 
my own computers that says "Taranto'on it), you 
buy me. 

You buy my experience in making TRS-80 systems 
work in thousands of businesses around the world. 

You buy the corrections, modifications and 
.upgrades I constantly make on my TRS-80 systems. 
And you buy my telephone number You see, most 
of those thousand businesses needed a little help 
getting then systems up and going, and they called. 
We answered all their questions, and talked them 
through their problems. Every time the questions 
got really tough or really unusual, I'd answer them 
myself, on the phone, right then and there. I still do. 
That pays off m two ways. It makes sure you get 
your systems working. It also alerts me to any little 
operating inefficiencies I might have designed into 
my systems. If there are any general business pro- 
grams anywhere in the world, of any kind, that are 
checked out any better than my TRS-80 systems, 
I'd like to know about them 




I turned the TRS-80 into a serious computer. 



The Model I, II and III business systems. 

So far, I have six systems for the Model I, 

at $99 each: 

Accouiitii Payable General Ledger 

Accounts Receivable Payroll 

Invoicing Inventory Control 

For the Cash Journal option on the General Ledger, add $50 

I also have six systems for the Model II: 

General Ledger /Cash Journal $ 299 

Accounts Payable 'Purchase Order 349 

Open Accounts Receivable/Invoicing 349 

Additional for Sales Analysis 100 
Balance Forward Accounts Receivable 399 

Payroll, without Job Costing 299 

Additional for Job Costing 100 

Inventory Control 399 

For the Model in, we offer expanded versions 
of the SIX Model I systems, at $199 each. 

Just call the number below and I'll send you any 
or all of the Model I or Model III systems by return 
mail. If you call about the Model II, I send you 
a questionnaire before I'll send you any systems. 
That lets me individualize the programs to your 
specific applications. 

Why I call them '*systeinsr not "programsr 

There's a one-word answer: interaction. Each 
of the three sets of programs links to the General 
Ledger, and wrherever it's useful, they cross-link 
to each other. For instance, "Sales Analysis" figures 
in a salesman's commission rate, so it links to 
'■payroll." Since it computes profitability withm 
product categories, it links to "Invoicing." 

That's what a system is. And that's one big 
difference between the Taranto TRS-80 busmess 
systems and somebody else's collection of business 
program disks. 

If you like, 1*11 sell you the hardware, too. 

I offer the TRS-80, Model 11, along with selected 
peripherals. If you buy the computer from me. 
you get some extra advantages — hardv/are that's 
absolutely tailored to the programs, plus even 
more hand-holding from Taranto & Associates. 
The equipment won't cost you any more. 

I can sell you a truly serious, completely supported, 
thoroughly proven busmess computer system for 
as little as $8000, hardware and software both. 

There's nothing else like it in the market. Believe 
me, it's a far cry from that collection of program 
disks they're selling down the street. 



^*b 



Taranto 

Si ASSocL^Tt;s.I^c 



"A Iinri"!niirll ti( ttii^ TsmlS' <■'" l-Jlrtl iL>ti 



The Total System Store 

12: Paul Drive, San Rafael CA 94903 

Outside Calilornia. toU free 1800) 227.2868. In Calilornia, (415) 472-2670 

Authonzed dealers thtoughout America. 
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EDUCATION go 

by Earl R. Savage C^\^ 



''Many schools find that 

magazine subscription sales 

are their most significant 

fund-raising activity." 



As computers become an increasingly 
significant part of Ihe daily activities 
in your school, several difficulties are like- 
ly to arise. Ttie first will be getting a suffi- 
cient quantity of TRS-80s to meet tlie 
growing demand— a tough problem in 
most districts. 

The second difficulty is the ever- 
present problem of acquirmg good educa- 
tional programs m one or many subject 
fields. Reviews of programs many times 
are not available resulting all too often in 
a disappointing purchase. An authoring 
program as described in tfie May Educa- 
tion 80 column can help you write your 
own programs with a minimum of effort. 

Sooner or later you will encounter an- 
other difficulty. That is the matter of keep- 
ing track of the level of proficiency 
reached by a growing number ot students. 
When John comes in and asks to use a 
machine, how can you remember how in- 
dependently he can function with it? What 
privileges has he earned? What capabili- 
ties has he demonstrated? 

In a larger school, especially, this can 
be a real problem. You can spend a lot of 
time checking student records — even 
more in checking with other teachers who 
may have taught the students. Your best 
t)et IS to have a system in which each stu- 
dent carries his own record with him. Here 
is a description of one such plan. 

The system consists of a small wallet- 
size identification/record card and several 
programmed instructional courses. It is 
suitable for use with students of any age. 

The front of the student card is shown 
in Fig- 1- There is a place for a name and 
an indication of the class of privileges the 
student has earned. The back of the card 




Fig. 1 The Student Identification/Record 
Card 



lists available courses and provides 
spaces for additional ones. Beside each is 
a place for the date of completion and the 
instructor's initials. 

With this system in place, Ihe student 
simply presents his card when he wishes 
to use the computer (and/or to sign up to 
use it). In addition, the card and its use 
provide a further degree of student moti- 
vation for mastery of the courses. 

You will be interested In the qualifying 
programs used by this particular school 
as listed on the back of its card. Though 
the first four were locally developed, they 
will give you some ideas for your own. Of 
course, you can use any appropriate pro- 
grams. 



The Programs 

The first program course is entitled 
Keyboard and is designed for the young 
beginner. The purpose of this interactive 
sound program, is to familiarize the stu- 
dent with the keyboard. 

Operation is the title of the second pro- 
gram. It, too, has sound and is interactive. 
Operation provides linear instruction in 
using the TRS-80, It covers such topics as 
List, Break, Continue, Reset, and CLOAD. 
Upon successful completion of this 
course, the student should be able to op- 
erate the machine independently. 

The mechanics of writing elementary 
programs are presented in the third 
course, Programming I. The student re- 
ceives instruction in BASIC through the 
examination of several simple programs. 
Among the statements covered are Print. 
Input. IF,.. THEN, and FOR... NEXT, 
There are brief discussions of arithmetic 
functions and variable types- 

The fourth course is Graphics I. It pre- 
sents the rudiments of graphics— both 
the Set and block varieties, A bit of anima- 
tion is thrown in for good measure. 

The final two listed programs are Part I 
and Part II of the Radio Shack Level II 
BASIC Course, 

There you have the list of programs 
which constitute an informal computer lit- 
eracy program in one school- If you have 
another type of system, all of us would 
like to hear about it. 



Micro Funds — Another Source 

This is not really another source of 
microcomputer funds but a source of mi- 
crocomputers themselves. It comes about 
t>ecause of a recent agreement between 
Radio Shack and QSP. (QSP is the organi- 
zation which helps put on school sales of 
magazines.) 

Many schools find that magazine sub- 
scription sales are their most significant 
lund-raising activity, QSP will be offering 
TRS-SOs as premiums for the first time 
This is a chance for you and your students 
to earn computers for your school. 

If your school already has a magazine 
subscription campaign, took into getting 
TRS-SOs as premiums. If magazines sales 
are permitted in your district but your 
school does not have them, check on this 
source of TRS-SOs. You can get details 
from William E. Drake, QSP, Inc., Box 
2003, Ridgefield, CT 06877, 

Math Games 

As you plan your computer purchases 
for the fall, there are two inexpensive, 
unusual and very useful programs you 
should consider. These programs are 
games which help the students develop 
certain mathematical skills while they are 
having fun — painless learning, as it were. 
The presentation methods along with ex- 
cellent graphics assure high student 
motivation. 

The Estimation Game develops number 
sense and estimation skills in whole 
number computations. The student is 
presented problems in an unusual way 
and his estimates are followed through by 
the computer. 

The Distance Game permits the student 
to attempt to locate a hidden point. W'th 
each try, he is given a visual and a 
mathematical hint. The game may be 
played in either two or three dimensions; 
the latter is especially challenging 
because of the mental Imagery required. 

Both programs were developed in 
schools by a mathematics educator. You 
will find that they are several cuts above 
the typical math program. They are avail- 
able from Educational Programs, P.O. Box 
2345, West Lafayette, IN 47906. ■ 
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THE ASSCMBIY LINE 



by William Barden, Jr. 

"The budget for the Space Shuttle isn't 

quite comparable to the budget for 

this column, but this month's topic almost 

didn't mal<e it for much the same reason. . . " 



Wouldn't it be nice to program with- 
out any interface to hardware? I 
know some of you are heavily into number 
crunching, but assembly language pro- 
grammers are exposed to hardware Inter- 
facing from time to time. I rose early re- 
cently to turn on the TV and watch a piece 
of hardware that couldn't get off the 
ground because of an incompatibility be- 
tween hardware and software. The budget 
for the Space Shuttle Isn't quite compar- 
able to the budget for this column, but this 
month's topic almost didn't make it for 
much the same reason— hardware inter- 
facing and a lack of documentation for a 
hardware glitch! 

This month we'll look at that hardware 
interface and the software that drives it. 
You can talk directly to your system disk 
drives with it, bypassing TRSDOS, NEW- 
DOS and LDOS. 

The Shugart 5A-400 

Many of you have Percom, Pertec, Mi- 
cropoiis and other disk drives. However, 
the story starts with Shugart, which has 
become another of those de facto stan- 
dards All disk drives look very much like a 
Shugart SA-400, and we must look at its 
specifications to see what's involved in 
disk I/O, 

Lest you forget, data is arranged in 35, 
40 or 77 tracks, on one or two sides of a 
diskette. In single density format, the 
tracks are divided into ten sectors. Each 
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Fig. 2 SA-400 Signals 



sector can hold 256 bytes of data, so there 
are 256-10 or 2560 bytes per track, or 
2560*35 = 89,600 bytes of data on a 
35-track diskette. 

The diskette spins at 300 revolutions 
per minute, or five revolutions per second. 
Data passes under the disk head at a rate 
of 5-2650 = 12,800 bytes per second A 
byte of data is available every 78 millisec- 
onds (actually, every 64 milliseconds, as 
we shall see). 

Data is arranged serially on each track, 



TRACK 34 (OR 39 OR 76) 




ONE SECTOR 



Fig. 1. Physical Format of Diskette 



so Ihat each track Is made up of 2560*8 = 
20,480 bits in a concentric circle. The 
physical arrangement is shown in Fig. 1. 
A Shugart SA-400 is another dumb de- 
vice, at least as far as its primary func- 
tions. It can be instructed to turn on its 
motor, to step the head in or out one track, 
or to write or read a bit. It returns signals 
representing a sense of the diskette index 
hole, a track position, and a write pro- 
tected disk. The SA-400 has a circuit board 
full of logic to read and write serial data, 
but the circuitry is not much more sophis- 
ticated than that found in a cassette re- 
corder. The signals that go to the SA-400 
are shown In Fig. 2. 

Disk Formatters and Controllars 

Not too long ago, when a computer 
manufacturer wanted to use a floppy disk 
drive with his computer, he had to design 
a disk controller/formatter. This usually 
involved about 200 medium scale LSI 
chips acting as in interface from comput- 
er to drive. 

First, the controller had to convert a 
byte to a serial bit stream to be sent to the 
single Write Data line of the disk drive. A 
similar eight bits had to be assembled 
from the Read Data line during disk read 
operations. Since the disk head can only 
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be stepped one track at a lime, a portion 
of logic in the controller was devoted to 
maintaining the location of the current 
track, and to stepping the disk drive head 
in and out to find a given track. Another 
portion of the logic vjas dedicated to find- 
ing a given sector within the track. Other 
functions included collecting status from 
the disk sensors. The controller required a 
clock to time disk actions. 

Along with the controller, and usually 
designed into it, was a formatter. The for- 
matter wrote skeleton tracks onto each 
diskette. Each skeleton track was divided 
into sectors, each sector containing an 
identification (ID) field. This field con- 
tained the track and sector number, A 
data field contained the user data. Special 
codes were used to mark the start of ID 
and data fields. 

A Singte-Chip Disk Controller 

Western Digital has a beautiful building 
off the San Diego Freeway in Orange 
County, CA, Rumor has it that the second 
floor landing has a small brass plaque 
upon which is inscribed, "Dedicated to 
the 1771 Floppy Disk Formatter/Control- 
ler," The 1771 is the single 40-pin LSI chip 
which replaces those early 200-chip con- 
trollers (and presumably 200 design engi- 
neers). The 1771 is used in the Model I, and 
a close relative, the 1793, is used in the 



Model III. 

The 1771 is really a CPU; it performs the 
following functions; 

• It restores the disk read/write head to 
track 0. 

• It automatically positions the head 
over a specified track. This is called a 
seek operation, 

• It steps the head in and out one track, 

• It steps the head in one track. 

• It steps the head out one track. 

• It reads a sector's worth of data. 

• It writes a sector's worth of data, 

• It reads the next identification field 
of the current track. 

• It reads an entire track, Including for- 
matting data. 

• It writes (formats) an entire track, 

• It forces an interrupt, 

A twelfth function that the 1771 also 
performs is returning a status byte that 
contains information about the disk drive 
and the success or failure of the current 
operation. 

As the reader can see from the above 
commands, the 1771 requires some infor- 
mation about the track number and sector 
number before it can issue some of its 
commands. In fact, the 1771 contains five 
eight-bit registers that are accessible 
from a program. These are the status, 
command, track, sector and data regis- 
ters. There are additional registers not ad- 



dressable under program control. The 
most important of these is the data regis- 
ter, which holds eight bits of data to be 
shifted out serially (write to disk) or eight 
bits that have been assembled from the 
disk (read from disk). The general architec- 
ture of the 1771 is shown in Fig. 3, 

The addresses assigned to the five ad- 
dressable controller registers in the 
Modellare37ECH,37ECH,37EDH,37EEH 
and 37EFH, respectively, as shown In Ta- 
ble 1. Note that the status and command 
register share the same address, 37ECH; 
the status register is addressed for a read 
37ECH, while the command register is ad- 
dressed for a write 37ECH, 

Positioning Commands 

The first five commands. Restore, Seek, 
Step. Step In and Step Out. are head posi- 
tioning commands. Restore steps the 
head until it is positioned over track zero 
The track register does not have to con- 
tain a valid track number for Restore to 
work, and the track register contains a 
zero at the end of the operation. 

The Seek command must be preceded 
by an output to the data register (37EFH) 
of the track number for the Seek, In addi- 
tion, the track register must contain the 
current head position, This means that 
Restore must have been performed first, 
although other head positioning com- 
mands could follow Restore. 

Step steps the head to the next track in 
the last used direction. Step In and Step 
Out also step the head one track. 

Some of these commands share func- 
tions, and we could get by with only Re- 
store and Seek, No data is written to the 
disk with any of these commands; they 
are used only to position the head. 

The formats for these commands are 
shown in Table 2. The V bit, or verify bit, 
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specifies that ttie track ID will be read and 
compared with the track register. The R1 
and RO bits define the stepping rate of the 
head. Some disks are designed to step at 
a faster rate than the nominal 20 miliisec- 
ond track-to-track step for the SA-400. (I 
know you're going to change this rate- 
just be forewarned that your disk may not 
be capable of stepping at a faster rate!) 
Typical settings for the commands are al- 
so shown in the table. 

Read and Write Sector Commands 

The Read sector and Write sector com- 
mands are shown in Table 3. They read or 
write a sector of data. Before a Read or 
Write command can be given, the head 
must be positioned over the proper track 
with a head positioning command, and 
the sector register must be loaded with 
the proper sector number by an output to 
37EEH. Once this preliminary work is 
done, the Read or Write sector command 
is output to 37ECH 

After receiving the Read sector com- 
mand, the 1771 searches for the ID field 
that contains the proper sector number. 
When it finds it, it waits until the data field 
comes under the head and then starts as- 
sembling data bytes into the data register 
from the serial bit stream. As each byte 
becomes available, a data request or DRQ 
flag is set in the status register, and the 
program can pick up the byte by reading 
the data register at 37EFH. 

Data is transferred from a sector on a 
byte-by-byte basis in a tight assembly lan- 
guage loop. The loop consists of checking 
the status (37ECH) for the DRQ bit and 
performing a read from the data register 
(37EFH) if data is present. Reading the 
data register resets the DRQ, and the pro- 
gram loops back again to check for the 
next byte, 

How do we know when to stop? Actual- 



ly, we don't have to know when to stop: 
The 1771 knows how long the data field is 
from the sector length byte in the ID field 
of the sector. (For an IBM-type format, 
01H in the sector length byte of the ID field 
specifies 256 bytes of data.) When the 
1771 reaches the end of the data file, it re- 
sets another bit in the status register, 
called the busy flag. This flag is normally 
set to indicate that the 1771 is executing a 
command; it is reset when the command 
has been completed. On a Read sector 
command, the busy flag is reset after the 
last byte has been assembled and read 
from the 1771, 

On a Write sector command, the pro- 
cess is similar. The head must be correct- 
ly positioned over the desired track, and 
the sector register must contain the prop- 
er sector number. The DRQ flag in the 
status byte is used to signal the program 
that it must send the next data byte so the 
1771 can convert it to a serial bit stream. 
Sending a byte to the 1771 data register 
resets the DRQ: the DRQ is set again after 
the byte has been written on disk. The pro- 
cess continues until the last sector byte 
has been written, at which time the busy 
flag bit in the status register is reset. 

Going back to the format of the Read 
and Write sector commands in Table 3, we 
can see there are sonne microprogram bits 
that can be manipulated. The M bit speci- 
fies either a single record (0} or multiple 
records (1). If multiple records are speci- 
fied, the 1771 will keep transferring data 
until the end of the track. The normal set- 
ting in the Model I Is 0, or single record. 

The B bit specifies an IBM format (1) or 
non-IBM format (0). The IBM format refers 
to a standard sector length of 128. 256, 
512 or 1024 bytes per sector. The non-IBM 
format allows for lengths of 16 to 4096 
bytes per sector, provided that the disk- 
ette was formatted to one of those sector 



lengths. 

The A1, AO bits define which data ad- 
dress mark the 1771 will use. The data ad- 
dress mark is a byte from F8H to FBH that 
precedes the user data field. 

Read Address, Read Track and 
Write Track Commands 

The remaining commands affect por- 
tions of the disk that the TRS-80 user 
never sees. We have talked about format- 
ting a disk, but what is actually involved in 
the formatting process? 

The 1771 uses the Write track command 
(Table 4) to format a track. One track at a 
time is formatted, so there must be 35 sep- 
arate Write track commands to format a 
35-track diskette, each one followed by a 
Step command to move the head to the 
next track. 

The head is first posltionedon trackO. A 
Write track command (F4H) is sent to the 
command register through an output to 
37ECH. At this point the process resem- 
bles the Write sector procedure. The 1771 
requests the next data byte by the DRQ in 
the status. The program responds by out- 
putting to 37EFH, which resets the DRQ. 
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■ • . t)-C30/LN-3O 

XJ-C66/LN-60 

-^ P-C90/U4-90 

, TEHMINALS 



$14.95/10 
18.45/10 
22.95/10 



31b 
31b 
31b 



HazeltinaH 1410 



MEMORY CHiPS 



$765.00 
(free shipping) 



125 




ATAIIMC. 



v« 



v-v 



^/ 



-«^* 



^v 



MotQjola , ■ $21.95/8 

MCM'4116AC30, (shunts not 
16K.2CX)ns.merfK>rT included) 
chips icS: mod t 
expansion interiaoe 
and mod HI 

ONLY 50 SETS AVAILABLE 






2 lbs. 



^Sa« List of Aavertisais on page 306 
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THE ASSENBIY IINE 

















ID address 




Sector 


7^ 


sector lengtti = 


256 bytes (IBM) 




_^ 


Index marK 




/ 


/marli 


^TrackS^ 


^^ 




^^CRC 


.haractsrs for ID Field | 


BC! 


F f 


f F 


1 F 


J i 


F F 


■'i 


F 1 


>^ 


f \ _^ 


>^ 


>< 


'>- 


-Ff 


f F 


FF 


FF 




rm 


FT 


hF 


f F 


FF 


FF 


1 E 


0< 


00 


•if 


«r 


11/, 


ei 


FF 


FF 


FF 


FF„ 


^'□ats address 


;■» 


F i 


FF 


FF 


F 1" 


f f 


IF 


FF 


FF 


0P 


pp 


P0 


00 


00 


P0 


rp- 


T^ 


mark 


!« 


l-.'3 


i:*! 


i:-] 


1-'-. 


F-J 


E5 


F'l 


E-i 


E'l 


F-^j 


£■=, 


E'=i 


F'^ 


F"^ 


F5 


L. 1 , 




-10 


f 'l 


f '. 


F S 


F 5 


F5 


L-^ 


f Ti 


L5 


[ 5 


F5 


F'' 


i"'. 


rs 


r5 


E '.' 


f.=. 




■ild 


[,5 


K-i 


l.b 


1 ■) 


EI') 


F5 


E'l: 


E":. 


E5 


E'"i 


F5 


F'j 


E5 


E5 


Eli 


E5 




>'.pl 


E^ 


Ff. 


F ^ 


F ^1 


E!) 


f '5 


[■^ 


F5 


F5 


F5 


r5 


F'l 


F5 


F5 


E? 


E5 




78 


F5 


F "-. 


Fi'i 


F-b 


F.5 


E5 


E5 


E5 


E5 


E5 


E') 


E5 


E5 


E5 


Eg 


E5 




Be 


F''i 


rs 


F T) 


Lf' 


E5 


F S 


F5 


r5 


E5 


F5 


F5 


Fr. 


E5 


£5 


E5 


E5 




';« 


( =1 


i;i 


tl'i 


F'J 


F'l 


E""] 


E=. 


F5 


E5 


E5 


Eg 


E5 


E5 


E5 


E5 


E3 




A0 


F ^ 


f ^ 


15 


t ^ 


F ^ 


E"^ 


El. 


[f. 


E5 


E5 


E5 


F5 


E5 


Eb 


F_5 


E5 




r.0 


r5 


E5 


P'i 


F'-, 


F:'i 


T.-=. 


E-j 


F'j 


E5 


E'i 


E5 


E5 


Eli 


E5 


Eg 


Eg 




ria 


FS 


r? 


E^. 


£^ 


F? 


F5 


F=i 


E5 


E5 


E5 


L5 


F5 


F5 


E"5 


E5 


Fg 




j)0 


E'J 


ir-j 


E-i 


f:"? 


F-'i 


E5 


E!) 


F-i 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


E5 




( » 


tr. 


C '. 


: ^1 


b^. 


E.ri 


ES 


E5 


E5 


F5 


E5 


15 


E5 


E5 


E5 


E5 


Eg 




F« 


r--'i 


F"". 


i.'i 


F-J 


fr-i 


F'l 


E5 


E5 


E5 


E5 


E5 


E5 


F5 


F5 


Eg 


Eg 




PB) 


r;.. 


F ;. 


t.b 


E? 


E^ 


F5 


F-^ 


E5 


E.5 


E5 


E5 


F5 


F5 


F5 


E>. 


_fc%- 


. — ID address 


10 


ri 


E'i 


FO 


FJ") 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


^^ 


.£^ 


-F^ 


Eg 


e:5 


mark 


CRC cfiaraclBr2.^i ^^ 


FF 


Fl 


Ffj 

FF 


Fr 


E5 

FF 


E5 


F'. 


( s 


1 1- 




F5 
F F 


FF 


FF 


Eg 

FF 


j^— CRC character 1 
P0 


■■id 


iflp 


PH 


PC 


PP 


010 


lT 


0'. 


01? 


HJ 


-ej^ 


-L£L 


-iTL 


FF 


FF 


FF 


pr^' 




'.H 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF 


na 


pp 


00 


00 


~0B" 


"Wr 


ta; 


-tS- 


-Sector 3 


(■n 


f 'i 


i •' 


F ? 


F 5 


( ^ 


15 


E5 


E^ 


E!i 


F!) 


f5 


L5 


F'i 


F '. 


F'l 


■^ 


/a 


F"! 


i-:5 


[-■"^ 


F!5 


E3 


E5 


E5 


E5 


E3 


E5 


E5 


E5 


F5 


r5 


F5 


E> 


''Data address 


i; 


f '. 


f "^i 


E 5 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


E5 


£5 


tg 


E5 


mark 


?B 


f "5 


f-r5 


f'-^ 


(T^ 


E") 


F5 


F5 


E5 


F5 


F'l 


E5 


E5 


E5 


F5 


E5 


F5 




^0 


t'. 


E5 


£ =. 


F". 


L5 


F5 


F"'> 


rr. 


t5 


E5 


E5 


F5 


E5 


E5 


E5 


E5 




Be 


f s 


F-i 


F'. 


F '". 


F". 


F5 


E5 


F^ 


F5 


F5 


E5 


E5 


E5 


E5 


Eg 


E5 




tP 


1 '. 


F '. 


F :■ 


i^ 


F "I 


1 fi 


fc^ 


F5 


F5 


E 5 


E5 


E5 


E5 


E!:. 


Eg 


Eg 




00 


F'i 


F^ 


E5 


E-i 


E5 


E5 


E-i 


E5 


E5 


E5 


E5 


E'. 


E5 


E5 


Eg 


Eg 




[ P 


t^. 


F". 


F5 


F5 


Ffj 


r5 


E5 


E5 


E5 


F5 


E5 


E5 


E5 


E5 


E5 


i5 




r-pi 


F"? 


F.5 


F-j 


F-i 


F_'. 


E-i 


E5 


E5 


E*? 


E5 


E5 


E5 


E5 


E5 


E5 


E5 




PH 


1 '. 


f '> 


t5 


I'-, 


tr. 


£5 


ES 


E? 


F5 


E f . 


E5 


E5 


E5 


E5 


E5 


E5 




10 


FC'i 


1 ', 


F h 


\r-D 


E-i 


E^) 


E/-; 


F'l 


F5 


E-i 


E5 


E5 


E3 


E5 


E5 


E5 




20 


t:s 


f '. 


F ■> 


(■r. 


E? 


E5 


E^ 


E5 


F^ 


F'. 


E5 


F5 


E5 


E5 


Eg 


Eg 




]0 


E5 


F5 


I.') 


v. 


F"! 


e;j 


E5 


E5 


E5 


F"'=i 


F5 


E5 


E5 


E5 


E5 


F=. 




'10 

■i0 


F.y. 


E '. 


F '. 

F*! 


1 •:■ 


E "=1 


F5 


F'. 


F5 
E-J 


E5 

ES 


E^; 

E5 


r5 


F '• 


r5 


E5 


E5 

-FT 


A4 


-—ID address 
maik 


(.0 


0C 


FF 


fF 


FF 


FF 


F F 


F F 


Ff_ 


_£t- 


-+H»- 


"TT^ 


tt 


FF 


FF 


FF 


PP 




70 


00 


00 


00 


00 


00 


Fe 


"BT 


P0 


0E3 


-BA. 


-Ci 


JF 


("F 


FF 


FF 


FF" 




F!0 


F f 


FF 


FF 


FF 


FF 


FF 


FF 


( F- 


00 


00 


00 


"hgt 


"Wr 


' PS' 


-h_E 


-Lli 




■90 


f;-) 


F'i 


r"! 


E-T 


E'-i 


F""' 


E5 


F'l 


F'l 


1 '1 


f^ 


E-i 


E': 


t =) 


F"'i 


X 


~" Sector 6 


A0 
B0 
LB 
[>0 


F-:5 


F '. 
F^ 

E5 


E5 


F S 

r5 


F5 
F5 
i 5 
F'l 


t 5 

E-i 

f •-.■ 


E5 
E-i 
F-i 


1.5 
El 
F5 
F5 


F '. 
F'", 
E5 
F'l 


E ■■ 

F ^ 


F '. 

1 ■-, 
1 'i 
FS 


F 5 

f 5 
F-"5 


E'. 

E'i 


I.Li 
E5 
E5 
! 5 


eg 
E"g 
Eg 


E5 
t-5 
E5 


Data address 
mark 


( (1 


F5 


F3 


E5 


E^ 


£ 5 


E 'i 


f '. 


( ■. 


1 'i 


E 5 


F,^ 


f :. 


F ". 


E5 


£5 


F5 




I-0 


l^-l 


£■5 


F-i 


F^ 


E'> 


E5 


E-j 


FJ'i 


F'-. 


f -=. 


Fr5 


E5 


L5 


Eg 


E5 


E5 










F<g. 5 


Formatted Track 


Segment 











The formatting process is done by writ- 
ing 10 separate blocks of information, for 
the 10 sectors, for each track formatted. 
Each block of information consists of the 
segments shown in Fig. 4, Data is written 
by the 1771 as soon as it detects the index 
hole in the diskette. 

The program writes a string of 40 zeroes 
or FFHs, followed by six zeroes. Next, an 
FCH is written, followed by 14 zeroes or 
FFHs. This pattern is a preamble that 
syncs the hardware on subsequent reads. 
The FCH is used as a sync mark to define 
the beginning of each track. 

It's important to note that any character 
from F7H through FEH is a special char- 
acter for the Write track command pro- 
cessing. A character in this range causes 
a special hardware action in the 1771. 

After the preamble, the data for 10 sec- 
tors is output. The first six bytes consti- 
tute a leader made up of zeroes. The next 
byte is the special hardware character of 
FEH, This character is an ID address mark 
that identifies the beginning of the identi- 



fication field. The identification field fol- 
lows. Five bytes are output, but six bytes 
are actually generated in the field. The 
track number, zeroes, sector number and 
sector length (one for the IBM format of 
256 bytes, multiples of 16 for non-IBM for- 
mats) are all written on the track. The next 
byte is the special character F7H, which 
causes two CRC characters to be written 
to the disk. The CRC (Cyclical Redundan- 
cy Check) characters are checksums of 
the ID field data. 

The ID field data is followed by a pro- 
gram output of 12 zeroes or FFHs, fol- 
lowed by six zeroes, followed by the spe- 
cial character FBH. FBH is a data address 
mark which identifies the beginning of the 
user data area. 

The user data area is reserved for the 256 
bytes of sector data (IBM-type format with 
sector length of 01 H) that we normally as- 
sociate with a disk sector. In the format- 
ting process, no meaningful data is out- 
put, but some non-conflicting data, such 
as E5H, is written instead. By non-conflict- 



ing, I mean any data except for the special 
hardware codes of F7H through FEH. 

After 256 bytes of E5Hs are output (or 
multiples of 16 bytes for non-IBM format), 
the formatting program outputs an F7H 
which causes two CRC bytes to be gener- 
ated. These bytes are a checksum of the 
data field. Finally, 14 zeroes or FFHs are 
written as a trailer in the sector. 

This process is repeated nine times to 
make up the 10 sectors of the track. After 
the last sector has been written, zeroes or 
FFHs are written until the 1771 busy bit is 
reset (index mark detected again). 

Fig. 5 shows a partial track of data after 
formatting. The data starts with the FCH 
index mark and continues for two and 
one-half sectors or so. 

One interesting point about the tracks 
is that the sectors do not follow each 
other sequentially. Instead of sectors 0, 1, 
2, 3, 4,5,6, 7, 8 and 9 on the disk, we find 0, 
5, 1, 6, 2, 7, 3, 8, 4, 9! The reason for this 
strange arrangement is that the sectors 
have been optimized, to allow for some 
processing between the next sector in se- 
quence. For similar reasons, the tracks do 
not necessarily start with sector 0, 

The Read address command reads the 
next ID field on the current track. The six 
bytes of the ID field are read in an opera- 
tion identical to the Read sector opera- 
tion, except that the busy flag bit is reset 
after the six bytes have been read. 

The Read track and Write track com- 
mands result in operations identical to the 
Read and Write sector commands, except 
that the entire track, and not just the data 
field, is read or written. The Write data 
command initiates the formatting se- 
quence. The S bar bit in the Read track 
command is used to synchronize the read- 
ing of data to each address mark (0) or to 
simply read in data (1), 

Force Interrupt 

The last command can be used to termi- 
nate the current 1771 operation upon at- 
taining a specified condition. It would 
never be used on the Model I, The term in- 
terrupt does, in fact, refer to an interrupt 
from the 1771 to the Model I, but the disk 
operations in the Model I are not interrupt 
driven. 

Status 

The status register at 37ECH holds sta- 
tus dependent upon thecurrent command 
in progress, as shown in Table 5, 

Bit is always a busy flag bit, set to one 
when a 1771 operation is in progress, and 
to zero when the operation is over. Like- 
wise, bit 7, Not RDY, is set when the disk 
drive is not ready. 

Write protect is a direct reading from 
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the write protect notch sensor, (If the 
notch IS covered, the disk is write protect- 
ed,) The Record type during a Read is the 
actual data address mark encountered in 
t he data field. Write fault and CRC error in- 
dicates errors in reading or writing data. 

Track indicates that the head is over 
track zero. Index indicates that the Index 
hoie is passing under the sensor. Lost 
data indicates that the program could not 
keep up with the data transfer. During a 
write procedure, this means the program 
didn't present the next data byte in time to 
write it at the next point on the track; dur- 
ing a read, it means the next byte filled the 
data register before the program read in 
the previous byte. Either one is a cata- 
strophic condition. 

We mentioned earlier that data is trans- 
ferred at a rate of one byte every 64 micro- 
seconds. This figure is derived from the ro- 
tational speed of the disk and the amount 
of data (including format data) on a track. 
If we assume that each Model I instruc- 
tion takes five microseconds, we can exe- 
cute about 13 instructions in a read or 
write disk loop! It doesn't take too much 
overhead to fall behind — if the real-time 
clock interrupts are enabled, this puts ad- 
ditional processing in the loop as the code 
for the real-time clock routine is entered 
It's important, therefore, to keep the DRQ 
loop very tight to avoid missing data. 

A Disk Driver Program 

You're now ready to use a disk driver 
program, which I have aptly named DSK- 
DRV {see Program Listing 1). DSKDRV en- 
ables you to read disk status, to read and 
write a sector, to read the ID field, and to 
read and write a track. The latter function 
would allow you to format a track if you 
have a buffer full of data. 

DSKDRV is called with HL pointing to a 
parameter block that defines the disk pa- 
rameters to be used. If you are calling this 
program from BASIC, note that it is not re- 
locatable. If you are not calling DSKDRV 
from BASIC, NOP the three bytes at 
F009H, AH and BH with three OOHs, or re- 
assemble with the Call 0A7FH deleted. 1 
would not advise using this on your non- 
disk Level II system. 

The parameter block is shown in Fig. 6. 
The first byte is the function code. The 
next two bytes are the sector and track 
numbers. The final two bytes are the buf- 
fer address for reads and writes. This ad- 
dress, of course, is in standard Z-80 for- 
mat with least significant byte followed by 
most significant byte. PARAM-(-5 is the 
type of completion and PARAM -(-6 is the 
status after completion. Both of these 
bytes are used to return data to the calling 
program. 



HEAD 
POSi 'ION 



READ 
SECTOR 



WRITE 
fiFCTOR 



READ 
ADDRE- 



READ 
TRACK 



WRITE 
TRACK 



NOT 

RDV 


WRITE 
PROT 


HEAD 
EN- 
GAGED 


SEEK 
ERROR 


CRC 
ERROR 


TRK 



INDEX 


BUSY 






REC 
TYPE 


REC 
TYPE 


REC 
NOT 
FOUND 






LOST 
DATA 


DRQ 










WRITE 
PROT 


WRITE 

FAULT 


REC 
NOT 

FOUND 




























ID 

NOT 
FOUND 














































f 


WRITE 
PROT 


WRITE 

FAULT 














■ 




■ 



Tables. Status for Commands 



Program Listing 1. DSKDRV 



F000 




00100 






ORG 


0F0 0H 


* • 


•CHANGE THIS*** 






00110 


• 


** ** 


I >* * I 


********•• ******** ************************* 






00120 


• 


DISK 


DRIVER. CHECKS DISK STATUS, POSITIONS HEAD, 






00130 


* 


READS AND 


WRITES SECTORS, READS ID, READS AND WRITES 






00140 


• 


TRACKS . 










00150 


* 


CALLING 


SEQUENCE: HL=> PARAMETER BLOCK 






00160 


• 




PARAH+0r FUNCTION: 0=RD STATUS, 1=P0SITI0N 






00170 


* 






HEAD, 2=READ SECTOR 


, 3=WRITE SECTOR, 






001B0 


* 






4=READ ID DATA, 5=READ TRACK, 6=WRITE 






00190 


* 






TRACK 








00200 


' 




PAHAH+1 : SECTOR NUMBER 








00210 


• 




PARfiM+2: TRACK NUMBER 








00220 


* 




PARAM-^3,+4: BUFFER ADDRESS 






00230 


* 




PARAM +5 : TYPE COMPLETION: ^OK , 1=POSITION 






00240 


' 






ERROR, 2 =RE AD/WRITE 


ERROR 






00250 


* 




PAHAM-(-6: LAST STATUS OR STATUS OF FAILURE 






00260 


' 




PARAH-t-7: BIT 7:0=NO WAIT, 1=WAIT BITS 6-0: 






00270 


' 






DRIVE NUMBER 








00280 


• 


• « » • 


****** 


•*******••****♦***** 


««*•***••**•*•«••••*••* 






00290 












F000 


F3 


00300 


3SKDBV 


DI 




DISABLE INTERRUPTS 


F001 


F5 


00310 






PUSH 


AF 


SAVE REGISTERS 


F002 


C5 


00320 






PUSH 


BC 




F003 


D5 


00330 






PUSH 


DE 




F004 


E5 


00340 






PUSH 


HL 




F005 


DDE^ 


00350 






PUSH 


IX 




F0 07 


FDE5 


00360 






PUSH 


lY 




F009 


CD7F0A 


00370 






CALL 


0A7FH 


***GET PB LOC'N"* 


^0 00 


E^ 


003B0 






PUSH 


HL 


TRANSFER TO IX 


F00D 


DDE! 


00390 






POP 


IX 




F00F 


AF 


00400 






XOR 


A 


ZERO A 


F010 


DD770B 


00410 






LD 


(IX+5) ,A 


ZERO TYPE COMPLETION 


F013 


DD77Q6 


00420 






LD 


( IX+61 ,A 


ZERO STATUS 


F016 


DD7E07 


00430 






LD 


A,{IX-f7) 


GET DRIVE t 


F019 


E603 


00440 






AND 


3 


MASK OUT WAIT BIT 


f0:b 


3C 1 


00450 






INC 


A 


0-3 BECOMES 1-4 


F01C 


47 


00460 






LD 


B,A 


NOW IN B 


f0:d 


3E80 


00470 






LD 


A,B0H 


BIT FOR SELECT 


F01F 


07 


00460 


DSK010 


RLCA 




;ALIGN 


F030 


10FD 


00490 






DJNZ 


DSK010 


; CONVERT TO POSIITON 


r022 


32E037 


00500 






LD 


(37E0H) ,A 


SELECT DRIVE 


F025 


DDCB077E 


00510 






BIT 


7, (IX + 71 


TEST WAIT BIT 


F029 


2809 


00520 






JR 


Z,DSK030 


GO IF NO WAIT 


F02B 


210000 


00530 






LD 


HL,0 


WAIT COUNT 


F02E 


25 


00540 


DSK020 


DEC 


H 




DECREMENT COUNT 


F02F 


20FD 


00550 






JR 


NZ,DSK020 




GO IF NOT 


F031 


2D 


00560 






DEC 


L 




DECREMENT COUNT LSB 


F032 


20FA 


00570 






JR 


NZ,DSK020 




GO IF NOT 


F034 


3AEC37 


00580 


DSK030 


LD 


A, 137ECH) 




GET STATUS 


F037 


0F 


00590 






RRCA 






TEST BUSY 


F038 


38FA 


00600 






JB 


C,DSK030 




GO IF BUSY 


F03A 


FD210000 


00610 






LD 


lY ,0 


FOR MULTIPLICATION 


F03E 


DD4E00 


00620 






LD 


C, ( IX-t-01 


GET FUNCTION 


F041 


0600 


00630 






LD 


B,0 


NOW IN BC 


F043 


FD09 


00640 






ADD 


lY ,BC 


FUNCTI0N*1 


F045 


FD09 


00650 






ADD 


IY,BC 


■FUNCTI0N*2 


F047 


FD0 9 


00660 






ADD 


lY ,BC 


;FUNCTI0N*3 


F049 


01DCF0 


00670 






LD 


BC,FTAB 


; FUNCTION TABLE ADDRESS 
Prog'am contin 
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If you're looking for 

the best prices 



on TRS-80 



THE ASSENBIY IINE 




Model IIM6K $839 



1 




in 


1^; 

1 ■ ■ ■ ■ 

p^. ■ ■ ■ ■ 


1 


f ■ ^ 




^■V v.\sfi£SSa»^J^H 


1 


1 1 



Color Computer 4K $ 319.00 

Other TRS-80 Model II, or Model 
III computers and systems, Color 
Computers, and Pocket Computers 
are in stock at similar savings. 

Chech oul our low. low pnces 

on al[ RadM/llSHl merchandise 



WRITE on CALL FOR OUH COMPLETE 
PRICE LIST 



fun Radlo3hack warranty 



* Paymeol Money Or aer Casfiier s 
ChecK Cenilied Cfieck Persona; 
ChecKs require 3 weetis lo clear VISA 
MASTEHCHAHGE — AcM 3% 

• Prices suDiecl lo cfiarige a1 any lime 

CALL (602) 458-2477 

or write today "^ 

RAND'S 

2185 E. FRY BLVD. 
, SIERRA VISTA, AZ 85635 

TRS-80 is a Iradernark o' Tarifly Corooiatior 



PARAM + 7 contains the drive numbers. 
The most significant bit of this byte is 
set to one if a pause is to occur before the 
disk is accessed, or to azero if no pause is 
to occur. The disk is spinning only vt/hen it 
is accessed. It takes about a second to 
bring the disk up to speed for read and 
write operations. Before any disk opera- 
tion is performed, a disk must be selected 
and brought up to speed. If no further op- 
erations are done, the disk will turn off af- 
ter about three seconds. As long as the 
disk is spinning and consecutive disk op- 
erations are being done, there is no need 
to wail. However, if no operation has yet 
been done, or if the disk has turned off, the 
wait bit should be on. 

DSKDRV Structure 

DSKDRV flows from beginning to end 
(don't laugh— a lot of programs don't). In 
a concession to structured programming 
advocates, there are no computed GOTOs. 



The order of operations are: Select a drive; 

position head if necessary; output to sec- 
tor register if necessary; read or write if 



PARAM ■*■ 


FUNCTION 


+ 1 


SECTOR NUMBER 


-t- 2 


TRACK NUMBER 


+ 3 
+ 4 


BUFFER 
ADDRESS 


+ 5 


TYPE COMPLETION 


+ 6 


STATUS 


+ 7 


W 


DRIVE # 




' 0= NO WAIT 

1 - WAIT 



* SUPPLIED ON RETURN 

Fig. 6. DSKDRV Parameter Block Input 



FBilC 


FD09 


006 80 


ADD 


IY,BC 


POINT TO ENTRY 


F04E 


FD4E00 


00690 


LD 


C, {IY+0] 


GET COMMAND 


F051 


FD4 6 01 


00700 


LD 


B, ( IY+1) 


GET SEQUENCE 


F054 


FD5E02 


00710 


LD 


E, (IY+2) 


GET STATUS MASK 


F057 


CB40 


00720 


BIT 


0,B 


CHECK TRACK BIT 


F059 


2e2A 


00730 


JR 


Z,DSK070 


GO IF NO TRACK ACTION 


F05B 


DD7E02 


00740 


LD 


A, !IX-(-2) 


GET TRACK NUMBER 


F05E 


B7 


00750 


OR 


A 


TEST FOR ZERO 


Fa5F 


2004 


00760 


JR 


NZ,DSK040 


GO IF NOT FESTORE 


F061 


3E03 


00770 


LD 


A, 3 


RESTORE COMMAND 


F063 


1807 


007 B0 


JR 


DSK050 


GO TO RESTORE 


F065 


32EF37 


00790 DSK040 


1,D 


{37EFH) ,A 


OUTPUT TRACK # 


F068 


D5 


00800 


PUSH 


DE 


WASTE TIME 


F069 


Dl 


00810 


POP 


DE 




F06A 


3E17 


00820 


LD 


A,17H 


SEEK COMMAND 


F06C 


32EC37 


00B30 DSK050 


LD 


{37ECH) ,A 


OUTPUT RESTORE OR SEEK 


F06F 


D5 


00840 


PUSH 


DE 


WASTE TIME 


F070 


Dl 


00850 


POP 


DE 




F071 


D5 


00860 


PUSH 


DE 




F072 


Dl 


00870 


POP 


DE 




F073 


3AEC37 


00830 DSK060 


LD 


A, (3 7ECH) 


;GET STATUS 


F076 


0F 


00890 


RRCA 






TEST BUSY 


F077 


3BFA 


00990 


JR 


C,DSK060 




LOOP IF BUSY 


F079 


07 


00910 


RLCA 




RESTORE STATUS 


F07A 


DD7 706 


00920 


LD 


(IX + 6) ,A 


STORE STATUS 


F07D 


E69a 


00930 


AND 


98H 


TEST STATUS 


F07F 


2804 


00940 


JB 


Z,DSK07e 


GO IF OK 


F0B1 


3E01 


00950 


LD 


A,l 


POSITION ERROR FLAG 


F083 


1B4B 


00960 


JR 


DSK120 


GO TO STORE 


F08B 


CB4a 


00970 DSK070 


BIT 


1,B 


GET SECTOR BIT 


F087 


2808 


009B0 


JR 


Z ,DSK0e0 


GO IF NO SECTOR ACTION 


F089 


DD7E01 


00990 


LD 


A, (IX + l) 


GET SECTOR 


F0ec 


32EE37 


01000 


LD 


(37EEH} ,A 


OUTPUT TO SECTOR REGISTER 


F0BF 


D5 


01010 


PUS H 


DE 


WASTE TIME 


F090 


Dl 


01020 


POP 


DE 




F09: 


CB50 


01030 DSK0e0 


BIT 


2,B 


GET READ/WRITE BIT 


F093 


D-i 


01040 


PUSH 


DE 


SAVE STATUS CHECK BITS 


F094 


2B2F 


01050 


JR 


Z,DSK110 


GO IF NO READ/WRITE ACTION 


F096 


79 


01060 


LD 


A,C 


GET COMMAND 


F097 


DD5E03 


01 070 


LD 


E, (IX + 3) 


GET BUFFER ADDRESS 


F09A 


DD5604 


01060 


LD 


D, [IX + 4) 




F09D 


21EC37 


01090 


LD 


HL,37ECH 


STATUS REGISTER ADDRESS 


F0A0 


77 


01100 


LD 


[HL] ,fl 


OUTPUT COMMAND 


F0A1 


CB58 


01110 


BIT 


3,B 


TEST READ/WRITE TYPE 


F0A3 


D5 


01120 


PUSH 


DE 


WASTE TIME 


F0A4 


Dl 


01130 


POP 


DE 




F0AS 


DS 


01140 


PUSH 


DE 




F0A6 


Dl 


01150 


POP 


DE 




F0A7 


01EF37 


01150 


LD 


BC,37EFH 


DATA REGISTER ADDRESS 


F0AA 


2a0c 


01170 


JR 


Z,DSK100 


GO' IF READ 


t'0AC 


7E 


01180 DSK090 


LD 


A, (HL) 




GET STATUS 


F0AD 


0F 


01190 


RRCA 






BUSY TO C 


F0AE 


3014 


01200 


JR 


NC,DSK110 




GO IF DONE 


F0B0 


0F 


01210 


RRCA 






DRQ TO C 


F081 


30F9 


01220 


JR 


NC,DSK090 




GO IF NOT READY 












Program continues 



48 • 80 Microcomputing. July 1981 




RS-80 



Model III 



Products that set Precedents, 




\ 






^ 



•Wik**' 






MAPPER CP/M Ad^ 
CBASICII CP/ 



W 



THE 



bestWORd process 



SI 000.00 VALUE 
ONLY 



•IKS M/itiiJiK ShMl l.mli ( —p. 
■*r I' M t>.fii*l Knf*r.l> 

•*"PMO»M\'l'»lti>'l<li.. 



«299 



:*r 



rocessin 




BESTl 
ISGS 



sgro' 



^H<^.^NIX 



iret 
(Oil 



ra2 



THE ASSEMBIY IINE 



F0B3 


lA 


01230 




LD 


A, (DE) 


;GET BYTE 


FBB-l 


02 


01240 




LD 


(BC) ,ft 


fOUTPUT TO DISK 


F0B5 


13 


01250 




INC 


DE 


;BUMP MEMORY POINTER 


F0B6 


1SF4 


01260 




Jfi 


D5K090 


fGO FOR NEXT 


FBBe 


7E 


01270 


DSK100 


LD 


A,(HL) 


;GET STATUS 


FSBS 


0F 


01280 




RRCA 




;BUS¥ TO C 


P0BA 


3008 


01290 




JR 


NC,DSK110 


;G0 IF DONE 


F0BC 


0F 


01300 




RBCA 




;DRQ TO C 


F0BD 


30F9 


01310 




JR 


NC,DSK100 


;G0 IF NOT READY 


F0BF 


0A 


01320 




LD 


A,(BC) 


;GET BYTE 


F0C0 


12 


01330 




LD 


(DE) ,A 


! STORE 


F0C1 


13 


01340 




INC 


DE 


rBUMP MEMORY POINTER 


F0C2 


ieF4 


01350 




JR 


DSK100 


jGO FOB NEXT 


F0C4 


3AEC37 


01360 


DSK110 


LD 


A,(37ECH) 


;GET STATUS 


F0C7 


DD7706 


01370 




LD 


(IX+6) ,A 


J STORE 


F0CA 


CI 


01380 




POP 


BC 


; RESTORE MASK BITS 


F0CB 


Al 


01390 




AND 


C 


;TEST 


F0CC 


2805 


01400 




JR 


Z,DSK130 


;G0 IF OK 


F0CE 


3&02 


01410 




LD 


A, 2 


! ERROR CODE 


F0D0 


DD7705 


01420 


DSK120 


LD 


(IX+5} ,A 


! STORE IN COMPLETION TYPE 


FflD3 


FDEl 


01430 


DSKISB 


POP 


lY 


;RESTORE REGISTERS 


F0D5> 


DDEl 


01440 




POP 


IX 




r0D7 


El 


01450 




POP 


HL 




F0DS 


Dl 


01460 




POP 


DE 




F0D9 


CI 


01470 




POP 


BC 




FBDA 


Fl 


01480 




POP 


AF 




F0DB 


C9 


01490 




RET 




IRETURN TO CALLING PROG 


P0DC 




01500 


PTAB 


EQU 


s 


; FUNCTION TABLE 


FBDC 


0000 


01510 




DEFW 


0000H 


; STATUS 


F0DE; 


00 


01520 




DEFB 







F0DF 


0001 


01530 




DEFW 


0100H 


;SEEK 


F0E1 


18 


01540 




DEFB 


18H 




F0E2 


8C07 


01550 




DEFW 


07BCH 


;READ SECTOR 


F0E:4 


IC 


01560 




DEFB 


ICH 




F0E5 


AC0F 


01570 




DEFW 


0FACH 


;WRITE SECTOR 


F0E7 


7C 


01580 




DEFB 


7CH 




F0E8 


C405 


01590 




DEFW 


05C4H 


;READ ADDRESS 


F0EA 


IC 


01600 




DEFB 


ICH 




F0EB 


E405 


01610 




DEFW 


05E4H 


;READ TRACK 


F0ED 


04 


01620 




DEFB 


04H 




F0EE 


F40D 


01630 




DEFW 


0DF4H 


! WHITE TRACK 


F0F0 


44 


01640 




DEFB 


44H 




0080 




01650 




END 







-TRACK ACTION IF I 



-SECTOR ACTION IF I 



READ / WRITE ACTION IF I 



— WRITE = i, READ = 
Fig. 7. DSKDRV Sequence Code 



necessary; and get status. 

First the interrupts are turned off and 
the registers saved. A Call is made to 
0A7FH to get itie address of the parame- 
ter block. Next, the completion type and 
status are zeroed. 

At about DSK010, the drive number is 
picited up from PARAM + 7. A possible 
v*/alt bit is masked out by AND 3. The drive 
number must be converted to 01 H, 02H, 
04H or 08H so the proper drive may be se- 
lected by an output to address 37E0H, 
Outputting to this address loads a four-bit 
latch in the expansion interface and turns 
on a one shot for about three seconds. 
The four select lines on the disk cable con- 
nect to the latch, and the one correspond- 



ing to the drive number vi/ill be low after 
the LD (37E0H),A instruction. 

The conversion from zero through three 
to a bit position is handled by shifting 80H 
left the number of times corresponding to 
the drive number. After the drive has been 
selected, the wait bit is tested. If a wait is 
specified, a time delay of 65,536 counts is 
performed at DSK020. 

The loop at DSK030 tests the busy sta- 
tus of the disk by reading the status regis- 
ter at 37ECH. If the disk is not busy, the 
loop falls through. 

The code from this point up to DSK040 
accesses a function table called FTAB 
based on the function in PARAM +0, Each 
entry in the function table is made up of 



three bytes. The first byte is a sequence 
code for the function, the second is the 
principal command for the function, and 
the third is a status mask. 

The sequence code is shown in Fig. 7. 
The four lower-order bits define opera- 
tions for track action, sector action, read/ 
write action and read/write function. They 
are a type of microcoding for operations 
in DSKDRV. As an example, the sequence 
code for Write track is ODH, specifying 
head positioning over a track, no sector 
action, and read/write action with a write. 

The command for the function is the ac- 
tual command to be output. The status 
byte is, in fact, a mask byte. When the 
final status is obtained, this value can be 
ANDed with the final status, and if any 
one bit falls through, an error has oc- 
curred. The sequence, command and sta- 
tus mask are put in B, C and E, respectively. 

The code before DSK040 checks for 
track action in the sequence byte by: BIT 
0,8. If track action is called for, the track 
number from PARAM + 2 is loaded, if this 
track number is a zero, a Restore function 
is done; if non-zero, a Seek function is 
done. The track number is loaded into the 
data register at DSK040 for a Seek. At 
DSK050, the Seek or Restore command is 
output. 

That status loop at DSK060 loops until 
the Seek or Restore operation has termi- 
nated (busy reset). The status is then 
stored in PARAfwl + 6, and a check is made 
of the validity of the Seek or Restore ac- 
tion. If any bit represented by 98H is on in 
the status byte, an error Seek or Restore 
has occurred, a type completion of 1 is 
stored in PARAM + 5, and an abnormal re- 
turn is made. 

If everything is proper, DSK070 tests 
the sector action. If sector action is called 
for (BIT 1,8), the sector number is picked 
up from PARAM -1-1, and an output is 
made to the sector register at 37EEH, 

The code at DSK080 tests the read/write 
action (BIT 2,B). If there is to be a read or 
write, the command from C is output to 
the command register by: LD (HL),A. The 
buffer address is put into DE and the data 
register address into BC; this allows for a 
tight read/write loop. 

Next, bit three of the sequence byte is 
checked to determine whether the action 
is to be a read or write. A write action oc- 
curs at DSK090, while a read occurs at 
DSK100. In both cases, the busy bit is test- 
ed first to see if the last byte of the action 
has been transferred. If not, the DRQ bit is 
tested to see if the 1771 is ready for the 
next byte (write) or if it has the next byte 
(read). As the length of the operation is im- 
plicit in the command, no check must be 
made of the number of bytes transferred 
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by the program. 

At the end of the read or write, the busy 
flag is reset and DSK1 10 is entered. The fi- 
nal status is read from the status register 
by: LD A,(37ECH). This status is ANDed 
with the status mask; if the one-bit is set 
in the result, an abnormal type 2 comple- Not all the 1771 commands are used in 



tlon has occurred, and this code is stored 
in PARAM +5. Otherwise, the zero initially 
put in the completion type remains on the 
return to the calling program. 

How to Use DSKDRV 



20 'DISK DRIVER DRIVER 

40 DEFUSR0=&HF000 

60 CLS 

80 INPUT "INPUT FUNCTION: 0=RD STATUS IMPOSITION HEAD 2=READ SEC 

TOR 

3=WRITE SECTOR 4=READ ID DATA 5=READ TRACK 6=WRITE TRACK";F 

100 IF F<0 OR F>6 GOTO 80 

120 POKE 61432-65536, F 

140 IF FO0 GOTO 240 

160 GOSUB 460 

180 A=USR0(61432-65536) 

200 GOSUB 860 

220 GOTO 80 

240 IF FOl GOTO 340 

260 GOSUB 460:GOSUB 680 

280 A=USR0(61432-65536) 

300 GOSUB 860 

320 GOTO 80 

340 GOSUB 460:GOSUB 600:GOSUB 680:GOSUB 760 

360 A=USR0(61432-65536) 

360 GOSUB 860 

400 IF F=2 OR F=3 THEN L=256 ELSE IF F=4 THEN L=6 

ELSE L=3000 

420 I=B:J=B+L-1:G0SUB 940 

440 GOTO 80 

460 INPUT "DRIVE #";D 

480 IF D<0 OR D>3 GOTO 460 

500 INPUT -WAITtW) OR NO WAIT(N)"!WS 

520 IP W5<>"W" AND W$<>"N" GOTO 500 

540 IF WS="W" THEN D=D+128 

560 POKE 61439-65536, D 

580 RETURN 

600 INPUT "SECTOR #";S 

620 IF S<0 OR S>9 GOTO 600 

640 POKE 61433-65536,3 

660 RETURN 

680 INPUT "TRACK #";T 

700 IF T<0 OR T>39 GOTO 680 

720 POKE 61434-65536, T 

7 40 RETURN 

760 INPUT "BUFFER ADDRESS";B 

780 IF B<0 OR B>61431 GOTO 760 

800 POKE 61435-65536, B-INT(B/256)*256 

820 POKE 61436-65536, INT(B/256) 

840 RETURN 

860 PRINT "COMPLETION=";PEEK(61437-65536) 

880 PRINT "STATUS=";PEEK(61438-65536) 

900 FOR 1=0 TO 300:NEXT I 

928 RETURN 

940 M=0 

960 FOR K=I TO J 

980 IF H<>INT(M/16)*16 GOTO 1040 

1000 IF H=256 THEN H=0 

1020 L=H;GOSUB 1180 

1040 IF K>32768 THEN L=PEEK (K-65536} ELSE L=PEEK(K) 

1060 GOSUB 1180 

1080 Hs=H+l:IF M=INT(M/16) *16 THEN PRINT 

1100 IF INKEYSO"" GOTO 1140 

1120 NEXT K 

1140 PRINT 

1160 RETURN 

1180 Ll=INT(L/16) :L2=L-L1*16 

1200 IF LK10 THEN PRINT CHR$(Ll + 48); ELSE PRINT CHRS (Ll+55) ; 

1220 IF L2<10 THEN PRINT CHRS(L2+48); ELSE PRINT CHRS{L2+55)! 

1240 PRINT" "; . 

1260 RETURN 



Program Listing 2. Disit Driver Driver 



If you're looking for 

the best prices 
in the U.S.A. on 




TRS-80 

MICROCOMPUTERS 

We have consistently offered the 
TRS-80 line al savings up to 20%, 
which means you can save $150 
to $1500 by buying directly from 
Computer Discount of America. 

TRS-80 Model 11, 64K System, 
with disc drive only S3385.00 

Other TRS-80 Model II, or Mode! 
Ill computers and systems, Color 
Computers, and Pocket Computers 
are in stock at similar savings. 

Our savings are as big on expan- 
sion interfaces, prmters. diskettes - 
everything for your TRS-80 System, 



ATARI 

MICROCOMPUTERS 




'See List ot Aijvertisers on page 306 



We have the full line of ATARI 
personal computers and systems, 
mcluding Models 400 and 800. 
The computers, accessories, and 
hardware are brand new. in 
factory sealed cartons, and carry 
a full factory warranty. 
Most models are in stock for 
immediate delivery (usually 
within 7-10 days), and a price 
quote is as near as your phone. 
So if you're looking for the best 
prices in the U.S.A., for micro- 
computers and accessories, call 
Computer Discount of America, 
Inc., West Milford, New Jersey 
07480. 201-728-8080. NO TAX ON 
T-OF-STATE SHIPMENTS. 



TOLL FREE 800-526-5313 



Computer 



of America 



Authorized TRS-80 dealer, store B-2B2 
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fHE ASSmeiY IINE 



ex^aiiuiiiy the horizons of yo^' 
TRS-80*. then our professional 
quality software programs are 
for you: 

DISK EDITOR/ASSEMBLER: full screen 
editing; modular source and object; 
relocation: link editing; symbol table wit^ 
XREF; 8 character symbots: 
Modi 32k disk #1050-10 SU9.0Q 
Mod 3 32k disk #1250-10 $149.00 

TAPE EDITOR/ASSEMBLER: available 
8/81; supports relocatable object; 
Symbol table with XREF. 
Mod3#1250'20-S49.9S 

FULL SCREEN PROGRAM TEXT 
EDITORS: futl cursor 3nd scrolling 
control; bfock move /copy /delete; global 
find and change: 

For tape and disk BASIC: ,i 

Mod 1 #1010-20-824.95 : ' F 

Mod 3 #1210-20-S29.95 i^t.- : -I 
For EDTASM source files: ;-^; 
Modi #1010-31-534.95 

XBUG: Selt-flelocating Debug Tool and 

Monitor: with multi-speed single step 

feature: 

Mod 1 #1020-10-519.95 

Mod3#1220-10-S19.95 

Note: these products are not avaMabfe for 
level 1 . 

MHien ord^iflg specify Model, RAM size, 
# of disks. 

Send check, money order, or MC/VISA 
numbers and expiration dale to: 
Computer Applications Unlimited 

P.O. Box 214. Dept. 600 f—^ ^m 
Rye, New York 10580 tTIy mSm 

N.Y. Stattf residents add applicable sales 
tax. Alh>w4-e weeks for delivery. 
Dealer Inquiries Invited. 

COMPUTER 
APPLICATIONS 
rM UNUMITEDtm 

fiUiality • Rellablllty*SeiviGe 

•TRS-60 IS a TM of Tandy Cwp. 




INPUT FUNCTION: 0=RD STATUS 1=P0SITI0N HEAD 2=READ 


SECTOR 


3=WRITE SECTOR 4=READ ID DATA 5=READ TRACK 6=WRITE 


TRACK? 


DRIVE #? ... 




WAIT(W) OR NO WAIT(N)? M 




COMPLETION= 




STATUS= 




INPUT FUNCTION: 0=RD STATUS 1=P0SITI0N HEAD 2=READ 


SECTOR 


3=WRITE SECTOR 4=READ ID DATA 5=READ TRACK 6=URITE 


TRACK? 


BREAK IN BO 




READY 




>CMD-P" 




Fig. 8. Disk Driver Screen Dialog 





INPUT FUNCTION: 0=RD STATUS 1=P0SITI0N HEAD 2=READ SECTOR 

3=WRITE SECTOR 4=READ ID DATA 5=READ TRACK 6=WRITE TRACK? A 

DRIVE #? 

UAIT(W} OR NO MAIT(N)? M 

SECTOR #? 

TRACK #? 5 

BUFFER ADDRESS? 40000 

COMPLETION= 

STATUS^ 

00 05 00 09 01 F7 0E 

INPUT FUNCTION: 0=RD STATUS I=P0SITION HEAD 2=READ SECTOR 

3=WRITE SECTOR 4=READ ID DATA 5=READ TRACK 6=URITE TRACK? 

BREAK IN 80 

READY 

>CMD-P" 

Fig. 9. Read ID Function Screen Dialog 



DSKDRV. As the Step, Step In and Step 
Out commands are somewhat redundant 
witti Seek, only Seek (and Restore) are 
used in DSKDRV. DSKDRV, however, can 
be used to perform virtually any disk oper- 
ation performed in the DOSes. 

If you are operating with a properly for- 
matted diskette, you will have no problem 
reading or writing to any sector on the 
disk. Reading a track is also no problem. 
You should experiment with the Write 
track for some time before trying this 
function on your 2000-name mailing list, 
however. 

Program Listing 2 is designed to give 
you some experience using DSKDRV, The 
BASIC program is called Disk Driver Driver 
and makes it somewhat easier to inter- 
face to DSKDRV than Debug or another 
assembly language program. Disk Driver 
uses a parameter block area at locations 
OEFFOH, so be certain to protect memory 
above that point by answering the memory 
size question as 61423. 

Fig. 8 shows the sample output from 
Disk Driver Driver. The program first asks 
for the function to be performed. The code 
corresponds to the function codes in DSK- 
DRV. Next, the drive number and wait bit 
status are requested, in this case, the 
function was simply to read the status, 
and the program returned the completion 
type of zero and status of zero. 



A sample display for a read ID function 
is shown in Fig. 9. In this case the sector 
and track numbers were also requested. 
Disk Driver Driver always asks for the sec- 
tor number for a read or write, even though, 
as in this case, it is not required. 

The buffer address can be any address 
not in use by BASIC, and capable of stor- 
ing 3000 bytes or so for the read track 
function. Any read or write operation is 
followed by completion type and status 
and the contents of the buffer. The buffer 
contents printout can be stopped by 
pressing any key (except shift). 

In an earlier figure we saw the appear- 
ance of a track directly after formatting. 
Fig. 10 shows the printout of the same 
track with data. The first column of the 
display is the displacement from the start 
of the buffer in hexadecimal. This value 
cycles from OOH through FFH and then 
back to zero again. 

Fig. 1 1 shows the display resulting from 
a Read sector function. This Is the third 
sector of the directory. While Disk Driver 
Driver is no Superzap in its sector dis- 
plays, it will let you look at any sector on 
the disk. Furthermore, it lets you look at 
any track to investigate strange format- 
ting or other secrets. 

The Strange Case of Lost Data 

Now to get back to the glitch I men- 
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THE BOOKKEEPERS 



TO ORDER CALL (603)447-2745 

Pragmatic Programs for Small Business 
If we don't use them we don't sell them 



GENERAL LEDGER 

We call mis program Intermediate Bookkeeper. It comes 
with a standard chart of accounts. Accounts con be 
changed or added up to a totol of 110 accounts Xincluding 
headers). This modification of accounts Is done by the 
menu driven program - not by reprogrammlng. Posting Is 
done from your checkbook and your sales summary. You 
post account number, check number, description (only If 
you want It), and the amount. Proof of balance is obtained 
by running on adding machine tope of ctiecks and posting 
ttie total as a negative amount to the Cash in Bonk account. 
The program will tell you whether you are in balance and 
If not how much your error Is. A complete listing of all 
items posted to any account is available on coll. At least 
4400 entries con be posted and retained for any year. 
Reports print in an 80 column format on a printer and are 
standard Statement of Condition, Profit and Loss, and Gen- 
eral Ledger Detail. Year to dote totals. Period to date totals 
dnd percentages are given. 

One of the principals in this company uses the system 
in on accounting business. Several clerks have used the 
system. This years clerk was 14 and averaged 200 entries 
per hour. 

This Is the type of program you have been looking for - 
one that Is simple - one that Is quick - one that saves you 
time instead of wasting it. 

Price $109.95 



ACCOUNTS RECEIVABLE 

Ann Rose, Our Accounts Receivable Clerk Is not for every- 
body. This Accounts Receivable program does not gener- 
ate Invoices, rather It is used to produce work lists and 
bills, and when applicable to post automatic charges ond 
service charges. 

Our accountant uses this to prepare his own billing, 
however, the best use of this program would be a com- 
pdny that normally bills most of it's customers on a flat 
rote monthly basis such as a small garbage company or 
a small leasing company. Each control is set up on o pair 
of diskettes and con handle 328 accounts. A disk record 
Is maintained of the iost 18 transactions per customer. 
Each customer is assigned an account number by the 
machine when first entered. Customer lists con be listed 
in alphabetical order or in order of account number. 
Bills ore printed on plain white tractor feed paper (not pre- 
printed) and take 55 seconds per bill to print (average). 
Accounts with a zero balance do not print. Accounts can 
be deleted when no longer needed. Sorts ore done quickly 
except when Initially entering a name into the system. 
We feel that a little time token at the beginning is well 
worth the speed thereafter. Posting is rapid but one has 
the chance to correct errors. At the end of each posting 
session a journal entry is prepared for posting to the gen- 
eral ledger. Each posting stores dote, invoice number, type 
of transaction, ond amount on diskette. 

Price $150.00 



Both programs require a Radio Shack TRS-80 
Model I or III w/48K, 2 Disk Drives, and at least 

an 80 column printer 
MONEY BACK IF NOT SATISFIED 



ORDER FROM 



Sturdivant and Dunn, Inc. ^82 
73 Washington St., Box 277 
Conway, N.H. 03818 



Phonc(603)447-2745 

TRS-80 is a trademark of TANDY CORPORATION 
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REMsoFT, Inc. 

Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired Of buying book after book on assembly 
language programming and still not knowmg your 
POP from your PUSH? 

RElVlsc»=T proudly announces a more effi- 
cient way. usirto your own TRS-80® , to learn the 
fundanwntals of assembly language programming 
-at YOUR pace and at YOUR convenience. 
Our unique package. "INTRODUCTION TO TRS-«0» 
ASSEMBLY PROGRAMMING", will provide you with 
the folhiwrng: 

• Ten 45-minute lessons on audio cassettes. 

• A driver program to make your TRS-80* video 
monitor serve as a blackboard for the instructor. 

• A display program for eacti lesson to provide 
illustration and reinforcement tor what you are 
hearing. 

• A textbook on TRS-80® Assembly Language 
Programming. 

• Step-by-step dissection of complete and useful 
routines to test memory and to gain direct control 
over the keyboard, video monitor, and printer. 

• How to access and use powerful routines in your 
Level II ROM. 

Tfiis course was developed and recorded by 
Joseph E. Willis and is based on the successful 
series of courses he has taught at Meta Technologies 
Corporation, the Radio Shack Computer Center, and 
other locations in Northern Ohio. The mmimum 
system required is a Level II, 16K RAM. 

REMASSEM-1 only $69.95 



LEARN TRS-80® 

ASSEMBLY LANGUAGE 

DISK I/O 

Your disk system and you can really step out with 
REMSOFTs Educational Module, REMDISK-1. a 
"short course" revealing the details of DISK I/O 
PROGRAMMING using assembly language 

Using the same format as our extremely popular 
introduction to assembly language programming, 
this -ASSEMBLY LANGUAGE DISK I/O mOGRAM- 
MING" course includes: 

• Two 45-minute lessons on audio cassette. 

• A driver program to make your TRS-80* video 
monitor serve as a blackboard for the instructor 

• A display program for each lesson to provide 
illustration and reinforcement for what you are 
hearing. 

• A booklet of comprehensive, fully-commented 
program listings illustrating sequential file I/O. 
random-access file I/O. and track and sector I/O. 

• A diskette with machine-readable source codes 
for all programs discussed, in both Radio Shack 
EDTASM and Macro formats. 

■ Routines to convert from one assembler format 
to the other. 

This course was developed and recorded by 
Joseph E. Willis, for the student with experience 
in assembly language programming; it is an inter- 
mediate-io advanced-level course. Minimum hard- 
ware required is a Model I Level II. 16 K RAM one 
disk drive svstem. 



REMDIdK-1 



only $29.95 




Pealer inquiries invited 

REMsOFT, INC. 

571 E. 185 St. 

Euclid, Ohio 44119 

(216)531-1338 




►^70 



Include $1.50 lor shipping and handling. 
Ohio residents add 5V?% sales tax 

TRS-8(r is a trademark o< Ihe Tandy Corp. 



THE ASSENBIY IINE 
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Fig. 10. Track Section with Data 
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Fig. 11. Read Sector Display 




tioned at the first part of this column. Us- If you can ferret out the answer, you'll be 


ing DSKDRV, 1 consistently got a Lost mentioned in dispatches in this column. 


Data status for the Read track function. 


The data itself, however, looked valid. 


Checking around, 1 happened to talk to -And Speaking of Programmer Error 


Bill Schroeder of Galactic Software. He 1 did it again. Another error In a column. 


suggested 1 talk to one of their people, Tim (For my only previous error please look at 


Mann, the resident 1771 expert. Before 1 the April, 1923, column of 80 Microcom- 


could even describe the problem com- Duf/ng, where 1 discussed punched cards.) 


pletely, he said, "Yes, on Read track 1 no- In the March column, marking should read 


ticed that t was consistently getting a spacing and vice versa. Thanks to Charles 


Lost Data message. 1 suspect there ts an A. King of Techplan Corporation, Falls 


error in the 1771." Perhaps one of you can Church, VA, for this. 


define under what conditions the Lost That's it until next month. Thanks for all 


Data message appears. Is there an error in your comments and suggestions on the 


the 1771 logic? Oris it programmer error? column. ■ 
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Apparcitjnc. 



303/741-1778 

^ 4401 South Tamarac Parkway 
Denver, Colorado 80237 



Announces More 

NewProduds 

for your TRS40® Model I & III 



CHEXTEXT 



(pionounc«d Check Text) 



Apparat Inc. announces CHEXTEXT, a 
variable length dictionary which interacts 
with SCRIFTSIT®, to highlight potential 
spelling and typographical errors in a 

text file. 

Some of the CHEXTEXT features are: 

• Variable Length Dictionary: The 
dictionary may be supplemented, 
depending on your system hardware 
(i.e. disk drive storage). 

• Menu Driven. 

• User Oriented. 

• Dictionary may be complemented 
with unique industry jargon. 

• A dual 80 track drive supports an 
approxinnate 50,000 v\cird dictiorrary. 
Smaller dictionaries are provided with 
Basic CHEXTEXT Package (10,000 to 
20,000 v^/ords.) Minimum system 
requirerrtent— 2 disk drives and 48K. 

• Complete documentation. 

• Reduces time required for 
proofreading. 

Available from Appaiot, Inc. for only 

$7995 

Catalog No. 2-148 



TRS^O DIGITAL TALKER: 

A low cost alternative to the TRS-80 Voice 
Synthesizer. 

Allows voice synthesis vA\h no additiortal 
hardware on your TRS^O Model I Lavei II 
or Model III 16K versions. The voice sigrials 
are ger»erated via the cassette output 
port. A Radio Shack external speaker/ 
AMP can be used for sound output. 

Features 

Comes Virtth 16 preprogrammed v^rds 
Digits 0-9 
+ Plus 

Minus 
/ Divided by 

= Equals 

Times 
And calculator mode sofhA«3re 

Possible Applications utilizing the 
techniques internal to this program are: 

• Talking clock 

• Program reader 

• Computer generated sound to aid in 
visual problems 

Supplied on Diskette or tape 
(piease specify) for only S29.95. 
Catalog No. 1-026 

CATALOG CORRECTIONS 

CAT #1-223 Price should be $195.95 

instead of $39.95 

CAT #1-225 Price should be $24.00 

instead of $39.95 

CAT #2-405 Price should be $99.00 

instead of $79.00 

CAT #1-403 Price should be $549.00 

instead of $645.00 

Don't forget to ask for your Free 1961 
Apparat catalog v^^en placing your 
order. 



"On-going Support for MIcrooomputers' 



^REGISTERED TRADEMARKS Of TANDY CORP. 



«a» 


(rastsf chirov 



^See List of Advertisers on page 306 
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j?9 APPLICATIONS 

%^^^ by Dennis Kitsz 



". . . / knew that time was short 

for me and my Model I. . . But in 

parting, I wished to give my trusty 

Model I a taste of. . . high resolution graphics." 



When I first saw the TRS-80 Color 
Computer, t knew that time was 
short for me and my Model 1. Those flashy 
graphics, those tiny dots, lines and cir- 
cles, and all that color won me over. But in 
parting, I wished to give my trusty Model I 
a taste of those same high-resolution 
graphics. 

This month's project Is the result— a 
grid of graphic dots as fine as those which 
make up the letters on the screen: 384 
across and 192 down. This month's proj- 
ect Is also the most complicated and cost- 
ly you will likely see in my column. I call it 
"The Detailer." It demands 30 integrated 
circuits, many hours of wiring, care in as- 
sembly, and about $75 in parts. 

After all the work, however, you will 
have a graphics addition with a resolution 
higher than any available commercially 
for the TRS-80, as well as more graphics 
detail than any other popular home com- 
puter. Although no actual grey scale is 
provided, shades of grey can be simulated 
by varying the density of the dots used. 

Now for the requirements. For greatest 
ease manipulating the screen, your 
TRS-80 should have 48K of memory. How- 
ever, this is not essential. Aside from an 
edge card connector to attach to The De- 
tailer, you will also have to place two wires 
directly inside your computer (one to its 
master clock, and one to its vertical sync 
line). Finally, the video monitor and the 
computer's video output will both attach 
to The Detailer. 

Design TTioughts 

There were several considerations in- 
volved in the design of this board. First, 
the video signal should relate as closely 
as possible to that provided by the TRS-80 
itself. Next, a relationship should be 
maintained between the TRS-80 graphics 
blocks and the higher resolution graphics 
areas. Finally, both high-resolution draw- 
ings and normal text and graphics should 
be available on the screen simultaneously. 

The Detailer is designed so Its dot se- 
lection and video synchronization are 
identical to that produced by the TRS-80; 
this Is done simply— by stealing the 
TRS-80 video circuitry IC by 10. Also, the 
output signal is of the same amplitude 



and timing, thereby providing perfect syn- 
chronization between the two units. And, 
finally, it creates its graphics indepen- 
dently of the text and graphics normally 
within the TRS-80, meaning txjth may be 
mixed on a single monitor, or the TRS-80 
and The Detailer may be fed to separate 
video monitors. 

This high-resolution addition consists 
of several major blocks: 
1.A video "countdown" chain almost 
identical to that inside the TRS-80, 
which provides row and column ad- 
dresses for the video dots, and a set 
of horizontal and vertical synchroni- 
zation and blanking signals for the 
video monitor. 
2. 12,288 bytes of random access mem- 
ory to store the high-resolution 
graphics information. Dynamic 
RAMs (type 41 16— the same as those 
used for normal TRS-80 memory) are 
used for this. 

3. A latch and shift register to capture 
the graphics dots and shift them out 
one at a time to the video screen. 

4. Write-select circuits to fill the high- 
res memory from the TRS-80, and 
read-select circuits for use by The De- 
tailer. Memory refresh (dynamic 
RAMs are used) is provided automati- 
cally by each screen display cycle. 

Immediately upon connecting The De- 
tailer, very fine-definition video graphics 
are available without complicated syn- 
chronization and control-twiddling. 

Circuit Detalis 

The timing for The Detailer can be 
achieved in two ways: first, via a self-con- 
tained crystal oscillator made up of Z1, 
sections a/b/c, two resistors, a variable ca- 
pacitor, and a crystal. The crystal (10.6445 
MHz) is available from Radio Shack as a 
special order item, for $4.95. 

The second method is easier and more 
reliable. The clock timing signal is provid- 
ed by the TRS-80 itself at Z42, pin 6. By 
running a wire from this integrated circuit 
inside the computer case to the high-reso- 
lution board, accurate and synchronized 
timing of the video Is possible. 

The timing pulse Is then fed to Z2. This 
pulse has three results: It toggles the vid- 



eo shift register, which sends dots to the 
screen at a 10 MHz rate; It is divided into a 
video divider chain signal (0.887 MHz) for 
the column, line and row selection; and It 
creates the video byte latch signal (1.774 
MHz combined with 3.5481 MHz for a 
short latching pulse). 

Z4 through Z7 represent the video divid- 
er chain itself. Sixty-four columns, twelve 
lines and sixteen rows are addressed by 
these dividers; the dividers also determine 
the occurrence of horizontal synchroniza- 
tion (at Z5 pin 11) and vertical synchroniza- 
tion (at Z7 pin 11). The simultaneous oc- 
currence of horizontal and vertical sync 
determines the blanking period (the time 
during which the video monitor's electron 
beam Is off), provided by Z9a. For details 
on the operation of the video countdown 
chain, read the TRS-80 Technical Refer- 
ence Handbook, which contains an excel- 
lent description. 

High-res memory is selected in much 
the same way as that In normal video 
memory. In this case, when address lines 
14 and 15 are high, the high-resolution 
video is selected. The output of Z15b then 
swings low, switching multiplexers Z10 
through Z13 from the video divider chain 
to the computer address lines. 

Simultaneously, the high-res refresh/ 
select lines (found at the input of Z20) are 
switched to the computer, completing 
computer selection of high resolution 
mode. If the computer's write (WR) line is 
also low at that time, then the high-resolu- 
tion memory Is written into by the TRS-80. 

The video byte selected by the high-res- 
olution board is latched into Z16, and 
shifted out a bit at a time through Z17. 
This shifted dot pattern moves through 
Z15d to Z30, where its voltage level is ad- 
justed to be compatible with normal video 
output. The horizontal and vertical sync 
signals, meanwhile, are fed through Z27, 
Z28, and Z29, and subsequently mixed to 
provide a composite video output. 

This output Is then mixed with its syn- 
chronous partner, the video ouput of the 
TRS-80. The two are synchronized by Z31, 
which, when power is applied to The De- 
tailer, switches high. The vertical sync sig- 
nal from Z66 pin 12 on the TRS-80 clears 
this circuit, allowing the clock pulses to 
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begin counting through the video divider 
chain, if for some reason the two txiards 
get out of sync, momentarily depressing 
S1 w\\\ again trigger Z31, restoring syn- 
chronization. 

Construction Hints 

The Detailer is not an easy project to 
tackle. It requires considerable patience, 
and you must follow a few important 
guidelines: 

1. Use the power supply as shown. It's 
crucial that the - 5 volt power line be 
stable first and last, so do not at- 
tempt to change the arrangement of 
parts. 

2. Bypass capacitors on all Integrated 
circuits are vital. Use 0.1 microfarad 
capacitors between +5 volts and 
ground at each IC, and use good 
quality glass or tantalum capacitors 
between +5 and ground, +12 and 
ground, and -5 and ground on the 
memory chips. 

3. Handle the memory chips with care, 
and don't put them in their sockets 
until the circuit is complete. Also, ap- 
ply power and test the voltages be- 
fore putting the memory chips in 
place. Then remove power and insert 
the chips. 

4. Wire-wrap carefully, and keep con- 
nections short and clean around the 
memory and multiplex areas, partic- 
ularly where the CRAS, CCAS, 
CMUX, MRAS, MCAS, and MMUX 
lines are found. 

5. Put a heavy heat sink on the 7805 
voltage regulator, or use a separate 
five-volt regulator for the memory 
chips. Without a heat sink, the power 
rating of the 7805 can be exceeded 
and the board will show many memo- 
ry errors. 

6. The board cannot be successfully 
accessed at high speed. If you have a 
high speed modification In your com- 
puter, make sure it returns to normal 
speed when writing to the high-res 
memory. 

7. Three hundred nanosecond 4116 dy- 
namic RAMs will give the best re- 
sults. The memory select circuitry 
during screen access is very fast, and 
can outrun some of the old standard 
450 nS memories. 

8. The line marked "HIRES"" on the 
schematic is the most time-sensitive, 
and likely to cause memory drop- 
outs. Be sure to use the pull-up and 
pull-down resistors on this line. 

9. Occasionally, random dots will turn 
on in a wire-wrapped version of this 
circuit. Since a copy of this memory 
Is stored In your TRS-80's RAM, a 



Table 1. POKE Codes for High-Resolution 



IN BINARY 



1 

10 

11 

10 

10 1 

110 

111 

10 

10 1 

10 10 

10 11 

110 

110 1 

1110 

1111 

10 

10 1 

10 10 

10 11 

10 10 
10 10 1 

10 110 

10 111 

110 

110 1 

110 10 

110 11 

1110 

1110 1 

11110 

11111 
10 



Note Lighted dots are marhod with a star (*); blank 
"jrdota" are marked with an o (O). 



DOTS 





0* 


0*0 


0** 


0*00 


0*0* 


0**0 


0*** 


0*000 


0*00* 


0*0*0 


0*0** 


0**00 


0**0* 


0***0 


0**** 


0*0000 


0*000* 


0*00*0 


0*00** 


0*0*00 


0*0*0* 


0*0**0 


* * * * 


0**000 


* * * 


0**0*0 


* * * * 


0***00 


0***0* 


0****0 


Q * * * * * 


* 



HEX 

00 

01 

02 

03 

04 

05 

06 

07 

08 

09 

0A 

0B 

0C 

0D 

0E 

0F 

10 

11 

12 

13 

14 
15 

16 

17 

18 

19 

lA 

IB 

IC 

ID 

IE 

IF 

20 



Grapflfcs 

OCTAL 



01 

02 

03 

04 

05 

06 

07 

10 

11 

12 

13 

14 

15 

16 

17 

20 

21 

22 

23 

24 
25 

26 

27 

30 

31 

32 

33 

34 

35 

36 

37 

40 



DECIMAL 



1 

2 

3 

4 

5 

6 

7 

8 

9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 

20 

21 

22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 

TaDte continues 
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MODEL II 



T.'-^VM«w»P-*-. 




26-4002 

64K 1 Drive 

$3440.00 

26-4160 1 Drive Exp $1034.00 

26-4161 2 Drive Exp 1574.00 

26-4162 3 Drive Exp 2114.00 

26-4530 Scripsit II 265.00 

26-4512 Profile il 162.00 

26-4511 Visicolc II 265.00 

26-4501 Gen Ledger 180 GO 

26-4506 Mail List 72 00 



PRINTERS 




CEnTRDniCS 



$ DISCOUNT $ 

X XVli^^Ovf DEALER A301 

COMPUTER SPECIALISTS 

CALL US. . . 
SAVE MONEY 

We carry the full line of TRS-80 Computers. All 
other R.S. software, furniture, and accessories 
at discount from catalog price. We stock most 
items to assure you fast delivery and save you 
money. 

26-1140 Exponsion Interface $249.00 

26-1141 16KExp. Interface 359.00 

26-1142 32K Exp. INterface 469.00 

26-1 145 RS232CBoord 84.00 

26-1160/1 Mini Disk Drive 419,00 

26-1563 Scripsit-Disk 79.00 

26-1566 Visicalc 83.00 

* * * * . 'PRINTERS* • . • . * 

26-1155 Quick Printer 187.00 

26-5 167 9'/: Dot Matrix Printer 360,00 

26-1166 Line Printer VI 1080,00 

26-1158 Daisy Wheel II 1799.00 

26-1165 Line Printer V 1710.00 



MODEL III 




26 1061 4KI $629.00 

26-1062 I6K III 865.00 

26 1063 32K III 

W '2 Drives. RS232 2225.00 

COLOR 




3001 4K $353.00 

3002 16K Ext. Basic 533.00 

3008 Joysticks 22.50 

3010 Color Video 353.00 

1206 Recorder 54.00 




Pocket Computer 

' .'.jyi aum mmmmmmmmmmmmmmmmm 
o^wJOLJL_;oc.:LJL.aDaoi3 

- ■ ■ '■ ■'-- --'^ ';■ -. OOOOCl 

26 3501 1,9K PC $221.00 

26-3503 Cassette SF 45.00 

14-812 Recorder 72.00 

1-800-841-0860 ToII Free 



BEST PRICES 

Fast 100 CPS Centronics 

730-lA Printer $577.00 

Text Quality Centronics 

737-1 Printer $737.00 



commodore 

AUTHORIZED DEALER 
CALL FOR PRICES 



ALL POCKET AND COLOR 

COMPUTER SOFTWARE 

SOLD AT DISCOUNT 

WRITE US FOR A 
FREE CATALOG 



Order Entry 



^iCRQ ^flf^iflGE^EI^T SVSTEinS, IMCf 



No Taxes on Out Of 
State Shipments 



Immediate Shipment 
From Stock on Most Items 



DOWNTOWN PLAZA SHOPPING CENTER 
115 C. SECOND AVE. S.W. 
CAIRO, GEORGIA 31728 
(912) 377-7120 Ga. Phone No. & Export 

TR5-80 is a ragittorsd trademark of the Tondy Corp. 



R.S. 90 Day Limited Warranty 
F-48 Form Provided 

Largest Inventory 
In TheS.E. U.S.A. 
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subroutine to write ttiis copy back in- 
to high-resolution RAM can be used: 



LD 


HL,0COOOH 


LOOP LD 


A,(HL) 


LO 


(HL).A 


INC 


HL 


LD 


A.H 


OR 


L 


jn 


NZ.LOOP 


RET 





How It Works and How to Use It 

Look carefully at the dots that make up 
the letters on your TRS-80 screen. Set a 
few graphics characters, and turn the con- 
trast and brightness down so the individ- 
ual dots are clearly defined. You will see 
that each graphic Set point is really made 
up of a block of dots, three dots across 
and four dots down. Now, print a CHR$ 
(191), and notice that this full block (made 
up of six of the Set points) is six dots 
across and twelve dots down. 

The Detailer is set up to occupy the top 
16K of memory space in the TRS-80. Each 
byte of high-resolution memory affects six 
screen dots, in the same way that each 
byte of normal screen memory affects an 
area six dots across. The difference is that 
The Detailer only creates a character one 
dot deep. That means it takes twelve 
bytes of memory to create a graphics 
block six dots across and twelve dots 
down (like CHR$(191)). 

High-resolution graphics act somewhat 
like a binary window: Each bit of memory 
lights up one bit on the screen, like this 
•'****. The right-most bit is bit 0, and 
the leftmost is bit 5. Bits 6 and 7 are not 
needed, since each graphics character is 
only six dots wide. Table 1 shows how a 
single memory cell would affect the dots 
on one line of the screen, counting in bi- 
nary, hexadecimal, octal and decimal. 

Chances are you'll never see me use oc- 
tal numbering in this column again. But it 
just so happens that these graphics lines 
are six dots across. Whereas hexadecimal 
breaks groups of binary digits into fours 
(0000 0000 0000), octal breaks them up in- 
to threes (000 000 000 000), and is mainly a 
heritage of 12-bit minicomputers. (Note to 
you machine language programmers- 
did you know the architecture of the Z-80 
is really octal? Check it out.) Octal can be 
a convenient way of visualizing the six- 
dot-wide "bytes". If hex or octal doesn't 
interest you, then decimal will work just 
fine; cut out or copy Table 1, and refer to 
the decimal values when drawing lines. 

Before drawing lines, it's time to hook 
up The Detailer. Follow these steps: 

• Attach the edge card connector to the 
TRS-80. 



* * 

* * 

* * * 

* * 

* * * 

* * * 

* * * * 

* * o 

* * * 



1 

1 

1 B 

1 

1 

1 
1 
1 
1 



1 

10 
11 

10 
10 1 
110 
111 



* * * 


10 10 10 


* * * * 


10 10 11 


* * * 


10 110 


* * * * 


10 110 1 


* * * * 


10 1110 


* Q * * * * 


10 1111 


* * 


110 


* * * 


110 1 


* * * 


110 10 


* * * * 


110 11 


* * * 


110 10 


* * * * 


110 10 1 


* * * * 


110 110 


* * Q * * * 


110 111 


* * * 


1110 


* * * * 


1110 1 


* * * * 


1110 10 


* * * * * 


1110 11 


* * * * 


11110 


* * * * * 


11110 1 


***** 


111110 


****** 


111111 



21 


41 


33 


22 


42 


34 


23 


43 


35 


24 


44 


36 


25 


45 


37 


26 


46 


38 


27 


47 


39 


28 


50 


40 


29 


51 


41 


2A 


52 


42 


2B 


53 


43 


2C 


54 


44 


2D 


55 


45 


2B 


56 


46 


2F 


57 


47 


30 


60 


48 


31 


61 


49 


32 


62 


50 


33 


63 


51 


34 


64 


52 


35 


65 


53 


36 


66 


54 


37 


67 


55 


38 


70 


56 


39 


71 


57 


3A 


72 


58 


3B 


73 


59 


3C 


74 


60 


3D 


75 


61 


3E 


76 


62 


3F 


77 


63 



• Attach the video monitor cable to The •Turn on the TRS-80. 
[jg^ajler, ©Turn on The Detailer. 

• Attach a cable from The Detailer to •Set the memory size to 49152. 

the TRS-80. Clearing the Screen and Drawing a Line 

• Attach the two wires from inside the ^"'*" « 

TRS-80 to The Detailer, as shown in the The screen will present the memory size 

schematic query, as usual. If you do not see it, adjust 
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10 


CLS : A$ = "12345678901234567890" 


20 


X = VARPTR(A$) : Y = PEEK(X+1) + 256*PEEK (X+2) 


30 


Z = Y : FOR N = 1 TO 15 : READ A : POKE X,A : NEXT 


40 


DATA 175,245,33,0,192,241,119,35 


50 


DATA 245,124,181,32,248,241,201 


60 


POKE 16526, PEEK(X+1) : POKE 16527 , PEEK CX+2) 


70 


REM * FOR DISC SYSTEMS USE DEFUSR0=Z 


80 


M = USR(0) : REM * FOR DISC USE K = USR0(0) 




Program Listing 1 



DOTS 






IN 


BINARY 


HEX 


OCTAL 


DECIMAL 








* 














1 


01 


01 


1 





* 














1 





02 


02 


2 


0* 














1 








04 


04 


4 


0*0 











1 











08 


10 


8 


0*00 








1 














10 


20 


16 


* 








1 














20 


40 


32 








Table 2. Individual Screen Dots 







the balance control until it appears. If 
there is any tearing, twiddle the V-Sync 
and H-Sync controls until It stabilizes. 
What you will probably see Is a screen 
filled with garbage dots as well as the 
memory size question. First, clear the 
high-resolution screen using Program 
Listing 1. 

Drawing horizontal lines is easy. A solid 
line is made up of continuous "on" dots, 
like this: -*■•••/'"•**/•**"•/""'*/ 
**"***/*'""*. To draw a horizontal line 
across the top of the screen, we need to 
know where the high-resolution memory 
is. It runs from COOO hex (49152 decimal)to 
FFFF hex {65535 decimal). But wait— Lev- 
el II doesn't like Integers over 32767, so 
here's the rule: If an Integer number X Is 
greater than 32767, then X- 66538 Is the 
way Level II needs to see It. So, The Detall- 
er's memory runs {in Level II talk) from 
-16384 to -1. 

That makes the first graphics line 64 
places long, from -16384 to -16321. 
Enter these commands: FOR X= - 16384 
TO -16321: POKE X,63:NEXT. To under- 
stand the command to POKE X with 63, re- 



fer to Table 1. Sixty-three is the decimal 
value to set all dots on. How at>out a 
dashed line? Try this: FOR X = - 18384 TO 
-16321:POKE X,56:NEXT. Or, as a final 
example, a dotted line: FOR X= -16384 
TO -16321:POKE X,42:NEXT. By trying 
different POKE values, the density and 
character of the horizontal line changes. 

Vertical Lines— A Different Story 

Vertical lines are a different story, be- 
cause each vertical dot Is 64 memory loca- 
tions away from the one above and below 
it. This draws a vertical line from top to 
bottom In the center of the screen: FOR 
X=- 16352 TO -32STEP64:POKEX,1: 
NEXT. There's a trick to doing single verti- 
cal lines. If in this example the POKEd val- 
ue were 16 Instead of 1, the line would 
move to the left {try it). There are 384 dots 
across each line of the screen, but only 64 
memory locations to hold them— six dots 
each. Table 2 Is an excerpt of Table 1, 
showing only those POKE values with in- 
dividual dots, from which thin vertical 
lines can be built. 

Now, I know that's not immediately 



comprehensible; it was hardly clear to me 
when I built It! Remember that horizontal 
lines were made up of contiguous groups 
of six bits, each group in a single memory 
location. Vertical lines don't have any con- 
tiguous bits. Every bit belongs to a differ- 
ent memory location, 64 memory loca- 
tions apart. Look at this: 

oooo-o 

oooo-o 

OOOO'O 
0000-0 
0000-0 

0000-0 
0000*0 

TTiere's a vertical line, drawn with a state- 
ment something like: FORX= -16352 TO 
STEP 64:POKE X,2:NEXT. 

Do you see how it carries with It a bur- 
den of five other bits representing unlit 
dots? Now the next question: Let's say we 
already have a vertical line like the one 
above. How is a line drawn right next to It? 
Thlsprogramwon'tdolt:FORX= -16352 
TO STEP 64:POKE X,4:NEXT, because it 
will draw a new line in the right place, but 
POKEing 4 {dots 000*00) will erase We //ne 
already there. If you know what line is al- 
ready In place, you can draw it by POKE- 
ing X with 5 (dots 000"*0), which will cre- 
ate the new line and redraw the second. 

There's a better way, but only if you 
have 48K memory in your TRS-80. Exam- 
ine these commands: FOR X= -16352 
TO STEP 64:POKE X,(4 OR PEEK{X) ): 
NEXT. 

What? Time for a quick review of the 
logical OR function. Logical OR says: Giv- 
en a pair of items, if either the first or the 
second is true, the result will be true. In 
this case, it can be rephrased: Given a pair 
of graphics bits, if either the first or the 
second is on, the result will be on. Here Is 
how it looks: 

Original group of bits (single lines): OOOO'O 

New group of bits {added line): 000*00 

OR function; 

Resulting group ot bits (new lines): 000* *0 

To draw another vertical line a few spaces 
to the left, we would OR the new line with 
those present in the very same way: 



Two lines now present: 000' *0 

New group of bits (added line): '00000 

OR tunction: 

Resulting group of bits (new lines); '00* '0 



The Disappearing Line 

Now how about erasing a line? For hori- 
zontal lines, the process Is pretty simple 
...POKE in zeroes, like this: FOR X = 
-16384 TO -16321:POKE X,0:NEXT. 
That should makethelineon the top of the 
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**SPECIAL**SPECIAL** 

TRS-60 ADD ON DRIVES 

IMMEDIATE DELIVERY 



SINGLE SIDED $225.00 
DOUBLE SIDED $345.00 



COMPLETE SYSTEMS 
SINGLE SIDED $365,00 
DOUBLE SIDED $485.00 

INCLUDES: 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ^2« 

20932 CANTARA ST 
CANOGA PARK, CA 91304 
(213)341-7914 

VISA AND MASTER CHARGE ACCEPTED 



INTERFACE EXPANSION BOARD) 



For the TRS 80' 



Miao-D€<;iGn 




The Interface Expansion Board gives 
your computer these features: 



MDX-1 



Phone Modem 

2K E-PROM OPTION '" Stock Now 

32 K Memory ^^ ^'^"^ * '^^' "^^'^^' 

Real-Time Clock 

Parallel Port 

RS-232 Port 

Dual Cassette Lirie 

Floppy Disk Controller' MDX-2* 

On Board Supply 

Silk Screen 



64.95 



7456 



Solder Mask 
Expansion Port 
Manual 



Ada 5.00 loi shipping 
& handling Texas tes- 
idenis ada 5°'o sales 
lax. 



MANUALS S7.95 

■FREE PAMPHLET AVAILABLE' 
Call or write 



roicRo-DG^icn 

P.O. Box 748 

Manchaca, TX 78652 

512-282-0225 

TfIS 30 IS a Trademark ol Tandy Corp 



►^379 
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AF 


00100 




XOR 


A 


F5 


00110 




PUSH 


AF 


21 00 C0 


00120 




LD 


HLr0C000H 


Fl 


00130 


LOOP 


POP 


AF 


77 


00140 




LD 


(HL) ,A 


23 


00150 




INC 


HL 


F5 


00160 




PUSH 


AF 


7C 


00170 




LD 


A,H 


B5 


00180 




OR 


L 


20 F8 


00190 




JR 


NZ,L0OP 


Fl 


00200 




POP 


AF 


C9 


00210 




RET 






Program Listing 2 







Program Listing 3. Drawing Random Horizontal and Vertical Lines 

10 CLS : REM * SAVE THIS PROGRAM BEFORE RUNNING IT (LINE 301) 

20 REM * HI-RES CLEAR SCREEN ROUTINE FOLLOW IN DUMMY STRING 

30 AS="12345678901234567890" : REM * SET UP DUMMY M/L STRING 

40 X=VARPTR(AS) : REM * DISCOVER INFO. ABOUT A? LOCATION 

50 Y=PEEK(X+1) + 256*PEEK(X+2) : REM * A? MEMORY LOCATION 

60 Z = Y ; REM * SET UP VARIABLE FOR USE IN USR ENTRY POINT 

70 FOR N = 1 TO 15 : REM * 15 DATA ELEMENT READ/POKE LOOP 

80 READ A : POKE Y,A : Y = Y + 1 ; NEXT : REM * POKE M/L INFO 

90 DATA175, 245, 33, 0,192, 241, 119, 35, 245, 124, 181, 32, 248, 241, 201 

100 DEFUSR0=Z : REM * USE THIS FOR DISK SYSTEM - LII BELOW: 

110 REM * POKE 16526, PEEK(X+1) : POKE 16527 ,PEEK(X-f2) 

120 M=USR0(0} : REM * USE M=USR(0) FOR LEVEL II SYSTEMS 

130 FOR Q = 1 TO 100 : REM * READY TO DRAW 100 RANDOM LINES 

140 Z = -16384 : REM * SEE TEXT FOR DESCRIPTION OF THIS VALUE 

150 Y = 64 : REM * THIS OFFSET DEFINES VERTICAL POSITIONING 

160 A = RND(Y)-1 : REM * CHOOSE ANY OLD HORIZONTAL BYTE 

170 AA = (RND{256)-1)*64 : REM * CHOOSE A VERTICAL AREA 

180 B = RND(Y)+A : IF B> 63 THEN B = 63 : REM * HOR. GUIDE 

190 C = (RND(256)-1)*64 : REM * CHOOSE ANY OLD VERTICAL BYTE 

200 CC = RND(63) : REM * CHOOSE A HORIZONTAL POSITION HERE 
210 E = RND{255)+D : IF E > 255 THEN E = 255 ; REM * V. GUIDE 

Program continues 



220 E = E * 64 : REM * DEFINE WHICH VERTICAL LINE TO BE USED 
230 F = RND{7) : REM * SELECT A RANDOM VERTICAL BIT POSITION 
240 IF F = 3 THEN F = 4 ELSE IF F = 5 THEN F = 8 ELSE 
IF F = 6 THEN F = 16 ELSE IF F = 7 THEN F = 32 : 
REM * CONVERSION OF RND{7} TO A VERTICAL BIT (TABLE 1) 
250 REM * ACTUAL DRAWING OF RANDOM LINES BEGINS BELOW: 
260 FOR X = A+AA+Z TO B+AA+Z : REM * GET HORIZONTAL POSITION 
270 POKE X,63 : REM * 63 = 111111 FOR FULL LINE (SEE TEXT) 
280 NEXT : REM * DRAWING HORIZ. LINE IS FASTER THAN VERT. 
290 FOR X = C+CC+Z TO E+CC+Z STEP 64 : REM * GET VERTICAL 
300 POKE X,(F OR PEEK(X)) : REM * SEE TEXT ABOUT OR FUNCTION 
310 NEXT : REM * NO LINES ARE ERASED IN THIS DEMO PROGRAM 
320 NEXT Q : REM : COMPLETE DRAWING OF 100 HI-RES LINES 
330 GOTO 120 : REM * AND REPEAT HI-RES CLS AND DO IT AGAIN 



10 


FOR > 


= 20480 


TO 20505 


20 


READ 


A : POKE 


X,A : NEXT 


30 


POKE 


16526,0 


; POKE 16527,0 


40 


M = USR (0) 




50 


DATA 


175,245, 


33,0,192,241 


60 


DATA 


119,35,245,124,181,194 


70 


DATA 


5,80,1,0 


,128,205,96 


80 


DATA 


0,241,60 


,245,195,2,80 


Program Listmg 4. Vertical Line Drawing Program— BASIC Listing 



Program Listing 5. 


Vertical Line Drawing Program— 


4ssem^/y Listing 




00090 




ORG 


5000H 


AF 


00100 




XOR 


A 


P5 


00110 




PUSH 


AF 


21 00 C0 


00120 




LD 


HL,0C000H 


Fl 


00130 


LOOP 


POP 


AF 


77 


00140 




LD 


(HL),A 


23 


00150 




INC 


HL 


F5 


00160 




PUSH 


AF 

Program continues 



MICRO-SO^'^ CASSITTES— 
100% EtROR-FUE 




LENGTH VJ*ACK FACK 

C-10 ?lff 59« 

C-20......89( 7t« 



Fully Guaranteed! 
Premium 5-Screw Construction 
Used By Software Firms Nationwide 
Custom Cases, Add 19c Each 
'Stiipping. Add $1.50 Per Pack 
COD HOT LINE 
1-(206)-675-6143 



MICRb-SO^M iMQ 

E-2e6fi.NO.||UMY ROAD 
OAK HARMR. vrAM877 



KEEPIT 3.0 

Enhances Level II Basir 
Written by Dennis Bathory Kilsz 

KEEPIT performs Ihese funclions: 

• Single-step a Basic program 

• Resel Memory Si^.e from Basic 

• Save a running program with variables 

• Save machine code or a memory block 

• Restore an accidentally deleted program 

• Observe & change memory locations 

KEEPIT also features: 

Keyboard debounce, audible beep, and auto- 
repeat! KEEPIT 3.0 is written in machine 
language and resides in less than 1,000 bytes of 
high memory, EDTASM source code is supplied 
so the user can relocate KEEPIT to any conven- 
ient location. 

How lo order KEEPIT: 

Level II users will wonder how they ever 
lived without it! KEEPIT 3.0 is extremely 
valuable as a time and frustration saver! To 
receive your copy, send your name, address 
and just S9.95 lo: 

"^^ 1806 Ada Street 

Lansing, MI 4^910 

Ph. 517/485-0344 

or 487-3358 



l-'isa & Master Charge add 4%. 
COD. add $1.50. 
Add 7.5e for First Class Delivery. 
All orders sliipped within 24 hours! 




-See List ol Advertisers on page 306 



80 Microcomputing. July 1981 • 63 



^APPIICATIONS 



7C 




00170 


LD 


A,H 


B5 




00180 


OR 


L 


C2 05 


50 


00190 


JP 


NZ,5005H 


01 00 


80 


00200 


LD 


BC,8000H 


CD 60 


00 


00210 


CALL 


00e0H 


Fl 




00220 


POP 


AF 


3C 




00230 


INC 


A 


F5 




00240 


PUSH 


AF 


C3 02 


50 


00250 


JP 


5002H 



Parts List 



screen disappear, because all the high- 
resolution graphics dots on that line are 
turned off. 

But what about the vertical line? Again, 
it gets just a bit taclty. If we POKE a zero, 
we will erase any of the six possible verti- 
cal lines in that group; here's the status of 
the three vertical lines drawn above: 



■00"0 
■00--0 

•w*o 

•0O'*0 
-00"0 
■OO--0 
'00"0 



. . .and so on. Another logic function will 
be called up for this task: logical AND, 
along with the concept of "masking". 
First, there's the logical AND function, 
which states: Given a pair of items, only if 
both the first item and the second item are 
true, will the result be true. Converted to 
the high-resolution graphics model, it 
reads: Given a pair of graphics bits, if both 
the first and the second graphics bit are 
on, then the result will be on. As an exam- 
ple, the vertical group we currently have is 
ANDed with a group which is completely 
turned on: 

Original group of blls (three lines): *00"0 

New group of bits (six lines): 

AND function: 

BesuH of original AND new group: '00* '0 

Essentially, nothing has changed, be- 
cause wherever a bit was turned on in the 
original, it is also turned on in the second 
group. But here's the problem: Let's say 
the fourth dot of this group is to be turned 
off. In other words, '00**0 is to be 
changed to 'OOO'O. 

To solve this, consider how a photog- 
rapher or painter obtains a properly 



balanced and bordered picture or photo. A 
photographer will place a cardboard 
frame around a photo to evaluate how it 
looks, covering up uninteresting or obtru- 
sive areas. A painter will tape over areas 
which are not to be painted In order to cre- 
ate a sharp twrder. The first uses a card- 
board mask; the second uses masking 



21 
Z2 
Z3 

Z4 

25 
26 
27 
Z8 

zg 

210 
211 
212 
213 
214 
Z15 
216 
217 
218 
219 
Z20 
221 
222 
223 
224 
Z25 
226 
227 
228 
229 
230 
231 
232 
233 

R1 



74LS04 

74LS92 

74LS74 

74LS93 

7-ILS93 

74LS93 

74LS93 

74LS11 

74LS02 

74LS157 

74LS157 

74LS157 

74LS157 

74LS74 

74LSO0 

74LS174 

74LS166 

74LS157 

74LS157 

74LS157 

Up4116 

up4116 

up4116 

up4116 

up4116 

up4116 

74004 

74004 

74CO0 

75452 

74LS00 

74LS32 

74LS02 

IK 



R2 

R3 

R4 

R5 

R6 

R7 

R8 

R9 

RIO 

R11 

R12 

R13 

R14 

R15 

R16 

R17 

nt8 

R19 
R20 
Fei 
R22 
R23 
R24 
R25 
R26 
R27 

C1 
02 
C3 
C4 
C5 

01 
02 



IK 

IK 

910 ohms 

910 ohms 

1.8K 

47 ohms 

270 ohms 

120 ohms 

330 ohms 

75 ohms 

10K 

10K 

100 ohms 

470 ohms 

470 ohms 

1K 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

33 ohms 

IK 

47 pf 
.01 mt 
10 mtnev 
330 pf 
,046 mf 

2N3904 
2N3904 



XI 10.6445 MHz crystal 




Fig. 2. Memory select-refresh sectior) of the hi-res board. Note that all six memory cir- 
cuits (Z21 through Z26) are connected in parallel. 
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NOW FOR THE TRS-80 
MODELS I & 



LOGICAL SYSTEMS, INC. ANNOUNCES 





^■35 



THE TRS-80 OPERATING SYSTEM WITH: 

• Double Sided & Double Density Support, 

• Hard Drive Support Up To 10 MEGS As A Single Drive, 

• Inter mix 5", 8" and Hard Drive Up To 8 Total Drives. 

• A 250 Page Manual 

• Complete Technical intormation 

• A TOLL-FREE 800 Number tor Customer Service 

• A Full Time Staff to Handle Customer Service 

• A Bulletin Board on MicroNet 

• A LDOS NEWSLETTER 

• A Liberal Update Policy 

• An ENHANCED BASIC 

• A Complete Job Control Language 

• Device Independent 

• Media Compatible Model I to Model 111 

• A One Year Warranty 



* SPECIFIC HARDWARE IS REQUIRED TO UTILIZE THESE FEATURES 



The Ultimate In Operating Systems Model 1 & iii . . . Only 



$>] 4900 



FOR FURTHER INFORMATION CONTACT THE DISTRIBUTOR NEAREST YOU: 



(West) 

LOBO DRIVES I NT! 

354 S. Foirview Ave 

Goleta.CA 93117 

(805)683-1576 



TRS-SO^atrademartcofTandyCorp 



(Central) 

GALACTIC SOFTWARE LTD. 

11520 N, Port Washington Rd, 

Mequon, Wl 53092 

(414)241-8030 



(East) 

MISOSYS 

5904 Edgehill Dr. 

Alexandria, VA 22303 

(703)960-2998 

DEALER INQUIRES WELCOME 

LDOS IS o product of LSI Inc 




- See List of Advertisers on page 306 
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Fig. 4. Horizontal and vertical synchronization circuits and video output circuit. Like the 
video divider chain, these circuits are almost identical to those used by the TRS-80. 



tape. The principle is the same with graph- 
ics dots. 

A mask of "on" dots is piaced over the 
dots we want to keep, and left off the 
areas we want to turn off. The AND func- 
tion is used, like this: 



Original group ot dots: 'OO' "0 

Mask o'on and off dots: ■•"0" 

AND tuncllon: 

Result after masking Is done: "000*0 



Using Table 1, you can find that the 
original group of dots is 38 decimai, and 
the mask is59decimal, and the result is 34 
decimai. The BASIC line to accomplish 
this example would be: FOR X= - 16352 
TO STEP 64:POKE X,(59 AND PEEK(X) ): 
NEXT. 

With all this in mind, try Program List- 
ing 3, which is a complete program to 
draw 100 random horizontal and vertical 
iines using The Detaiier. 

As a final example, Program Listings 4 
and 5 create a stream of vertical lines, 
drawn using values from to 63, and re- 
peating. You will see fine lines, simulated 
white and grey areas, and broad bands of 
the kind you could create with Set/Reset 
graphics. (Note: You must press Reset to 
exit from this program). 

Monkeys in the Works 

Back a few dozen paragraphs, you 
might recall a mention of 12 horizontal 
lines per group, for a total of 12,288 bytes. 
With some fast sleight-of-word, I hoped 
none of you would have done any quick 
calculations ahead of time. Because I 
chose to duplicate Radio Shack's video 
addressing scheme, the graphics units 
are six bits across. The two remaining bits 
are ignored, and don't appear in the cir- 
cuitry—only six 41 16's are used. 

However (I begin to sweat here), the 
4116 memories are 16K memories, mean- 
ing there are 16,384 bits available. Only 
12,288 are used. Where are the rest? Well 
. . .uh. . .they're. . .how do I say this. . . 
invisible. They are the unaddressed loca- 
tions between the twelfth line and the six- 
teenth line. 

Instead of one of my hopelessly confus- 
ing verbal explanations, look instead at 
Fig. 3. You'll see that locations - 16384 to 
- 16321 (hex GOOD to C03F) are line num- 
ber 1; -16320 to -16257 {hex C040 to 
C07F) are line number 2; and continuously 
down to - 15617 (C2FF hex), which is line 
number 12. At that point, four lines are un- 
addressed, which means that - 15616 to 
-15361 (C300 to C3FF hex) are unused 
memory locations. POKE something be- 
tween -15616 and -15361 and nothing 
appears on the screen. Oh, yes, It does go 
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Fig. 5. Power supply for the hi-res board has +12, +5 and - 5 volt -outputs. This design is critical— see text. 



into memory, but that memory isn't dis- 
played (oh, no!). 

As long as you're drawing horizontal 
and vertical lines, the invisible memory 
can be ignored. Just remember to consid- 
er the length of vertical memory when try- 
ing to draw such things as truly square 
boxes. When doing three-dimensional 
simulations, circles or ellipses, and other 
drawings where proportion and scale are 
important, you must take the unused 
memory blocks into consideration. 

High-resolution memory of the kind 
available from The Detailer can be a plea- 



sure; animations won't come alive as fast, 
but the clarity and shading made possible 
can add a new dimension to your home 
computer use. I would be happy to publish 
any fast machine language programs cre- 
ated for this board. 

Updates 

Have you tried to pick up one of the new 

lowercase chips from Radio Shack? The 
ones which sold for $12.93? Well, forget it 
for awhile. The latest price I paid (in May) 
was $37.50. Anyone for letters to Tandy's 
president about this curiously steep price 
increase? 



Model III users, please note: Most of the 
machine language software you see in SO 
Microcomputing that uses cassette input/ 
output will not work unmodified. You can 
try writing to the authors, but don't expect 
miracles. Many authors like myself have 
opted for the Color Computer instead of 
the Mod III. 

A printed circuit board is now available 
for the Micro Front Panel (May "Applica- 
tions"); write to me at Roxbury, Vermont 
05669 for information. Note that Radio 
Shack no longer stocks the 74LS373 
parts, but they can be obtained from other 
major suppliers. ■ 



MOVING? 

Let us know 8 weeks in advance so that you won't miss a s in- 
gle issue of 30 M'crocorT'p!j'i'"'q. 

Attach old label where indicated and print new address 
in space provided. Also include your mailing label 
whenever you write concerning your subscription. It 
helps us serve you promptly. 



If you have no label handy, print OLD address here. 



n 



Qa Name. 



Call 



>; 



Address 



□ Address change only 
n Extend subscription 
D Enter new subscription 
D 1 year $18.00 



n Payment enclosed 

(1 extra BONUS issue] 
n Bill me later 



t City. 



Name 



State. 



Zip. 



print NEW address here: 



Call 



Address, 



City. 



■ Slate. 



Zip. 
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^See List at AOvonisers on page 306 
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527 NEWS 

^^^ ^^ edited by Bert Latamore 



"Potential problems from non-ionizing 

microwave radiation have created 

the most controversy. . . ." 



Workers, Unions Concerned 
Over Video Display Health Issues 



Increasing concern among office work- 
ers in the U.S. and Canada over the pos- 
sible harmful effects of video display ter- 
minals is growing, as evidenced by sever- 
al union actions this past spring. 

In Toronto, the Communications Work- 
ers of Canada (CWC) convinced Bell of 
Canada that pregnant workers should be 
allowed to move the non-VOT tasks or 
take early leaves of absence. The decision 
followed a work boycott by four pregnant 
workers who feared that radiation from 
the terminals could harm their unborn 
children. 



^^Many (micros) 

do not offer detachable 

keyboards: the screens 

generally are not 

adjustable: the 

nonglare features. . . 

inadequate. . . " 



In San Francisco, employees at Blue 
Shield of California ended a 19-week 
strike that was called partly over what the 
Office and Professional Employees Union 
(OPEU) felt were poor working conditions 
at VDT stations. Concessions by Blue 
Shield included foot rests, better lighting, 
nonglare shields for terminals and adjust- 
able chairs. 

Potential problems from non-ionizing 
microwave radiation have created the 
most controversy, despite tests by the Na- 
tional Institute for Occupational Safety 
and Health (NIOSH) and the Food and 
Drug Administration's Bureau of Radio- 
logical Health that showed radiation lev- 



els below the U.S. standard of 10 milli- 
watts per square centimeter (10 mW/cm'). 
The CWC action came closely on the 
heels of a situation at the Toronto Star in 
which four women working on VDTs gave 
birth to children with birth defects. Fur- 
ther, the Newspaper Guild, which repre- 
sents 32,000 newspaper employees in the 
U.S. and Canada, has seen at least a 
dozen members develop cataracts, which 
some doctors feel were caused by the 
non-ionizing radiation. 

"The ToranfoSfar situation remains un- 
explained," says CWC Health and Safety 
Officer Gary Cwitco. "While many offi- 
cials and any number of scientists have 
said that the terminals were not responsi- 
ble, they can't tell us what was." 

While questions surrounding radiation 
from VDTs will probably not be answered 
for years, studies point to a number of 
other pressing problems. Poorly designed 
equipment and ill-conceived work places 
have prompted VDT operators to lodge a 
variety of health complaints with employ- 
ers and unions. 

At Blue Shield of California, for exam- 
ple, NIOSH found that 90 percent of a 
group it sampled had experienced back 
problems during the previous 12 months. 
Operators also reported tearing or itching 
of the eyes {79 percent), headaches {89 
percent), severe fatigue or exhaustion {83 
percent), blurred vision (78 percent), and 
eyestrain or sore eyes (93 percent). 

NIOSH and other researchers say that 
such problems are caused by poor light- 
ing, heavy glare, improperly adjusted 
chairs and tables, nondetachable key- 
boards and poor terminal displays. Both 
manufacturers and employers must as- 
sume partial responsibility— the manu- 
facturers because they've tended to em- 
phasize cosmetics over user comfort, and 
employers because they've rushed head- 
long into office automation without con- 



sidering the impact on workers. 

"Some employers have been respon- 
sive," says OPEU Research Director Gwen 
Wells. "But when they put a machine in 
the office, they put them there to increase 
production, and that's what they're con- 
cerned about. So you can talk about rest 
breaks, but they want their machines to be 
running full-time. Some of these changes 
cost money." 

For the moment, microcomputerists have 
remained relatively unaffected by the con- 
troversy. Says Steven Sauter, a psycholo- 
gist with the University of Wisconsin 



^Toorly designed 
equipment and . . . 

work places have 

prompted VDT 

operators to lodge 

a variety of health 

complaints. . ." 



Department of Preventive Medicine: 

"The types of users you're talking about 
are generally highly motivated, high-level, 
well-trained individuals. The work they're 
doing is more creative. So I think that the 
problems we're seeing right now in the of- 
fice will not exist In the home. 

"In the office you're talking about a fast 
pace, routine work, no control at all In the 
work place, no dedication to or personal 
interest in or understanding of what 
they're doing. At home, you can live with 
the inconvenience for short periods of 
time." 

But as microcomputers are used more 
in businesses and schools, problems are 
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sure to arise. Says Sauter of equipment 
for the home, "that stuff is still in the 
Neanderthal Age." Many do not offer de- 
tachable keyboards; the screens general- 
ly are not adjustable; the nonglare fea- 
tures are often inadequate; the quality of 
the terminal display— especially when a 
TV set is used — can cause a great deal of 
eyestrain. 
While consumer demand has com- 



pelled many mainframe and minicomput- 
er manufacturers to pay attention to 
human engineering, microcomputer firms 
have faced little pressure. In fact, some 
see little or no problem at all. 

"It used to be a big problem that there 
was no software," says a Tandy engineer. 
"Now we've got software for the ma- 
chines, and people start nit-picking. The 
major points are solved, and they're look- 



ing for the minor points." 

NIOSH researcher Dr. Marvin Dainoff 
takes a different approach. "People are so 
excited about these, and so impressed by 
their capabilities, that they'll overlook the 
problems," he says. "But I would guess 
that home users sooner or later will want 
better design." 

by Eric Matoney 
Kilobaud Microcomputing 



American Comes Home from Asia 
To Head Tandy's IVIanufacturing 



Seymour Bogltch, a top manufacturing 
executive from Tandy's Asian sub- 
sidiary, has been promoted to the new 
position of Senior Vice President for Elec- 
tronics Manufacturing for Tandy/Radio 
Shack, Fort Worth, TX. He will be respon- 
sible for Tandy's 26 manufacturing facili- 
ties in the U.S., Canada and Asia, and Tan- 
dy's two product development engineer- 
ing groups in the U.S. and Asia. He will 
report directly to Tandy President John V. 
Roach. 

Bogitch said his new position is a com- 
bination of two existing posts. 

"We have plants in the U.S. and Canada 
and in the Orient," hesaid."lnthepastwe 
had a vice president for North America in 
manufacturing and the equivalent in the 
Orient. No one was officially on top of 
both. John Roach used to do that." 

The new position, therefore, was a 
result of Roach's promotion. Bogitch was 
a natural choice for the job. An electrical 
engineer with a master's degree from 
Northeastern University, Boston, MA, he 
has been representative-director for 
manufacturing for Tandy Electronics — 
Asia, Tandy's Japanese-based Far East- 
ern subsidiary, for lOyears. Beforethat he 
installed radio stations. He worked direct- 
ly under the Japanese president of the 
subsidiary and was responsible forTandy 
plants in Japan, Korea and Taiwan. 

Bogitch said they make a variety of 
things in the 1,500-employee Korean and 
the new 1,000-employee Taiwanese facili- 
ties. They make Tandy's OB equipment, 
many small radios such as the Weather 
Radios, almost all Tandy's hi-fi equip- 
ment, public address systems and multi- 
meters. The Japanese plant, originally a 
manufacturing factory, has been turned 
into a research and development and pur- 



chasing installation, he said. The staff, 
once close to 200, has shrunk to 25 in 
response to changing economic condi- 
tions. Bogitch said it just isn't economical 
to make these things in Japan because of 
rising wages. 

Although born in New York, Bogitch has 
lived on and off in Japan, "since I became 
a big boy." He was living in Japan when 
Tandy hired him. He is married to a Japa- 
nese woman, and they have two children. 
He said the boy, Ray, 4, understands En- 
glish but prefers to speak Japanese. The 
girl, Yoko, 8, is completely bilingual. They 
have lived in Hiroshima, Nagoya and 
Tokyo. They now live in Fort Worth. He 
said they are all adapting quickly, al- 
though Japan still "feels like home" to 
him. 

Bogitch is a job-oriented man who 
spends his personal time heading and 
watching television. He said he gets the 
greatest on-the-job satisfaction from be- 
ing involved with new products. 

"I'm proud I contributed to the new 
things we made in the Orient," he said. 
"When we came out with our digital re- 
ceivers, for instance, we had one of the 
lowest-priced on the market. With tele- 
phone equipment we started from almost 
nothing and became one of the world's 
largest suppliers. It was the same with 
CBs. We are one of the largest suppliers 
of multitesters." 

He said he hopes to continue to expand 
Tandy's manufacturing capabilities and 
add new items like the TRS-80 microcom- 
puters. Tandy manufactures all of these 
except the Pocket Computer, which they 
buy from Sharp. 

"I'd like to come up with a few others 
like those," Bogitch said. 
In fact, Tandy's biggest computer manu- 



.-^' 




Seymour Bogitch 

facturing problem is keeping up with de- 
mand. Bogitch said they have not caught 
up yet, but he hopes to solve that problem 
in the next few months. 

In that vein, he said the new Texas Pe- 
ripherals plant Tandy established last 
year in conjunction with Datapoint Corp. 
is going well. Under that unusual arrange- 
ment, each firm owns half the facility. So 
far its only product is a Radio Shack disk 
drive, but he said it will be making prod- 
ucts for Datapoint soon as well. 

"We are technically oriented," Bogitch 
said. "We are generally considered mostly 
a retail operation, but we do have a con- 
siderable manufacturing capability." 

by Bert Latamore 

80 Microcomputing Staff 
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5^(9 NEWS 



Dutch to Air BASIC Program 



In what may be a first, an international 
shortwave broadcasting station will 
soon broadcast a machine readable com- 
puter program around the world. 

On Sept. 10, the Dutch World Radio Ser- 
vice, Hllversum. Holland, intends to 
broadcast a brief BASIC program in com- 
puter ready, CLOADable form as part of a 
weekly science segment called "Media 
Network". The show features microcom- 
puters as its topic, and the BASIC pro- 
gram broadcast will be a housekeeping 
program. It will be broadcast in TRS-80, 
Apple and Pet compatible formats. 

The broadcast may herald a new era in 
information exchange for microcomputer- 
ists. Should the reception of computer 
programs over the shortwave bands by lis- 
teners equipped with ordinary receivers 
turn out to be a straightforward process, 
the dissemination of software for popular 
microcomputers could take a large leap 
forward: A leap made at the expense of 
the many cable network facilities now be- 
ing planned. In addition, the public broad- 
cast of machine readable code could pose 
new legal questions for the precedent- 
poor microcomputer software industry. 

The key to the success of the experi- 
ment lies in the Dutch station's signal 
strength In the targeted reception area. If 
the received signals are strong, free from 
fading and phase distortion, and atmo- 
spheric noise levels are low, listeners 
around the world stand a good chance of 
successfully recording the computer pro- 
gram. 

According to Johnathan Marks, the pro- 
ducer of the Media Network show, similar 
experiments have successfully been per- 
formed within Holland by the Dutch do- 
mestic broadcasting sen/ice. A weekly 
program called "Hobbyscope" has used 
FM transmissions to broadcast several 
BASIC programs to its listeners. 

This experiment on the international 
shortwave band will be conducted in the 
AM transmission mode, however. The re- 
sultant loss of fidelity and increased sus- 
ceptibility to noise inherent in AM trans- 
missions may cause problems for listen- 
ers in weak signal regions of the world. 
With this In mind, the Dutch Broadcasting 
Service will use its remote transmitting fa- 
cilities In Bonnaire in the Caribbean and In 
Madagascar to ensure adequate signal 
levels in North America and throughout 
the world. 



It is the Dutch Broadcasting Service's 
hope that computerists around the world 
tune In to the Media network segment at 
the proper time and frequency (see Table 
1) and make an effort to record the BASIC 
program. Listeners are encouraged to re- 
port their results to Radio Netherlands as 
soon as possible at the following address: 
Computer Experiment, Media Network, 
Radio Netherlands, P.O. Box 222, 1200 JG 
Hllversum, Holland. If the transmission is 
a success, additional shortwave com- 
puter program transmissions are planned. 

Several measures can improve your 
chances to successfully receive the com- 
puter program. First, use a good quality, 
highly selective shortwave receiver. Since 
adjacent channel interference in the form 
of heterodyne tones and cross-talk is 



common in the crowded international 
txoadcast bands, a receiver that mini- 
mizes the amount of this Interference Is 
desirable. Also, a good quality antenna 
that maximizes received signal strength is 
a must. While a directional dipole antenna 
cut for the specific frequency of the trans- 
mission Is ideal, a 50 to 100-foot length of 
wire is satisfactory. Finally, the received 
audio signal should be routed directly 
from the external speaker jack of the re- 
ceiver to the input jack of the recorder. 

By following a few precautions, and If 
atmospheric conditions are right, the 
Sept. 10th experiment may have far-reach- 
ing implications in the computing world. 
Tune in. 

by Chris Brown 
80 Microcomputing Staff 



TARGET RECEPTION AREA 


FREQUENCY (KHz) 


TIME (GMT) + 


Eastern N. America 
Westetn N. America 




9590 8 6165 KHz 
9715 8 6165 KHz 




02:47- 


Australia 
Australia 




9770 8 9715 KHz 
9715 KHz 




QTA7 
08:47 


Europe 
Europe 




15560, 11930,9895. 

6045 & 5955 KHz 
17605, 11930,9895, 

604S 8 5955 KHz 




08-.47 
13:50 


S. E. Asia 




11735, 15560, 21480 KHz 




14:47 


East Africa 




15220 & 6020 KHz 




18j<7 


West Afrtca 




21685, 17695,17605, 
15220 8 9715 KHz 




20:47 


+ Note: Greenwicfi Mean Time Is trve fiours ahead of Eastern Standard Time. 
* Times indicated are early Friday morning GMT, Note Ifiat it is still Thursday 


evening in target area. 


Table 1. Radio Netherlands Transmission Specifics 
Segment 


for Media Network Program 



Retired Tandy/Radio Shack President 
Granted Honorary Boston U. Doctorate 



Retired Tandy/Radio Shack President 
Lewis Kornfeld has received an hon- 
orary Doctor of Humane Letters (LHD) 
degree from Boston University, Boston, 
MA. 

SU said Kornfeld, who Is vice chairman 
of the Fort Worth, TX, based Tandy Corpo- 
ration, played an "exceptional role In the 
development of a great corporation that 
has had a profound influence on Ameri- 



can life." 

Kornfeld joined the original Boston 
Radio Shack store In 1948 as advertising 
manager. In 1954, by which time the 
store's business had tripled to $3 million a 
year and the staff grown from 30 to 60 peo- 
ple, he was named vice president of adver- 
tising. In 1958, with Radio Shack sales at 
$6 million, he become vice president of 
merchandising and advertising. 
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71IS-80® DISCOUNT $ SAVE $ 




MODEL II 



ft i 




No TaxM on 

Out Of State Shipments 

Ohia Include 
2% State Tax 



MODEL ill 

26-1061 4K I S599.00 

26-1062 16KIII 859.00 

26-1063 32K 111 

\X//2 Drives. RS 232 2,225.00 

26- n 62 1 St Drive 765.00 

Color Computer 4K $353 

26-3001 4K S353.00 

26-3002 1 6K Ext. Basic 533.00 

26-3009 Joysticks 22,50 

26-3010 Color Video 353.00 

26- 1 206 Recorder 54 00 





Proto Board For Color Computer — 

Fits inside 8-Track Cartridge S24.95 

Model I 

26- 1 1 40 Expansion Interface S249.00 

26-1141 I6K Exp. Interface 359.00 

26-1 142 32K Exp. Interface 469.00 

26-1 145 RS 232C Board 84.00 

26-1 160/1 Mini Disk Drive 419.00 

26-1563 Scripsit-Disk 79.00 

26-1566 VIsicalc 83.00 

Model II 64K S3395 

26-4160 I Drive Exp SI0I4.00 

26-4161 2 Drive Exp 1559.00 

26-4162 3 Drive Exp 2099.00 

26-4530 Scripsit II 259,00 

26-4512 Profile II 159,00 

26-451 1 Visicalc II 259,00 

26-4501 Gen Ledger 1 79,00 

26-4506 Mail Ust 72.00 

PRINTERS 

26- 1 1 67 9'/; iUne Printer VII S 360,00 

26- 1 1 66 Une Printer VI 1 080.00 

26- 1 1 58 Daisy Wheel II 1 798.00 

26- 1 1 65 Line Printer V 171 0.00 

26- 1 40 1 Cable 36,00 

EPSON MX80/MX70 

Low-Priced Professional Print Quality 

EPSON MX80 (List S645) , . . S499.00 

EPSON MX70 Dot Graphics. 5x7 Matrix (Ust S450) . . . S425.00 

IDS PAPER TIGERS 

Dot Resolution Graphics quality print 

IDS 445G 7 wire printhead. graphics . . [List S985) ... 5 795.00 
IDS 460G 9 wire printhead. graphia . . (List 51394) ... 1 195.00 
IDS 560G 9 wire, wide carriage, graphics (List S 1 794 ) ... 1 529,00 

All prices are subject to change without notrce. Freight, handling, 
and insurance charges are extra. Most items are shipped Unrted 
Parcel Service, Model II and other hardware weighting over 50 
lbs, is shipped freight collect by truck. Certified Check for immedi- 
ale shipment from stock. Master Charge, Visa or Bank Card add 
3% surcharge. 



DOES YOUR SMART 
PRINTER SUDDENLY 

BECOME DUMB 

WHEN YOU PRINT 

FROM SCRIPSn? 

Is your pnnter capable of underlining 
but not from ScnpsJt? 

Is your pnnter capable of Bold Printing 

but not from Scnpsif 

Can your printer super script and sub script 
but not from Scnpsit? 

Can your printer change pitches 
but not from Scnpsit'r' 

The answer is SCRIPMOD 

SCRIPMOD does nol require a separate punter dnvei With 

SCRIPMOD control codes can be embedded in the test of your 

document You use the same format line syntax you're used to 

now SCRIPMOD adds one format instruction to Scnpsit 8 two 

control codes 

SCRIPMOD IS supplied on disk with full documentation lor 

S39.9S. 

PENCIL-FIX Save your warranty Use PENCIL-FIX to avoid 
custom control key on your keyboard Redefines the control key 
for EP to be the (>' key Use RS lower case mod or the EP mod 
without the control key Disk based EP only . S14.95 

PRINT-CENTRAL Send any control code directly to your 
smart printer from the BASIC command mode or from DOS 
Avoid having to type such things as "LPRINT CHR$(31) just to 
change pitch. Use CLEAR nght arrow {two key strokes) instead 
Any code from 1 to 31 may be sent Mod I 32K disk S24.95 

SPOOL-REL An in-memory print buffer that runs m Mod I 
32K or 48K disk systems. Fully relocatable code and buffer A 
true background spooler at an unbelievably low price S24.95 

TIGGER-GRAF Create engineering, scientific, business, or 
just plain fun on your IDS 440G or 460G printer. Resolution is 
495 X 575 Easy BASIC programs provided for data entry and 
machine language module for speed. Includes setting individual 
points, drawing tines, shading shapes Several graphs may be 
catenated along the Y-axis for larger graphs. Requires Mod I 32 
or 48K 1 disk S149.95 

ALL POCKET AND 

COLOR COMPUTER SOFTWARE 

SOLD AT DISCOUNT 

WRITE US FOR A FREE CATALOG 



1-800-331-9128 Toll Free Order Entry 



Immediate Shipment From Stock 
on Moit Items 



Vern Street Products 



v-m 



The Computer Store, Inc. 91T7T7.9333 



114 West Taft 

Sapulpa, Oklahoma 74066 



4949 South Peoria 
Tulsa, Oklahoma 74105 

TRS-80 IS a registereO traOemark o! trie Tandy Corp 



WE TAKE TRS«I MODEL I 
tnADE-INS 



--See Ust ot Advertisers on page 306 
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5^(9 NEWS 



Kornfeld stayed with the firm when it 
was bought out by Tandy Corp. in 1963 
and later said his decision to do this was a 
turning point is his iife. 

Kornfeid is considered by the company 
to be the "father of manufacturing at 
Radio Shaclt." 

He said bringing Tandy into the manu- 
facturing end of the electronics business 
when he did was a significant deveiop- 
ment. 



^7here wouldn't be 

any TRS-80 

computer if 

we hadn't. . . had 

seven or eight years 

of manufacturing 

experience. " 




Lewis Kornfeld 



"There wouldn't be any TRS-80 comput- 
er if we hadn't already had seven or eight 
years of manufacturing experience under 
our belts," he said. 

Kornfeid also received the Distin- 
guished Professional Achievement Award 
from the University of Denver earlier this 
year. 

by Bert Latamore 
80 Microcomputing Staff 



Radio Shack April Sales 
Jump 31 Percent over '80 



Tandy/Radio Shack, Fort Worth, TX, 
had 31 percent higher sales this April 
than It did a year ago, and Garland P. 
Asher, director of financial planning for 
Tandy, sees It as a sign that the retail 
market is firming up. Asher said April was 
the third straight month of unexpectedly 
high sales figures. He said this may be a 
reflection of the unexpected strong up- 
turn of the U.S. economy in the first 
quarter of 1981. 

On the other hand, he said, Tandy's ups 
and downs are generally not tied as much 
to economic figures as they are to techno- 
logical trends. For Instance, 1974 was a 
recession year, but it was a good year for 
Tandy, which was riding the CB boom. In 
1977 positions were reversed. Tandy, tied 
to a CB market bust, performed slug- 
gishly, while the economy generally was 
strong. 

Asher said whatever Is fueling the pres- 
ent increase, it seems to involve a broad 
cross section of Tandy products. He said 
he didn't have any inventory breakdowns 
for April, but the indications were that 
while computer and telephone products 



were among the leaders for Tandy, other 
Radio Shack products were also attract- 
ing larger markets. Tandy's stereo equip- 
ment, which has suffered from depressed 
sales for more than a year, for instance, 
has picked up considerably, he said. 

One interesting part of this phenome- 
non, he said, Is that the Great Lakes in- 
dustrial cities including Detroit and Pitts- 
burg, which have been depressed market 
areas for some time, are showing 20 per- 
cent sales gains over a year ago. He said 
he had no idea why this is happening. 

The figures as released by Tandy 
showed a consolidated sales totaling 
$138,048,000 for April, a 31 percent in- 
crease over the $105,179,000 figure of a 
year ago. These figures include both sales 
in the U.S. and overseas. The U.S. figures 
were $1 1 1 ,562,000 for April, up 32 percent 
from $84,238,000 for a year ago. Sales in 
U.S. Radio Shack stores in existence more 
than one year rose 20 percent in April over 
a year ago. 

by Bert Latamore 
80 Microcomputing Staff 



Personal Micro to Fight Shacl( Suit, 
PIVI Prexy Terms It Scare Tactic 



Personal Micro Computers, Inc. (PMC), 
Mt. View, CA, has Issued a statement 
promising vigorous defense in a suit filed 
by Tandy/Radio Shack, Fort Worth, TX, 



tential dealers who might be interested in 
carrying the PMC-80 product line." 

At issue is the PMC-80, a Z-80 chip- 
based microcomputer compatible with 



'7f is guite obvious that the purpose 

of this suit is to intimidate. . . PMC 

dealers and. , . ^scare off potential dealers..." 



charging copyright infringements. 

Dr. Lester Lee, PMC president, said, "It 
is quite obvious that the purpose of this 
suit is to intimidate present PMC dealers 
and, most importantly, to 'scare off po- 



most TRS-80 software and peripherals. 
Tandy, in the suit filed Feb. 19 in U.S. Dis- 
trict Court, San Francisco, CA, claims the 
machine's I/O routines are copies of 
TRS-80 routines and violate Tandy 
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TRs 80 SUPER SOFTWARE at reasonable prices 



TRS 80'" A Irademafk of Tandy Corp 



LDOS MODEL t & III 

The Ultimate Operating System 

A completely documented new generation of 
operatingsystemfor theTRS-80 Far superior to any 
on the market, il is a totally device independent 
system, capable of device linking, routing, setting, 
and filtering. LOOS will support 5" and 8" floppies, 
single/double density, single/double sided, and up 
to 80 tracks. 
Model I & III ONLY $149.00 



PROGRAMMERS EASE SYSTEMS 



EDAS •••••SPECIAL*"" 

The first user oriented Editor Assembler designed to 
utilize all the features of your Model II and TRSDOS 
operating system EDAS 4 includes innovative 
features for ease of coding and debuging Includes 

complete documentation Was $229.00 

SPECIAL SALE PRICE $99.00 



also available 



;199 00 



HOST I/O SYSTEM Model II 

STOCK MARKET MONITOR Ivlodel I & III 

Disk version $99.00 

Cassette version $89.00 



THE GREAT GAME 



ULTRA TREK MODEL I AND lit 

Can You Master This Trip 
Through The Galaxies? 

Climb aboard the Star ship Enterprise and head for a 
universe of unknown encounters, enemies and 
stellar battles. As commander, will you be able to 
keep the enterprise and its crew en route and on 
patrol. Order yours today ONLY $19.95 

INVENTORY MASTER SYSTEM 
MODEL I A Great Business System 

With todays market, keeping on hand only what your 
demand calls for is reason enough to let your TRS-80 
accurately and effectively take care of your 
inventory Always know what to stock and when to 
stock it This system has many features which were 
modeled after a mam frame system of large 
capacity More information available upon request. 
JUST $159 00 



galactic software ltd. 

A Division ot GS & WS Inc 

11520 N. Port Washingtor Rd 
Mequon, Wisconsin 53092 
(414} 241-8030 



.^254 




BUSINESS & PERSONAL 
MAILING SYSTEMS 



MAIL/FILE -SERIES II 
MODEL I & III 

A smaller scale of the Mass/Mail System with many 
of the same unique features. Mail/File will handle up 
to 600 names on Model I and 1200 on Model III 
Keep those cards and letters going out. Call or send 
for information today 
A BARGAIN AT $159.00 

MAIL/FILE-MODELII 

System for the smaller needs of a Model II owner 
Will handle up to 2500 names, with some of the 
same unique features of the Mass/Mall system A 
flexable anj capable program tor any small 
business. Call or send for mote information 
ONLY $199.00 

MASS/MAIL-MODEL II 

A system to fill the needs of the large mailer. You'll 
be amazed at all this system can do for you. It will 
handle up to 10,500 names. The systems versatility 
in user defining ability is one of its finer features. Call 
or send for information today 

CONTACT GALACTIC FOR PRICE 



Money Orders, Credit Cards, & COD's Shipped Within 24 Hours, now accepting master charges visa 



TURN YOUR TYPEWRITER 
INTO A PRINTER 





New KGS-80 ^^^''' 

Keyboard Actuator. 

n Because of ils hardware interface, the KGS-80 is the only aclu- 
ator that is delivered ready to set up and run with no alteration 
ot your existing so'twa'e. 

D Bests on keyboard ot IBM Selectnc. SCM or other typewriters. 

May be installed or removed in seconds. 
n New third generation unit engineered and manutaclured for 

reliability and long life by Kogyosha Co.. Ltd.. Japans largest 

manufacturer of DC solenoids 

a Price S599 F08 New York, NY. 

n -'Y" cable switch option allows alternative operation with high 
speed matrix printer. 

For further information, call I201j 569-8769. ,-'149 

Auihonzed livpoiter 

NIK Internationa/ Trading Inc. 

114 Liberty St. Suite 204, New York. NY 10006 



Dr. Jerome S. Osteryoung, renowned business educator, and 
author of 5 business texts has written the loilowing programs. 

1 . PROFORMA CASH-BUDGET 

PROGRAM 

Allows the user to project Ihe cash balances tor up to twelve 
periods in the future. Amount ot loan, if needed, is computed as 
well as computing funds available for short term investment 
(rrUetlZS) 

2. LEASE-PURCHASE PROGRAM 

Evaluates Ihe lease vs purchase decision incorporating all the 
latest tax laws including the investment tax credit and ac- 
celerated depreciation. This program gives the user all the m 
(ormation necessary to make Ihis decision (Price $50) 

3. BUSINESS PROGRAM PACKAGE 

13 Business programs {eg , capital budgeting, cash 
management, ratio analysis, debt management) These pro 
grams will be very useful to the business manager. (Price $200) 

4. PROCUREMENT PROGRAM 

Ascertains purchase amount when future price of commodity 
IS varying. A must for ali managers who have purchasing 
responsibililies. This program takes into consideration inven 
tory levels, inventory capacity, and financial carrying cost in 
determining the optimal amount of an item to purchase when 
future prices are varying. (rrkeSiso) 

5. COLLEGE ENROLLMENT 
PROfECTION PROGRAM 

Forecasts the enrollment for colleges using several different 
statistical techniques. User can specify the number ot periods 
for which a forecast is desired (Price $lOO) 

Extensive Documentation With Each Program 

Write or call for a brochure which describes 
greater detail. 

b?00Bf:ll3ny Dnve. 11006^51 Pe'e's biiig. Fionas 33rtb 
■^^■^^^^■^ 8i38i>4434/ 





^Sea List of AiJvaflisars ort page 306 
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REMsoFT, Inc. 

Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired ot buying book after book on assembly 
language programming and slill not knowing your 
POP from your PUSH? 

REMsoFT proudly announces a more efti- 
cienl way, using your own TRS-80® , to learn the 
(undamentals of assembly language programming 
■al YOUR pace and at VOUR convenience. 
Our unique pacKage. INTRODUCTION TO TRS-80® 
ASSEMBLY PnOeflAMMING . will provide you with 
the toDowing: 

• Ten 45-minute lessons on audio cassettes. 

• A driver program lo make your TRS-80* video 
monitor serve as a blackboard for ihe tnstructor 

• A display program tor each lesson to provide 
illustration and reintofcemeni tor what you are 
t>eafing 

• A textbook on TRS-80* Assembly Language 
Programming. 

• Slep-by-step dissection ot complete and useful 
routines to test memory and to gam direct control 
over ttie keyboard, video moniior, and printer. 

• How to access and use powerful routines in your 
Level M ROM 

This course was developed and recorded by 
Josepfi E. Willis and is based on the successful 
series ot courses he has taugtit al Meta Technologies 
Corporation, the Radio Sfiack Computer Center, and 
other locations in Northern Ohio. The minimum 
system required is a Level n, 16K RAM. 

REMASSEM-1 only $69.95 



LEARN TRS-80® 

ASSEMBLY LANGUAGE 

DISK I/O 

Your disk system and you can really step out with 
REHSOFTt Educational Module. REMDISK-I. a 
"short course" revealing the details of DISK I/O 
PROGRAWMING using assembly language 

Using the same tormat as our entremely popular 
introduction to assembly language programming, 
this -ASSEMBLV LANGUAGE DISK I/O PROGRAM- 
MING" course includes 

• Two 45-minute lessons on audio cassette. 

• A driver program lo make your TRS-80* video 
monitor serve as a blackboard tor the instructor 

• A display program (or each lesson to provide 
illustration and remlorcemenl tor what you are 
hearing 

• A booklet ot comprehensive, fully-commented 
program listings illustrating sequential die I/O 
random-access tite I/O, and track and sector I/O 

• A diskette with machine-readable source codes 
tor all programs discussed, in both Radio Shack 
EDTASM and Macro formats. 

• Routines to convert trom one assembler format 
to Ihe other 

This course was developed and recorded by 
Joseph E Willis, lor the student with experience 
in assembly language programming, il is an inler- 
mediate-to advanced-level course Minimum hard- 
ware required is a Model I Level II, 16 K RAM one 
disk drive system 



REMDISK-1 only $29.95 

Dealer inquiries invited 




REMsOFT, INC. 

571 E. 185 St 

Euclid, Ohio 44119 

(216)531-1338 
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Include SI 50 lor sfnQpirig and nanQling 
Olio residents add 5Vi% sales lax. 

TRS-80* IS a trademarli at the Tandy Corp 



f(9NEWS 



copyrights. They also maintain the 
PMC-80 trademark is "confusingly close" 
to the TRS-80 name and is a trademark in- 
fringement. Named in the suit with Per- 
sonal Micro Computers Is EACA, the 
Hong Kong-based manufacturer of the 
microcomputer, and several U.S. 
distributers. 

Lee said PMC-80 "will give. . .indepen- 
dent software and hardvi/are suppliers an 
alternative vendor to proliferate their 
product in the true spirit of free 
enterprise." 

As evidence that the suit is aimed basi- 
cally at discouraging potential dealers, 
Dr. Lee cited "the fact that Tandy did not 
Inform PMC or EACA about any possible 
Infringement by the product prior to filing 
the suit." 



Lee said Tandy Is trying to eliminate 
competition. 

"While PMC-80 has been delivered for 
only about six months here in the United 
States, the same product has been widely 
accepted in Europe and other countries as 
the Video Genie marketed by distributors 
for EACA," Lee said. "In many countries 
the Video Genie has been out-selling the 
TRS-80, and this has probably prompted 
Tandy to take action In an attempt to 
quench PMC before it gets a strong foot- 
hold In this country." 

Atty. Gary Pat, a Tandy spokesman on 
legal matters, said Tandy's policy is to 
refuse to comment on the case outside 
court. 

by Bert Latamore 
80 Microcomputing Staff 



Computer Literacy Made 
Requirement for Graduation 



Nolan Catholic High School in Fort 
Worth, TX, has established a unique 
requirement for graduation. Along with 
the more traditional areas of academic 
competence, students will soon be ex- 
pected to demonstrate computer literacy. 
Although computer literacy will not be 
mandatory until the 1982-83 school year, 
courses In BASIC programming began in 
August 1980. Currently In use are one 
Level II and 17 Level Is which were donat- 
ed to the school. Another Level II will be 



courses offered by the school, according 
to Brother Tony Pistone, principal at 
Nolan Catholic. This year more than 60 
parents attended an Introductory com- 
puter class held at the school at night. 

A major source of difficulty has been 
the lack of high quality, commercially 
prepared educational software, according 
to Brother Pistone. Two professional pro- 
grammers have been hired for the 1981-82 
school year to fill the gap created by the 
lack of good software and help teachers 



~Two professional programmers have 
been hired. . . to fill the gap created 
by the lack of good software. , , . " 



donated for use in September, 1981. 

This year, approximately 150 students 
have taken the courses which emphasize 
a hands-on approach to programming. 
Over 200 students are expected to sign up 
for next year's offerings which. In addition 
to beginning level courses In BASIC, will 
also include word processing and data 
processing for more advanced pupils. 

Parents as well as students have 
responded positively to the computer 



learn new ways to utilize the micros in 
their courses. 

Brother Pistone Is enthusiastic about 
the current computer literacy program at 
Nolan Catholic and the school plans to ex- 
pand the program In the coming years. 
According to Pistone, computer literacy Is 
now "as critically Important in learning as 
reading, writing and arithmetic." 

by Use Markus 
80 Microcomputing Staff 
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5^ CALENDAR 



July 



July 5-31 The Hill School, Potts- 
town, PA, will conduct tour one- 
week computer workshops using 
the school's POP 11/34 system and 
will offer students maximum 
hands-on experience. Ttie first 
three workshops will be open to 
students of Grades 7-12. The last 
will be tor teachers and otfier pro- 
fessionals. 

Contact John E, Parnell, The Hiil 
School, Pottstown, PA 19464, for in- 
formation. 

July 13-14 will see a seminar on 
using ttie OASIS operation systems 
on Z-60 microcomputers at Phase 
One Systems, Oakland, CA. 

Glasses will be limited to 20-30 
students with plenty of "hands-on" 
activities. Price is $195. information 
is available from Phase One Sys- 
tems, 7700 Edgewater Dr., Suite 
830, Oakland, CA, 415-562-8085. 

Motorola Technical Training 
Headquarters is offering seminars 
on their 6809 microprocessor chip 
July 21-24 in Phoenix, AZ; July 7-8 in 
Los Angeles, CA; and July 9-10 in 
San Diego, CA. They will cover all 
aspects of chip operation including 
software design. Seminar cost 
varies from between $300 and $450. 
Information is available from Ron 
Bishop, Motorola Technical Train- 



ing Headqua'*ers, TOM-57, PC Box 
2953. Phoenix, AZ 85062. 



August 



Aug. 28-29 the International 
Microcomputer Fine Arls Festival 

will combine artists using cr in- 
terested in using microcomputers 
with programmers and other tech- 
nical people who have done work 
applicable to the needs of artists at 
the Teeia-Wooket Camp, Roxbury. 
VT. 

The event is sponsored by Trans/ 
Media Inc., a non-profit artists' 
cooperative; Green Mountain Mi- 
cro; Wayne Green, Inc.; and individ- 
ual artists and programmers. Infor- 
mation is available from Dennis B. 
Kitsz, festival director; and Richard 
B. Fredette, festival coordinator, 
both of Roxbury. VT 05669 (802) 
485-6112. 





k^ 

BLACKJACK PLAYERS 

A YEARS INCOME IN 4 MONTHS. 



■o»tt S(rol»^ Tutoti, lor lh« n 
U» our Tutort t quklily laarn how 
Eorn (40 hour Laain th« i*cr*1i of 
will 1»oih you how 1o 



ivica I Bipsrl allk*. 
(o b«am« A WINNER. 
>ur luccaii. Our Tulori 



" KT YOUR MONEY '■ 

" PIAT EACH HAND •■ 

•■ NOTOCTIAnED •■ 

■■If A MJIIMCSS " 

•■'■ BEWARE ■■*• 

Ou' luion oia not gocnadM Ih«y no iwlou* i«o/i to 
mok* winn»r« out ot you Tho oulhoji hove tp«nt 7 ^oo'i 
ploying 1 bsmg winnari Now to car you. with ttl» aid 
ol our Tutor 1 Our Tutort art hat»d on th« ttratvgjot 
dovolopsd by Lo»r«nc« Rsvsra lAor* odvoncod tttotsslsi 
art ova I labia coll tor Into. Coniu I lotion ii ova i labia 
fo' ,ou by moll or phona Ffom 13pm - 13am MST 



: City ot Nava<to 
iX for 33K dlik 



PKG 1 coriami 10 ftolk Tutoti to. 
Ruili I2S foi IbK Mod I or Mod III 
PlaoH oitd S3 00 lor ihippfng. 

--205 
MICRO KLAJAK SYSTEMS INC. 
2t00 NORTH ELLEN STREET 
FLAGSTAFF, ARIZONA SMWt 
(M2) 774-5723 or (M3] 774-7M1 



EDUCATIONAL 
SOFTWARE 

For TRS-eO' Color Computer, PET, Apple II. 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GRAMMAR 



MATH 
BIOLOGY 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
FARM RECORDS 



COIN INVENTORY 



Write for FREE Catalogue: 
MICRO LEARNINGWARE ^sgi 

BOX 2 I 34, N. M ANK ATO MN 560O I 
507 625-2205 



VISA & MASTER CHARGE ACCEPTED 

We pdy I 5^1 royalty for EtluL^lional 
Programs lisled wilti us 

Apple Is a trademark of Apple Computer Co. 
TRS-SO b a regbtercd trAdcnuult of TANDY CORP. 
ret Is a (radenufii of Commodore Bm. HAcMnei. 



— Prolesswna! — 

Real Estate Software 

For Apple or TRS.SO 

Property Management System 

<32K, 1 Disk Systems) 
aaluras: 

■ Tininl Intornulion • 5 Digil FiDtni! Sccouoli 

• Liig Rtm Hapori! • SuilOinq Eiptnia Ripoii 

• VIDi Moniniv Income • Verrdor Eipgnia Rbpci<: 
..._,..^ _ . ||,jui^, ]j, B,po,i 

isnis • AllRtooris Cin Bi PtinrtO 

Rglurnad Checks « [!ompl«ie Documantaiion 

AOvinca Piym<nl! • Eat) Dan Ent.y 1 tdil 

• Prinit ntceipll • ?00 Unils an File 

Price $225.00 
Real Estate Analysis Modules: 

(Casselle or Disk) 

1) MorrB Puicriise Unjlvsi; 

?l Tdi 0«l«rrsr^ Evchanga 

3i CoiilFiiclion Cosl/I'rotit 

1) Incpmi Prnpaily Cjtnlla« 

5) «PR Loin "njlysis 

Bl PrDoarly SilBS Anjiysil 

II Loin Amprtiijlion 

S35 Per Module 



ompany 



"Could I see one of your bigger models?' 



""See List of Ativerlisers on page 306 
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News From 

KITCHEN TABIE SOFTWARE. INC. 



Ultimate DOS: Still 

not available from 

Kitchen Table Software 




Last night, I dreamt that I was sent a re- 
view copy of the ultimate disk operat- 
ing system for the TRS-80 Model I. Unfor- 
tunately, I woke up before 1 was able to 
produce a backup disk of this wonder 
product, called DROSSDOS 1.1. Even 
though no copies are known to exist in the 
real world, I thought I'd go ahead and write 
the review, anyway. 

DROSSDOS 1.1 from the Kitchen Table 
Software Corporation contains many use- 
ful utility programs. It might be helpful to 
explore some of their features before delv- 
ing into the actual operating system and 
Disk BASIC enhancements. 

Superduperzap 

Supefduperzap is a great multi-purpose 
machine language disk utility program, 
which works in conjunction with a small 
hardware modification recommended by 
Kitchen Table Software. 

When used in a compatible computer, 
Superduperzap will read or write to any 
disk sector, or main memory, including 
the ROM! To write to the latter, the user 
must make a few changes to the key- 
board, which include replacing the Radio 
Shack ROM with an EPROM supplied by 
Kitchep Table, adding a small ultraviolet 
lamp and several printed circuit cards. 
The entire installation was completed by 
the author in only 17 hours. 

The work was well worth it. Superduper- 
zap repairs Parity Error During Write, Di- 



rectory Error During Write, disk-destroy- 
ing blunders and performs proper repairs 
to sectors. No user input is required. To in- 
voke, the abbreviation FT is entered or 
(optionally) the full command Fix That! 
may be used. 

This program will automatically recover 
accidentally killed disk files. The syntax 
for this function is as follows: Resurrect 
filename/ext, :? Superduperzap will search 
through all available sectors on ail disk 
drives until the remains of a file by that 
name (or anything similar) are found. The 
file will be restored and the directory up- 
dated. If some of the sectors have already 
been overwritten, Superduperzap will In- 
vent machine or BASIC code that looks 
good and fits in with the rest of the pro- 
gram. This reconstruction may be entirely 
transparent to the end user. 

Superduperzap has too many capabili- 
ties to discuss here. For example, the pro- 
gram can be commanded to ignore read 
and write protected sectors entirely, for- 
ever, and will list the contents of a given 
track to a printer, the CRT screen, your 
color television set, or the face of any LCD 
display digital watch within three feet of 
the keyboard, 

Editor/Disassembler is another ma- 
chine language program. When used with 
any optical character reader, it will cap- 
lure assembly language programs printed 
in microcomputer magazines, and assem- 
ble them into flawless command files. It 
also will take Z-80 object code and disas- 
semble it, providing helpful remarks 
which explain the purpose of each instruc- 
tion. If the program, as entered, conflicts 
with other machine language programs 
that will be loaded simultaneously, this 
module will re-write the code to relocate to 
other addresses. 

The user may also input code, which is 
automatically debugged. I liked this edi- 
tor's flexibility; I didn't have to be exces- 
sively precise when entering instructions. 
If I was close, Editor/Disassembler would 
make a good guess as to what I meant and 
supply the correct op code. 

Programmers with a Sense of Humor 

Lodecodeoffset is another program 



which was also written in machine lan- 
guage. (You've really got to hand it to the 
Kitchen Table boys for entirely eliminat- 
ing the utilities originally supplied with 
DROSSDOS 1.0, which were written in 
Pilot.) 

Lodecodeoffset takes any machine lan- 
guage program, and, if it conflicts with 
DOS, some other binary module, ROM, or 
your automatic phone dialer, relocates it 
into unused memory. The Kitchen Table 
wizards have found an extra few hundred 
bytes of memory that is included in the 
64K that can be addressed by the Z-80, but 
which are not included in the 12K ROM, 
video memory, or user RAM. Eight IC 
memory chips are supplied with DROSS- 
DOS 1.1, and can be installed by the user 
In a few weekends. 

Warning! ! Each time Lodecodeoffset is 
run, the program adds an appendage to 
the code. This appendage has no purpose, 
except that when appendages equal to 
255 bytes have been added, the object 
code is automatically destroyed beyond 
recall, even with Superduperzap. My 
sources tell me that this feature is a joke 
dreamed up by the Kitchen Table staff late 
one Friday night. It's always refreshing to 
see programmers with a sense of humor. 

Adventure Disassembler is a 36K pro- 
gram written in BASIC, with no purpose 
other than to solve Adventures. It will take 
any adventure written by Scott Adams, 
and, through sophisticated byte crunch- 
ing, providea printout of the location of all 
treasures, secret words, and proper use of 
each object. We tried it on a couple of our 
own adventures and discovered that by 
stuffing the Mongoose/Squirrel into the 
tape recorder, and throwing it through the 
window of the Mystery Fun House, you 
can gain access to the dumb waiter! 

Dirfink is a program that will test a tar- 
get disk's directory and, if any errors are 
found, provide the name of the operator 
who was running the TRS-80 when the 
problem occurred. When the messages 
Bad Gat Sector Byte and Extent Space 
Overflows Diskette are displayed, Dirfink 
explains what these mean, and automati- 
cally invokes Superduperzap to correct 
the problem. Another handy program. 
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TI59/CMD is a program that allows the 
TRS-80 to emulate a TI-59, with the added 
capability of storing the programs to disk. 
I tested this module carefully, and found 
that it worked. Using it, I was able to com- 
bine all the power of a TI-59 program- 
mable calculator with the portability of a 
48K TRS-80 with four disk drives in one 
machine. Somebody should have thought 
of this one a long time ago. 

Middlecase/DVR allows users who have 
neither upper nor lowercase character 
generators in their machines to make use 
of the less popular middlecase character 
set. A specialized program, to be sure, but 
with 300, CXX) copies of the TRS-80 Model I 
sold before Radio Shack decided to dis- 
continue it, you're bound to find several 
hundred of almost any wild configuration 
you can think of. I personally have seen 
several TRS-80s whose owners have in- 
stalled inverted keyboards. 



DOS Library Commands in DROSSDOS 1.1 

Some unusual library commands in this 
DOS include Checkout, Overdue, Cannot 
Renew and Reference Only. 

The more usual commands such as 
Chain, Clock, Kill, List, Load, etc., are also 
included. One caution: Just because you 
have read the TRSDOS manual, do not as- 
sume that you know everything there Is to 
know about DROSSDOS commands. There 
are some subtle differences. For example, 
in DROSSDOS, KIN causes the computer 
to energize the keyboard with 110 volts. 
The correct DOS command to get rid of a 
file Is Erase, Even here. Kitchen Table has 
built in some valuable error checking. Be- 
low is a sample computer-human inter- 
change; 

Erase Test Flle/BAS:1 

Do you really mean that? 

Yes 

O.K. Enter the password. 

No 

Then say "please." 

As you can see, it is nearly impossible 
to kill a file by mistake, or even on pur- 
pose. DROSSDOS has certain other 
"friendly" characteristics. For example, 
the following input might be used: BASIC 
64000 RUN "STARWARS/BAS". The com- 
puter responds: "Excuse me. I found BA- 
SIC, but do you really want me to keep 
64,000 buffers open for I/O files? Or 
should I have looked for a program called 
BASIC 64,000? Should I load STARWARS/ 
BAS before I run it, or what?" 

Some DOS commands can be run with- 
out any user input whatsoever. Dump will 
cause the computer to spilt paper from 



any attached printer onto the floor. Purge 
commands the system to build a blacklist 
from any mailing lists on its disks. DIR 
compiles a list of all programs on a disk, 
but it won't tell you what they are. 

Other handy DOS commands: Verify 
asks the operator's name twice and then 
checks both answers to see if they are the 
same. MDcopy produces duplicates of pa- 
tient invoices for physician's accounts re- 
ceivable programs. Rename allows the 
operator to enter different names when 
asked by Verify. 

Sysgen is a very powerful command 
that deserves an article of Its own. Using a 
complicated series of switches (numbered 
SW1 through SW255), the user can con- 
figure the operating system to suit spe- 
cialized needs. A few of the many options 
are explained below. 

SW14= n, where n is a number between 
one and four. This allows the operator to 
specify which disk drive is prone to failure, 
and the system will automatically avoid 
using this drive whenever possible. Also, 
whenever a Parity Error During Read or 
Data Record Not Found During Read error 
Is caused by this drive, the system will Ig- 
nore data supplied by the suspect drive, 
and use something interesting from the 
same sector on some other drive. 

SW18 = Y or N. This switch is used to 
flag the marital status of the primary oper- 
ator of the computer. Thereafter, all pro- 
grams using gender and titles will address 
the operator as Mr., Mrs., Miss or Ms, as 
preferred. 

SW20 = n, where n Is a number between 
and 255. The computer will always use 
this number as a seed for generating 
pseudo-random numbers, thus ensuring 
predictability when the operator wishes to 
win dice, cards and other computer 
games. 

SW103 = message string. The message 
can be any cute saying the operator 
wishes to display whenever the system 
crashes. It also relieves boredom, and can 
be changed as frequently as necessary. 

Most features of Disk BASIC remain the 
same under DROSSDOS 1.1. Several new 
capabilities have been added. Program 
lines can be renumbered using a simple 
Renum command. If no values are speci- 
fied, the program will be renumbered be- 
ginning with line 0, to the end. In incre- 
ments of 10, but in reverse order. That is, a 
renumbered program might begin at line 
10000, and end at line 10. 

Renum R directs the system to renum- 
ber the lines in random order. However, 
because all GOTO's and GOSUB's are 
changed to the correct new line number, 
the program will still work. The BASIC in- 



terpreter has been altered so that it is not 
confused to find line 69 following line 
186 Vi. 

Renum P renumbers a program using 
only prime numbers as line numbers, 
while Renum F employs, you guessed it, 
only Fibonacci numbers for renumbering. 
Hats off to the Kitchen Table gang for an- 
other stroke of originality. 

The popular Ref command has been ex- 
panded greatly. Under DROSSDOS 1.1, It 
provides an alphabetized listing of every 
word, number, command and punctuation 
mark in a program, with a cross-reference 
of the lines in which each appears. 

Editing a program line has been made 
very simple. The operator enters a line 
number, and the relevant line is complete- 
ly deleted from the program. Corrections 
are made just bytypinginanewline. Level 
I had this feature— why has it taken so 
long to come to us Level II and Disk BASIC 
users? 

DROSSDOS File Handling Capabilities 

in their quest for simplification, the Kit- 
chen Table software crew has come up a 
winner again. I found DROSSDOS' file 
handling perhaps the simplest to learn of 
any DOS, ever. There aren't any! Instead, 
all values are stored in variables within the 
programs themselves. Then, when an in- 
put session is completed, BASIC simply 
transfers the entire contents of memory- 
all 32 or 48K of it— to disk. The next time 
the program is run, DOS loads all of mem- 
ory back where it belonged with all regis- 
ters intact, in fact, the system uses buf- 
fers only to keep the CPU from getting a 
headache. 

There isn't room in one article to ex- 
plore all the features of DROSSDOS 1.1. If 
this innovative new operating system 
proves popular, you can be sure that there 
will be followup reports. ■ 
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edited by Bert Latamore 



Lifeboat 

Publishes Buyer's Guide 

Lifeboat Association's new buyers' 
guide and catalog lists 50 media formats, 
CP/M compatible disk operating systems, 
hard disl< integration modules, system 
tools, telecommunications systems, lan- 
guages, language and application tools, 
word processing systems and aids among 
ottier subjects. 

It is available from ttie Catalog Depart- 
ment, Lifeboat Assoc, 1651 Third Ave., 
New York. NY 10028, 

Reader Service v^ 330 

MOG Automates 
Mail Ordering 

MOG (Mail Order Generator) for the 
TRS-80 Model I and III completely auto- 
mates making mall orders. 

It prompts you for all order Information, 
allows a review of your order and com- 
plete editing, sorts the order by any of five 
variables, totals the order, adds tax and 
postage, saves the order on cassette, and 
drives a 32-, 40- or 80-column printer. 

It supports lowercase on the Model III 
and requires at least 16K of memory, but 
will useup to 48K RAM for longer orders. It 
costs $10 from Practical Programs, 1104 
Aspen Dr., Toms River, NJ 08753. 

Reader Service x^ 331 

Program 

Figures Feed Costs 

A new user-developed program for the 
Model I or III with 48K memory and a 
132-column printer will store animal feed 
formulae, figure protein, fat, fiber, etc. for 
each formula and keep the price of each 
formula up-to-date with gram market 
prices. 

The formulae are easily edited, deleted, 
added, displayed and printed and ingre- 
dients can be changed easily. 

The program is available for $75 from 
Thomas R. Broussard, PO Box 2577, 
Lafayette, LA 70502- 

Reader Service ►- 332 



Free Catalog 
Lists 200 Products 



Creative Computing's new 48-page 
catalog lists more than 200 computer- 
related products including 20 books on 
programming, games and educational ap- 
plications, 160 software packages, three 
magazines, five graphics and music peri- 
pherals, an LP record, a board game, eight 
T-shirts and an assortment of other pro- 
ducts. 

The 48-page publication is free from 
Creative Computing, 39 E. Hanover Ave., 
Morris Plains, NJ 07960. 

Reader Service t^ 184 

Dual 8-Inch Drive Offered 

The V1000 dual eight-inch drive subsys- 
tem accomodates mass storage units 
ranging from single-sided eight-inch flop- 
pies to 20-megabyte streaming tape car- 
tridges and 40-megabyte Winchester disk 
drives. 

A sliding-chassis design gives easy ac- 
cess to the drives. 

It is available with a choice of drive con- 
figurations. Prices range from $1,095 to 
$2,295 from Vista Computer Co., 1317 E. 
Edinger Ave., Santa Ana, CA 92705. 

Reader Service y' 329 




VIOOO Dua\ 8-Inch Disk Drives 

Data Conversion Achieved 

Prestige Marketing Corporation is offer- 
ing a data conversion service which will 



convert data from one system disk to that 
of another system. 

For instance. Prestige can convert data 
from IBM 3740, DEC RT-1 1 and Apple II to 
TRS-80 disks and vice versa. 

Information is available from Prestige 
Services Division, 909 N. Coliseum Blvd., 
Fort Wayne, IN 46805, 

Reader Service ^333 



Program Tracks 
Accounts Receivable 



ACCT-M3 carries the accounts receiv- 
able functions for a small business or 
medical clinic using initialization, ac- 
count manager and report generator pro- 
grams. 

Data bases are limited only by the 
number of disks you own. 

Designed for a dual-disk, 32K minimum 
memory, Model III with TRSDOS, it costs 
$69 from Micro Architect Inc., 96 Dothan 
St., Arlington, MA 02174. 

Reader Ser/ice i^ 171 

Programs Published 

A trook of BASIC programs for the 
TRS-80 has been released by Sams Books. 

The 168-page book has completely test- 
ed and debugged programs in home use, 
educational and business use areas rang- 
ing from an automatic telephone dialer to 
a checkbook balancer. 

The book Mostly Basic: Applications 
for Your TRS-80 costs $10,95 from Howard 
W- Sams & Co., 4300 W. 62nd St., Indian- 
apolis, IN 46268. 

Reader Service ^ 334 

Program Tracks Portfolio 

Options-80 allows the TRS-80 to 
analyze investments for maximum return. 

The program handles buying and sell- 
ing listed call and put options, spreads 
and shares, analyzes impact of commis- 
sions, cost of money, dividend and risk 
exposure, and projects an annualized 
percentage return on investment as a 
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16K MEMORY ONLY $25.95! 

For TRS-80 Keyboard or Expansion 
interface. KEYBOARD requires jumpers: 
$2.00 Extra. These are 200 ns tested RAM 
for the TRS-80, APPLE or EXIDY. 



DISK DRIVES for the TRS-80 OR PMC-BO: 



All of our drives come complete with power supply 

and chassis. They may be used with existing Radio 
Shack drives on the same cable! 40 track drives 
store 102K bytes single density, and 175K double 
density. 80 track drives have 175K single density 
and 345K double density! All drives guaranteed 90 
days, one year on power supply. 

40 track MPI drives $319.95 

40 track TEAC drives $315.95 

40 track TANDON drives $319.95 

80 track MPI drives $449.95 

80 track TEAC-drives $429.95 

2 drive cable $ 25.95 

4 drive cable $ 39.95 

NEWDOS 80 OPERATING SYSTEM $139.95 

NEWDOS 80 PATCH Patches NEWDOS 80 to 
work with single or double density and the 

doubler $ 59.95 

PE ROOM'S DOUBLER for double density 

operation' $219.95 

The DOUBLER works with the TRS or PMC 
expansion interfaces to allow you to use your dnves 
in double density! You may still operate your drives 
as single density also! Comes with DBLDOS 
operating system which allows you to transfer 
single density files to double and vice versa! GREA T 
BUY' 

DISKETTES: VERBATIM DATALIFE! SOX OF TEN 
SOFT OR HARD SECTORED 5W $32.50 

WE HAVE DRIVES AND CONTROLLERS FOR THE 
MODEL III. CALL FOR PRICES!!! 



MODEMS AND TELE- 
COMMUNICATIONS 



LYNX Telecommunication 
system tor the TRS-80 and 

PMC-80 $279.95 

Includes terminal software and 
connections for instant 
hookup' Can be connected to the TRS-80 or PMC- 
80 with or without an expansion mterface' 

LEXICOM MODEM 300 BAUD Requires 

RS-232 $169.95 

THE SOURCE: Hook-up to the 

"SOURCE" $ 99.95 

ATARICONNECTION: Modem for 400/800. 

complete with software! $249.00 

APPLECONNECTION: Modem tor 

APPLE II $279.95 





COMPLETE SYSTEMS: 



PMC-80, 16K LEVEL II 

COMPUTER $739.00 

The PMC-80 is a work alike to 
W^ the TRS-80 mod I computer! 
Comes with Microsoft's BASIC 
in ROM. Built in cassette. 12" 
video monitor. Expandable to 
48K. 
Compatible to All TRS-80 MOD I Programs. 

PMC 80 without monitor $595.00 

RF— MOD for PMC to TV hookup $39.95 

PMC-80 EXPANDER 100 SYSTEM $644.00 

INCLUDES: 32K memory, S 100 bus. RS-232 
interface. Parallel printer driver, Disk controller 
Fully compatable with TRSDOS. NEWDOS. VTOS, 
and all other TRS-80 Mod I disk software! 

APPLE II COMPUTERS 48K $1299.00 

ATARI 400 $ 495.95 

ATARI 800 COMPUTER $ 795.00 

ZENITH Z-89 48K. 1 DISK ALL IN ONE 
COMPUTER $2495.00 



VIDEO MONITORS 



LEEDEX 100 12' B/W MONITOR 
SANYO 9 B/W MONITOR 



SI 39.95 
$199.95 



PRINTERS 



OKIDATA MICROLINE 80 All OKI'S have TRS-80 

Graphics!!! $420.00 

Comes with friction and pin feed, upper/lower case, 

Graphics 

EPSON MX-80 PRINTER: Word Processing Quality 

Printout with Graphics! Call 

NEC SPINWRITER with Tractor Feed . $2995.00 
DIABLO MODEL 1630 with Tractor $2695.00 

UNIVERSAL PRINTER STANDS $ 94.50 

Other Accessories: 

SUP-R-MOD RF Modulator for APPLE $29.95 
ARCHBOLD SPEED-UP MOD FOR TRS MOD I. 

Allows up to 300% increase! $45.00 

MICROSOFT BASIC Decoded and other 

mysteries $29.95 

TRS-80 DISK and other mysteries $18.95 

ZBASIC BASIC COMPILER for MOD I and MOD III 
TRS-80 and PMC-80 Increase basic program 
speeds by up to 200 times!!!!! 
Tape $79.95 Disk $89.95 

Som For Only $99.95 Specify MOD I or MOD HI 

WE HAVE HUNDREDS OF PROGRAMS FOR 

ALL THE POPULAR COMPUTERS! 

CALL FOR OUR FREE CATALOG 



Personal and Business Checks take 3 weeks to clear. For fastest delivery use Certified Checks, Money Orders, Credit Card. orC 0,D. 
^-.-„—-,-. *^ "'" •"> and beat any published price on any system! Call! 

SIMUTEK 
COMPUHR PRODUCTS 

Please mention this magazine when ordering 

ARIZONA RESIDENTS ADD 6% SALES TAX, 

WE TAKE VISA, MASTER CARD. 

PS-BO IS A TRADEMARK OP RADIO SHACK A TANDV CORP 



.^19 



CALL TOLL FREE TO ORDER 

(800) 528-1149 



4877 E Speedway Blvd 
Tucson, Arizona 85712 
{6021 323-9391 Technical Questions 



APPLE IS A TRADEMARK OF APPLE INC 



t'See List ot Advertisers on page 306 
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function of annualized percentage growth 
in share value. It displays results in 
graphical and tabular form on video dis- 
play or printer. 

The program, for the Model I or III, 32K, 
on disk or cassette, costs $125 from 
Options-80, PO Box 471, Concord, MA 
01742. 

Reader Service i^ 335 

Book Discloses Structures 

Structured Requirements Definition by 
Ken Orr is a presentation of recent ad- 
vances in systems theory, tools and 
methodology in a readable text. 

The book is available from Ken Orr and 

Associates, Inc., 715 E. 8th St., Topeka,KS 
66607, for $25. 

Reader Service ^^ 336 

Percom Sells Binders 

Percom Data Co. is offering three-ring 
binders with two inside clear plastic disk- 
ette pockets designed for software docu- 
mentation. 

The light tan binders, decorated with 
the Percom logo and designer stripes, sell 
for $4.95 from Percom Data Co., 21 1 N. Kir- 
by, Garland, TX 75042 

Reader Service i^ 172 




Percom Binders 



Target Helps 
Business Planning 

TheTarget business planning system is 
designed to replace time-sharing and 
large-scale systems for the small busi- 
ness in the analysis of past business ac- 
tivities and projection of future perform- 
ance. 

Advanced features include an ability to 
display or print the entire set of data en- 
tries, calculation rules and report specifi- 
cations for error correction and the ability 
to follow English commands instead of 
matrix algebra commands. 



It runs on the Model II with at least 56K 
memory and 200K disk storage using a 
CP/M operating system. 

Created by Advanced Management 
Strategies Inc., Atlanta, GA., it is available 
from WESTICO, 25 Van Zant St., Norwalk, 
CT 06855 for $195. 

Reader Service ^ 174 



Muse is Word 
Processing Program 

Muse provides extensive word process- 
ing operations for ANSI Fortran-compat- 
ible computers including full-screen cur- 
sor control, automatic or manual pagina- 
tion, letter, report and manual formats, 
block editing and erasure, page headers 
and feet, superscripts and subscripts, and 
multiple overlays for composite charac- 
ters. 

It runs on a variety of CRT terminals and 
outputs to all popular correspondence- 
quality printers. 

A Muse package supporting one to 
three work stations and one terminal 
printer on perpetual lease is available for 
a one-time payment of $6,800 from Marc 
Software International, 260 Sheridan Ave., 
Suite 412, Palo Alto, CA 84306. 

Reader Service .^ 173 



Centronics Offers 
Grapliics Printer 

The Model 739 is a graphics printer with 
a 74- by 72-dot per inch resolution, a mono- 
spaced print speed of 100 cps, and an 
acoustical top cover for single sheet load- 
ing and noise suppression. 

It is available for less than $1,000 from 
Centronics Data Computer Corp., Hud- 
son, NH 03051. 

Reader Service ^^ 337 



Program Interfaces 
PC, Models I and III 

Pocket Tape I is a machine language 
program allowing theTRS-80 Models I and 
lit to read data tapes recorded by the 
Pocket Computer. 

The Model III versions may be used di- 
rectly on a cassette- or disk-based ma- 
chine. The Model I versions require an ex- 
ternal hardware interface to the PC tape 
format. Minimum system memory is 16K. 

The program costs $14.95 on cassette 
and $24,95 on disk, and the Model I cas- 
sette interface is available for $49.95 as- 



sembled and tested (or it may be built 
from Radio Shack parts according to the 
included schematic) from Green River 
Systems, PO Box 552, Auburn, WA 98002. 
Reader Service ^ 185 



Envelope Protects Data 

Data-Safe is a metallic shielding alloy 
envelope designed to shield two floppy 
disks from magnetic fields during stor- 
age. Each page fits in a three-ring binder. 

They are $8.95 each for orders of five, or 
less with discounts for larger orders from 
Data-Safe Products Inc., 1926 Margaret 
St., Philadelphia, PA 19124. 

Reader Service ^^ 160 




Data-Safe 



Select Word Processor 
Features Easy Operation 

Select is a word processing program 
compatible with CP/M using microcom- 
puters. 

It features single-key instruction entry 
and the creators claim it takes only 90 
minutes to learn to use it. 

It costs $600 from Select Information 
Systems Inc., 919 Sir Francis Drake Blvd., 
Kentfield, CA 94904. 

Reader Service ^ 180 

Program Teaches 
Even-Odds Play 

Tired of losing money at casino black- 
jack tables? Basic Strategy Tutor I will 
teach you even-odds play using Las 
Vegas strip. Las Vegas downtown and 
Reno-Tahoe rules, with or without double 
down after splits option, with single or 
four decks. 

It features moderate and advanced 
speed play options and tracks the number 
of hands played, number of hands played 
correctly, number of blackjacks dealt and 
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strategy accuracy percentage. 

It is available for $24.95 on cassette for 
a 16K machine or $29.95 on disk tor a 
32K machine plus $2 shipping and handl- 
ing from Micro BlaJak Systems, Inc., 2800 
N. Elien St., Fiagstaff, A2 86001. 

Reader Service ^ 175 

Regulator Stops 
Volt Surges 

The Voitector protects microprocessor- 
based equipment from power surges, 
spikes, transients and high frequency in- 
terference. It meets latest industry surge 
voitage standards and gives two-way pro- 
tection, preventing the microcomputers 
from causing line problems as well. 

It is available for $79.50 from Pilgrim 
Electric Co., 29 Cain Dr., Plainview, NY 
11803. 

Reader Service ^ 161 




VoHecXor 

M-Zat is Editor/Assembler 

M-Zal is a modular editor/assembier for 
the TRS-80 Mode is I and III which inciudes 
fuli screen option menus, fuli screen text 
editor, and object module iinker 

M-Zal IS avaiiable for $149 from Com- 
puter Applications Unlimited, PO Box 214, 
Rye, NY 10580. 

Reader Service ^ 165 



Run Model III Disks 
On Model I System 

Doubler II is an update of Percom's 
Dou bier double-density disk system adap- 
tor for Model I computers. 

Like the original, the new version allows 




Doubler II 

as much as 364K bytes of storage per side 
of a tive-inch diskette, four times that pro- 
vided by an unmodified Tandy Model i 
drive. 

Unlike the original, this version allows 
the Model I to use Model III diskettes. The 
Model I cannot do this without modifica- 
tion. 

Doubler II costs $219.95 including a 
DBLDOS Diskette. The upgrade kit for 
E)oubterl costs $30 with proof of purchase 
of Doubler I, It is available from Percom 
Data Co., 211 N. Kirby, Garland, TX 75042. 

Reader Service t- 181 



VR Data Announces Disk III 

Disk III, from VR Data, is a five and one- 
quarter-inch disk storage subsystem that 
is 100 percent compatible with the Model 
III hardware and software. 

Installation can be done by VR Data or 
by any mechanically-inclined person with 
hand tools. Disk III options include a sec- 
ond internal 40-track drive, an 80-track 
disk driver, a two-sided 40-track drive, and 
a two-sided 80-track drive. 

The price for a basic unit is $599, the 
second 40-track drive is $265. Disk III is 
available from VR Data Corp., 777 Hender- 
son Blvd., Folcroft, PA 19032. 

Reader Service ,^ 328 




Convert Color 
Programs to Cartridge 

TRS-80 Color Computer owners can 
have their programs on cassette put Into a 
ROM cartridge, giving them instant loads 
Eigen Systems will do this transfer with 
any Color BASIC or Extended Color 
BASIC program. 

The ROM cartridge plugs into the Color 
Computer's external port. The program 
will run instantly upon power-up, and alt 
memory can be used for data storage or 
graphic displays. 

Prices start at $45 from Eigen Systems, 
Box 10234, Austin, TX 78766. 

Reader Service v^ 338 

Board Doubles 

Color Computer Memory 



Disk 111 



Ramcharger is a completely assembled 
and tested printed circuit board which fits 
inside the Color Computer to increase its 
memory from 16K to 32K. 

Completely compatible with Color 
BASIC, it requires no special software, no 
soldering or hardware modifications and 
leaves the ROM Pak port free. 

It comes completely documented tor 
$99.95 from Spectral Associates, 141 Har- 
vard Ave., Tacoma, WA 98466. 

Reader Service ^ 177 

Raiders Has 
Fast-Moving Animation 

Space Raiders Is a high-speed space 
battle game which puts the operator in- 
side a spaceship on a search and destroy 
mission to intercept a Klingon convoy. 

It features arcade-style simulation and 
gives a different game each time using a 
TRS-80 Model t, 16K Level il machine. 

The game costs $24 95 from Bosen 
Electronics, 445 East 800 North, Spanish 
Fork, UT 84660. 

Reader Service *-• 164 

A Walk on 

The Monster Side 

Crush, Crumble and Chomp gives the 
game player the opportunity to be a mon- 
ster, literally. 

The player chooses from among several 
famous Grade B Movie monster greats or, 
in the disk version, he may create his own 
monster to invade New York, Washington 
DC, San Francisco, or Tokyo. He battles 
tanks, infantry, helicopters and mad 
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scientists while trying to achieve his 
goals. 

The piayer can choose from five goais: 
destroy buildings, destroy combat units, 
survival, eat or just blast everything in his 
path. 

The game comes on disk (TRSDOS 32K) 
or cassette for $29.95 from Automated 
Simulations, PO Box 4247, Mountain 
View, CA 94040. 

Reader Service ^ 183 



ASC Has New 
Program for Livestock 

Agricultural Software Consultants, Inc., 
offers a new least-cost ration balancing 
program called Mixit-l. Mixit-1 can be set 
up for any type of livestock and comes 
with a 15-day money-back guarantee. 

The program uses a machine language 
linear programming model to get a true 
least-cost ration quickly. In 16K Level II 
BASIC you can run Mixit-1 with 30 feed in- 
gredients and 10 restrictions, and it is ex- 
pandable to 32K. 

The program costs $95 on cassette or 
$99 on diskette from Agricultural Soft- 
ware Consultants, Inc.. 1706 Santa Fe, 
Klngsville,TX 78363. 
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C-5Tape is Quicker 

Micro-80 now offers a cassette tape for- 
mat designed for higher baud-rate sys- 
tems. The Micro-Data C-5 five minute cas- 
sette allows over 24,000 bytes of storage 
per side at 1500 baud- 
Compared to the C-10 cassettes used 
on the Model I, the C-5 will store more data 
in less space and less time. These capa- 
abifities make the C-5 ideal for the TRS-80 
Model III and the Color Computer. 

For more details write Micro-80, Inc., 
E-2665 North Busby Road, Oak Harbor 
WA 98277. 
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Exchange Offers 
Demo Tapes 







C-5 CassBXXes 



Computer Information Exchange Inc. is 
offering demonstration tapes on music 
synthesis on the TRS-80 and compilers in 
BASIC and Tiny Pascal, a tape head 
azimuth alignment tape, and an update on 
their SuperPimx data-base management 
program. 

The music tape, designed for play on a 
high fidelity system, compares the per- 
formance of two synthesizer boards in 
popular and classical music including 
Bach, Handel, Mozart and Rossini pieces. 

The compiler tape demonstrates how 
use of a compiler speeds play of two 
games, one in BASIC and the other in Tiny 
Pascal. 

The head alignment tape, which has a 
10K Hertz tone on one side and white 
noise on the other, allows the user to ad- 
just his tape recorder head for maximum 
alignment by simply adjusting it to the 
maximum volume. 

These tapes are $3.95 each. 

The data-base manager is an update of 
a popular management system. The up- 
date has added pagination, easy accom- 
modation of machine-language drivers, 
ease of editing fields or records, merge 
or split files, menu-driver memory man- 
agement and user-chosen limits of num- 
ber of fields. 

SuperPimx is available on cassette for 
$19.95. 

All these tapes are from Computer In- 
formation Exchange, Inc., Box 159 San 
Luis Rey, CA 92068. 
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OASIS Publishes Programs 

Volume I of the OASIS Users' Group 
public domain software collection in- 
cludes 12 games, a purge utility, a poetry 
generator and a loan amortization pro- 
gram on eight-inch diskettes. 

Membership costs $35 including the 
package and is available from OASIS. PO 
Box 2400, Santa Barbara, CA 93120. 

Reader Service ►'176 



Memory Expander Piugs In 

International Memory (IM) is a memory 
expansion board that will give the TRS-80 
Model I up to 48K without an expansion in- 
terface, soldering or trace cutting and 
without software or any alteration of the 
micro's functions. 



Two versions of the board, which plugs 
into the RAM sockets inside the keyboard 
unit, are available. The llvl-1 gives a 32K 
byte capacity with 4K or 16K RAM chips 
and costs $47.50; the IM-2 gives up to48K 
bytes with 16K RAM and costs $79.50. 
RAM chips are $32 per 16K bytes. 

All are available from Holmes Engineer- 
ing, 6246 W 3705 S, Salt Lake City, UT 
84120. 
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Graphing 
Program Available 

Automatic Graphing of Functions is a 
fast, low priced program which graphs 
equations in the form Y-mx-i-b and 
Y = (x). 

It can graph simple formulas, multiple 
equations, summations, etc., automatic- 
ally scales its axis for screen display size, 
has an LPRI NT option foralineprinterand 
has error handling to take care of tricky 
equations. It has manual or automatic 
range selection. 

The program with user's manual for the 
TRS-80 Model I, Level II and Model 111 
BASIC are $19.95 on cassette from David 
L Modney, 4144 N. Via Villas, Tucson, AZ 
85719. 
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Printer Uses 
7 X 7 Dot Matrix 

The Bytewriter I is an 80-column dot 
matrix printer that accepts single sheet or 
roll paper up to 8 Vi inches wide and prints 
at 60 lines per minute using a 7X7 dot 
matrix. 

Designed to interface with all TRS-80 
models, it retails for $299 with a limited 
90-day warranty from Microtek. Inc., 9514 
Chesapeake Dr., San Diego, CA 92123. 
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Bytewriter 1 
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NEW PRODUCTS 



Program 

Analyzes Phone Bills 

Long Distance Analyzer streamlines 
telephone bill accounting by identifying 
where your calls go, grouping calls, and 
totalling those groups for cost account- 
ing, client billing and investigating un- 
familiar numbers. 

Usage patterns are identified by area 
code, state and WATS zone. 

Cassette version for Models I and III is 
$95; disk is $135. Disk for Model !l is $155. 
from Golden Braid Software, PO Box 2934, 
Sarasota, FL 33578, 
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Micro Link 

Manages Communication 

Micro Link enables inter-computer com- 
munication by allowing files to be pre- 
pared in advance and transmitted auto- 



matically, automatic data-base scanning, 
the recording of itenns of interest to the 
user for later reading, and several options 
with default settings and simple, fast user 
commands. 

It runs on a 16K Z-80 machine using 
Micropolis DOS or CP/M 1.4 and up (in- 
quire about TRSDOS, etc.) and costs $89 
from Wordcraft, c/o Microcomputer Soft- 
ware Assoc, 1122 B. St., Hayward, CA 
94541. 
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Development 

System Put on Model III 

The PDS assembly language develop- 
ment system uses TRSDOS on the Model 
III to provide a macro assembler, linkage 
editor/linking loader, string-oriented text 
editor, interactive editor/assembler, trace 
debug/monitor, disk disassembler and 
several other utilities. 



The system Is available on five-inch 
double-density disks with 100 pages of 
documentation for $99 from Allen Ashley, 
395 Sierra Madre Villa, Pasadena, CA 
91107. 

Reader Service ^ 178 



Foto-Flle is 

For Photographers 

Tape-Tronics is offering two software 
packages for photographers. 

Foto-Flle organizes slide, negative or 
print album files by title, location, 
category or code and costs $19,95 for cas- 
sette and $29.95 for disk. 

Darkroom Assistant is a three-program 
package covering prints from slides, 
negatives or Cibachrome process giving 
correct filtration values, exposure times 
and developing temperatures. Cost is 
$59.95 for tape or diskette from Tape- 
Tronics, 346 N. Western Ave., Los Ange- 
les, CA 90004. 

Reader Service w' 168 



ACCEL2 SPACE TRADEOFFS 

Compiled programs run faster than uncompded Brograms but ttiey are usually tHgoer This is Because 
compilei) statements occupy more space ttian itie BASIC source statements they replace ACCEL2 com- 
pttes a seieciea suOset of Level ll/Oisk BASIC anO controls the interpreter 1o enecute uncompiled lines at 
normal mierpreter speed The uncompded lines slay exactly the same size and thus do no! conlriDute to 
CD<)e grovftti at all 

Table below shows Ihe BASIC subset tMnsiateO Dy ACCEL? to machine code Figures represent the 
numbef of exKa bytes needed by each instance of the compiled mslrjction 



AssionmenI (LET) 

Array Reference (l-ilim) 

AMD Of OR 

Compare ( < , etc] 

Add. Subtract. Concat 

Mulliply (■) 

Divide |/| 

Reference to a constant 

FOR with NEXT 

POKE 

SET or RESET 

IF THEN ELSE 

ON axpressian GOTO 

fHmSni 

VARPTR 

POINT 

PEEK 

LEN 

MIDS 

LEFT$ 

RIGHTS 

CHR$ 

ASC 

CVI 

now of Control 

GOSLB Willi RETURN 

GOTO 

All other 8AS1C 

statements and lunclions 



INTEGER 

5 
16 

5 
11 

3 

5 

5 


29 

7 

6 
15 
12 

-3 
3 




SINGLE 
14 
24 
14 
26 

2 

2 

2 

6 

19 
18 
21 

18 

-9 
9 




DOUBLE 
14 
25 
14 
25 

2 

2 

2 
10 

19 
18 

21 

18 

-9 
9 




STRING 
14 
20 

10 
I 











Tfie ACCEL2 user may also selectively mtiibit compilation ot expressions to (urttier minimise code 
growth Ttiis IS conirolied by embeddmo HEM NOEXPRard HEM EXPR lines in the uncompiled program to 
bracket pertormance critical sections Programs compiled withoui use of the REM NOEXPR opiior typi- 
cally expand lo about 1 5-2. b limes the Size Ot the original, But since ACCEl.2 strips REM statements 
from the BASIC program, hnal size can sometimes be smaller 

ACCEL 2 For 32K TRS-80 Model I (Model III version soon) Compile time size 5652 bytes run-time 
size 1536 Bytes, save lo ES/F waler. disK under TRSDOS, NEWDOS, NEWDOSSO. 

$88,95 + $2,00 shipping 
T5WE: »-ilesACCEL2compileri>utputtoindepender>iSYSTEMtape $9,95 + $1.00shippifl9 



Developed m Britain 
By Soulhern Software 



THS-80, TRSDOS Im Radio Stuc(( 



ALLEN GELOER SOFTWARE Masterctwrge/Visa 

Boi 11721 Mam Post Office CA add %% 

San Francisco. CA 94101 
(415)387-3131 ^79 

Stringy/ Floppy tm exatron inc NEWDOS tm Apparat, Inc 



CO 
PIGGYBACK! 




ADD lowercase with our 
PLUC-IN piggyback board! 

9WX7H Dot Matrix $135 
5WX7H Dot Matrix $ 95 

TWO complete character sets on board; 
96 character ASCII PLUS choice of 
128 character APL, TRS-80/H-19 Graphics or 
Scientific. {Customer defined: add $50/set). 
Most printers convertible: specify logic board # 



SYDNEY SEZ: 
Shop camparottvslyi 




Digital Systems Engineering 



12503 King's Lake Di1ve. Reston VA 22091 (703) 620-2994 



AL50 AVMUUU: New Centtwiics and Integral Data Systenis printers at 
15-20% beltw list: also, used printet^ of several makes. Cal for hifomMlon! 

MasterCard, VISA, Ctieck. MO, PO All products waranleed 90 flays 
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Radio Shack Made the TRS 

GMnpiiter Even Bet 



At $399'. it's no wonder the 4K TRS-80 Color Computer is ideal 
for beginners. Now there's a TRS-80 Color Computer designed 
for more advanced applications, too. 
TRS-80 Extended Color BASIC Computer. This high- 
performance computer includes a 16K ROM Extended BASIC 
with advanced graphics, eight brilliant colors, and sound for an 
unprecedented low price! You can draw fine lines, circles, rectan- 
gles, boxes and more with easy-to-use one-line commands. 
Four graphic modes with two color sets allow up to 49. 152 pro- 
grammable screen points (pixels). There's 225 separate tones 
for music or sound effects, too. All this on a 16K RAM machine 
(including video memory) loaded with the dynamic features a 
serious programmer demands. You get a 32-cpl x 16-line saeen, 
multi-character variable names (two significant), editing, tracing, 
user-definable keys, 255-character string arrays, floating point 9- 
digit accuracy, and even machine language routines. 

Priced at Only $599. the TRS-80 Extended Color BASIC Com- 
puter is useful, entertaining and educational. Yet using it can be 
as simple as plugging in one of Radio Shack's instant-loading 
Program Paks. The computer attaches to your TV. or our own 
$399 TRS-80 Color Video Receiver. Forjust $24.95, you can add 
a pair of joysticks which add flexibility to games and video dis- 
plays. A built-in serial interface lets you attach a printer or a 
modem. A pair of tutorial. Extended Color BASIC instnjction 
manuals are included, as well. 

Mote Good News. Extended Color BASIC is also available as an 
upgrade kit ($99) for your 4K Color Computer (16K RAM 
required — $119). There's a modest installation charge for each 
kit. 

New TRS-80 VIDEOTEX So/hvare (with the modem shown 
below) offers quick, affordable access to various information 



and data services. The CompuServe* Information Service gets 
you local, national and international news, weather and sports 
from major newspapers, like The New York Times and The 
Washington Post, plus the Associated Press News Service; info 
on stocks and bonds; educational reference service; nationwide 
Bectronic Mail and much more! The Dow Jones* Information 
Sendees provides stock exchange quotes — as recent as 15 min- 
utes—plus feature selections from The Wall Street Journal and 
Barron's. 

Only $29.95 Buys You VIDEOTEX Sofhvare including a free 
hour on both CompuServe and Dow Jones. Come see the new 
TRS-80 Color Computer, its programs and accessories, at your 
nearby Radio Shack today! 



fllMill 



The biggest name in little computers' 

A DIVISION OF TANDY CO-IPORATION 
6100 STORES AND DEALERS. 140 COMPUTER CENTERS 
AND 135 SERVICE CENTERS NATIONWIDE " * 




NEW 




A Low Cost. Direct-Connect Modem. A con 

vcnient alternative to an acoustic coupler. 
The TRS-80 Modem I !cis you enter the 
world of mJcTocamputer commuiii 
cation for only S 149 Cable extra. 

Sptetaaaont Ixr*/ Powei CMOS 

compaefb-- 
-48dB- 
mdudCStr 
FCC apptoveJ 



iiil 



* CompuServe is a itaJcinaik oH c>mtmt> '^w.. 
'«c liinv Iimfs Is a Irndcinntk of t>»w lone* 



sitiieport 



RKVIEW 



Disk Drives and Interface — top end hardware for Model I connoisseurs. 



Lobo Connections 



LX-80 . 

Lobo Drives International 

Goleta, CA 

$862 

SABOO 
S1342 

by Jake Commander 



Though Lobo Drive's LOGS may already 
be aifamiliar name to disk operators, 
the equipment for which it was designed— 
the LX-80 expansion interface and the 
SA800 dual eight-inch disk drive— remain 
unexplored. 

Why bother with a more expensive alter- 
native to the Radio Shack expansion inter- 



face and drives? First, an unmodified Radio 
Shack interface won't accommodate eight- 
inch disks, whereas the LX-80 will. Also, 
since production of the Model I has ended, 
it's anyone's guess as to how long the at- 
tendant interface equipment will remain 
available. Despite such a threat the Model t 
is thriving, with reports of units being sold 
for more than they cost new. Manufacturers 
of ancillary gear are not merely continuing 
to support the hardware, but in some cases 
are offering superior alternatives. 

Offers Reliability 

I've been operating the Lobo equipment 
on my system for over two months without 
a single glitch. This reliability, reflected in 
the stiffer price, has also been built into the 

equipment. 




Lobo engineers employed a good degree 
of overkill in their designs. For instance, try 
lifting the interface. Instead of a plastic 
case, both interface and drive units are 
enclosed in one-eighth-inch thick steel. Not 
that many users are likely to try it, but you 
could quite literally drive a car over the in- 
terface without damaging it. 

The unit measures just under three 
inches high (lower than the RS expansion 
interface), by 19 inches wide, by 12 inches 
deep. Photo 1 shows how the interface 
looks in typical setup. 

The LX-80 comes with a user manual 
which not only describes set up procedures, 
but offers the reader simple step by step 
diagrams. An enthusiastic owner who dab- 
bles first, without reading, can plug in either 
the five or eight-inch drive connector cables 
the wrong way; neither the multi-pin plug 
nor the socket have a keying notch. Not that 
this is likely to damage anything, but, con- 
sidering Lobo's high degree of engineering, 
this is a curious omission. 

The manual also tells you how to change 
the LX-80's parameters to fit your needs. 
Furthermore, owners are actually told how 
to open the box and install up to 32K of their 
own RAM. The only criticism ! have of the 
manual is that there is no circuit schematic. 
I don't care how secret Lobo's circuit de- 
sign is, if someone wants this sort of quali- 
ty, and pays this sort of price, he should 
have the option to maintain his own equip- 
ment. This is obviously impossible without 
the circuit diagram. 

The interface may be powered from ei- 
ther 1 1 7 VAC at 60 Hz, or 235 VAC at 50 Hz. 
The manual tells you how to make the 
change by replacing a strap Inside the unit. 
This dual-standard power supply is a bless- 
ing to foreign users. I speak from experi- 
ence. I blew two Radio Shack power units 
while in Europe. 

An extra bonus from the LX-80 Is that it 
can also supply power directly to the 
TRS-80 keyboard, allowing it to run cooler. 



Pholo 1. Lobo's LX80 Shown in Typical Setup 
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"The LX-80. . . can also supply power 

directly to the TRS-80 keyboard, 

allowing it to run cooler. 



tf 



Thus, you can exchange ^ardy's plaslic 
power units for Lobo's higher reliability. 
This is especially useful when operating Itie 
TRS-80 in a high ambient temperature when 
the back of the keyboard can become fright- 
eningiy hot. 

Disk Mix 

The unit is extremely flexible regarding 
the disks you can use. If you want to use 
four five-inch mini-floppy drives or fcur 
eight-inch standard floppy drives, the LX-80 
will support it.orary comtinaticn. Not only 
that, but It's possible to configuie the inter- 
face to boot up from either five- cr eight- 
inch drives. 

Even this doesn't cover a'l possibilities 
Decause the l_X-80 can also support hard 
disks, specifically Loto's ISBOT dual 
fixed/floppy. The lined disk comes in five- or 
ten-megabyte versions, the floppy gives up 
to 1 .6 megabytes per disk. 

"this can be configured as the bootstrap 
drive. Though this may sound complicated, 
it's not. The whole point Ismerely to tell the 
interface which is dnve zero, and this is 
done by setting small DIP switches at the 
rear of the unit. 

in summ.alion, the LX-80 supports flop- 
pies in double or single density, single or 
double-sided, up to four five-inch disk 
drives, plus up to fcur eight inch drives, plus 
any number of hard disk drives, and in any 
combination. Try that with your average ex- 
pansion interface. You now have the possi- 
bility of a huge data base of tens of mega- 
bytes connected to the TRS-80. 

I need to add ore small caveat to this 
glorious mixing of drives. The LX-80 doesn't 
map its disk input/output in the same way 
as does Radio Shack in their expansion tn- 
tertace. Lobo's unit addresses the drives 
via I'O pcrts. Radio Shack memory-rraps 
them. This is minor, as that's the way tjoth 
Ihe Model II and the Model III computers ac- 
cess their drives. 

Lobo decided to follow the same course 
by port-mapping i;0, which is no mean feat, 
as the ROM bootstrap loader routine in the 
keyboard unit expects the disk controller to 
t>e mapped in memory. The LX 80 appears 
to cope with this anon^aly by Hipping to 
memory-mapped -lO upon reset (which suf- 
fices to read the bootstrap sector) then Hop- 
ping automatically to pert-mapped I/O for 
all subsequent disk accesses. 

The upshot of all this is that the few 
pieces of software written for the TRS-80 
that don't perform disk I/O through the disk 
operating system will not work. Included in 
this small category are such prograrrs as 
Super-Utility and certain adventure games 
which performs their own disk i/O, 
This is the reason Lcbo International 




Photo 2. The LX-dO features serial hO potts, alternate ROM switch, dnve ^erocontig^Tst'on 
switch and sockets for connecting five and eight-inch floppies. 



needed to have a DOS developed especially 
for their hardware. All BASIC programs will 
work fine because the disk accesses are 
made via the disk operating system, in this 
case, LDOS. All machine code programs, 
such as Visicalcor Profile, will wckas well. 
They, too, access disk files via the DOS. 

For the curious, here are the ports used 
for disk I/O in the LX-80- Expetienced 
TBS-80 hatdware users will notice several 
extra options compared to the regular inter- 
face. 

Port 'npi^t Output 

EO Ha-d d'Si data Herd ciEk da'a 

c1 F-loppy f iFO ciala Flopci" f'^O Gala 

E2 P'FO coLJnlet riFO Tiode (O-read. 1 wiilel 

E3 OiPswtth Floppy select end -nodes 

E4 FDC sta'ijS ret'Siet FDC comrTiend regis'er 

E5 FDC (tack jegster FDC track register 

fc6 FDC seoior regster FDC sector leg^Eter 

E7 FDC data register ^DC da'a retister 

Other Capabilities 

An interesting feature of the Lobo setup 
is the ability to override the keyboard Read 
Only Memory. A switch at the rear of the 
unit switches out the Level II BASIC ROM 
and switches in an alternate set which can 
be plugged into three sockets inside. 

With the usual llexibiiity that seems to be 
part of Lobo's design philosophy, num,er- 
ous sorts of ROM can be added by reconfig- 
uring a set of jumper wires rear the alter- 
nate ROM sockets. The kinds of ROM Lobo 
accommodates are 2708s, 2716s, or 2732$. 
This should allow the whole TRS-80 to oper- 
ate with any dedicated application 'n mind. 
Possibilities include a Pascal or Pilot that 
can be available on power-up, or any num- 



t>er of industrial or mechanical appiica- 
tions. 

The LX-SO ccnlains the usua! ceal-lime 
clock which provides interrupts tc the 2-SO 
once every 25 milliseconds in the sane 
manner as the Radio Shack intertace. Arr- 
clher similarity is the expansion pol which 
replicates the pinout from the back of the 
keyboard, except for the five-volt supply on 
pin 37. This allows you to use Ihe wide 
range of peripherals available for the 
TRS-80. 

A Centronics-type parallel piinter port is 
memory-mapped to the same address as 
the ordinary expansion interface, so print- 
ing ^s unaffected. Two serial output pcrts 
driven by a Z-80-SIO/2 controller will drive a 
serial printer. These RS-232 L'O channels 
can be configured by the user to interface 
with 'ust about any serial device. 

Opening the cabinet, you will see two 
jumpers, one for serial port A and the cti~er 
for port B. These jumper plugs can be sol- 
dered to allow any serial custom configura- 
tion. Anyone who has reed of serial I/O has 
probably come to realize just how non- 
stardard a standard RS-232 bus can be. 
Lobo's configuration allows handshaking, 
other control signals or data to appear on 
different pins to the cable from the outside 
world. 

Baud rates can be set from software, and 
range from 12.5 baud to 316.8 •■iiobaud. 
That should cover just about every possible 
serial device imaginable. 

A description of the jumper plug follows. 
Note that the left side shows vhe signals 
available from the interface, while the right 
side shows which pins these signals can be 
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Brsixi-:ss/Acc( )i;x'i'iNc, 

' SERVICE 

'ORIENTED 

A'CCOUNTS 
RECEIVABLE 

"SOAK" IS a lumhini'd lime n'piirtinn 
iiccciunls rcit'jvabli' sy.stfm dt'sinnwl fur scr 
vicoirniini/atiims. 'iVansncljiins input In thi' 
sysU-ni ini'ludi'charjii's to, and rcccjiits fnim 

I iisliitrHT acciiunls. Kmplnyci's charKf timt- 
atul iiriloUaramimnUs aK-iinsl sp<'<'iru' tasks 
codes. I'rci'slalilishfd inputs arc employee 
rate, tat;k hourly rale, task flat <-har(ie. and 
task rcnin<linn I'ai'lor. 

Outputs produced include: 
'upilatvd fualiimrr filv — miliitli/if^ hiil 

iiiii'r. Iiint pDstiiin. It ml hist niiipl 

II mail II Is 
'sliltrinrnl sumiimry — h\ riisl'inirr ami 

luah null- 

*(/»■(«)/ Inuisintiim ri-/)iirl 
*i-niplii\iftin(l lanh filinifiiiiry — iiilh rrir 

mil- & lUTii-iil 
*i{tttnhnsf ri'piirls — fur rmpliivi'r. iiiftii 

'KIT (iiid task v<idr lintiihitsi-s 
*sl(tirnivnts Uipliunah — pninniiiiiiu-ii In 

suit yiiiir fiirins 'iifiiiliihir iil iitlilitniiiiil 

titsti 

Miiniliiranri iiintnil yiiiir iiiliiahlr rrsinirii->. 

II iththissv-'itfml'iriinl\$:lH'>.'<)ril<'rpoiiliirt 
iuiU: SOAK' 

GENERAL 

LEDGER/CLIENT 

WRITE-UP SYSTEM 

Ourdeneral l^■d^;er Client Write-up System 
IS a proven, i|ualit\ [irodutt used liy several 
Accounting firms and other Musincsses. 

'fvattiri's (Ifpnrlriu'iildl fintiiiriiil .sfufc 

mm Is 

*(iinl(iiiis htidfii-t pnii'isiiiiis 
'prrmils up hi 'ilH), usiT-di'lini'd ihar! i,j 

(II tiiuiits 

'allims fur trntisaclinii i-ditinn 
'n-tuins .ilinidard jnurnnl i-iitrii-s 
'(liTrpts iinh fialiirirfd hiiUht's nf Iraiis 

aft II I IIS 

^pniiidrs i-asy-tii-fiiHoir audit trail 
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"The drives themselves 
function so perfectly 
it's almost boring." 




Photo 3. Inside LX-SO 



routed lo on the DB-25S socket at the rear of 
the interface. 



1 +12 volts 
Z Transmit data 

3. Transmit clock 

4. Bequest to send 

5. Data terminal ready 

6. Receive data 

7. Receive clock 

8. Clear lo send 

9. Data carrier delect 

10. -12 volts 

11. Not used 

12. Not used 



2A Not used 
23. 0e-25S pin 2 
22. DB-25S pin 24 
21.DB-25Spin4 
20 OB-25S pin 20 
19. DB-25S pin 3 
ia. DB-25Spin 17 
17. DB-25Spin5 
16. DB-25Spin8 
15. DB-25Spin6 
14. Not used 
13 Not used 



Photo 2 Is a shot of the rear of the inter- 
face showing the serial I/O ports, alternate 
ROM switch, drive zero configuration 
switch and sockets for connecting five- and 
eight-inch floppies. 

Access couldn't be simpler to the 10.5 x 
14-inch printed circuit board for adding 
RAM or changing jumpers. The board Is 
rigid thick glass fiber held down by five 
screws which should eliminate any flexing 
problems. 

To the right of this RGB is the power sup- 
ply mounted inside an alloy shield. Photo 3 
shows you the inside of the Interface. The 
alternate ROM sockets are visible just right 
of center at the top of the main PCB, where- 
as the serial I/O jumpers are at bottom left 
of the same board. Notice the hefty power 
transformer. 

The SA-800 

Though the LX-80 steals the show, the 
dual SA-800 eight-inch single-sided floppy 



disk drive offers over one megabyte of 
storage in double density. The units are 
tried and trusted Shugart SA800 soft sector 
drives which boast a head life of 15,000 
hours and a disk life of a phenomenal 3.5 
million passes per track. 

The cabinet is fairly large by microcom- 
puter standards, measuring 17.5 inches x 
22 inches x 4.5 inches with the same hefty 
construction techniques used for the inter- 
face. 

Unlike five-inch floppies, eight-inch drive 
motors are constantly running, whether or 
not the drive is selected. For this reason, 
Lobo installed a cooling fan at the back of 
the cabinet. Unfortunately, for my taste, the 
fan was noisy to the point of distraction. 

The drives themselves function so per- 
fectly it's almost boring. I haven't noticed a 
soft error in two months. 

A Shugart OEM manual Is supplied with 
the drive unit, as well as a maintenance 
manual that does contain the circuit sche- 
matics. 

Conclusion 

Though the Lobo expansion interface of- 
fers much greater versatility versus others 
currently available, their drives just outper- 
form, or are equal to others now on the mar- 
ket. However, both units are of the highest 
quality and seem to be aimed at the profes- 
sional microcomputer user. 

OK, Lobo International, when you are go- 
ing to come out with a TRS-80 compatible 
keyboard unit? The industry could use 
one.H 
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with lower 
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• Your Closest Link to the 
Manufacturer 

• All Items Listed are Stocked 

• We Support & Service 
Products Purchased From Us 

Q 



PRINTERS 

Okidata ~ 

Microline83 . 

Up to 15' Paoer Widlli Ue Cotjnns Slandsrd. Ki2 
Conpres&eC, Vciica "ati. 'op o' Foni. Paraiie S RS> 

?32C nic'aces & Tfacio' Feed iTictidea. Pric:io'i S, 
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1 



Friction Feed 

has been added 

to the popular MX-80. All other features' 

same, including an adjustable tractor. 

Model MX-80 List $645. 

— Friction Drive Kit 



NEW 



.$60. 




Anadex Model DP-9001 . . .List $1550. 

J 80 Column 

^ Model DP 9501 List $1650. 

132 Column 

Unbelievable Dot Matrix Printer with All Functions 

Program-Accessible. Has 4-Character Font, Hi- Res 

Graphics. Switch Selectable Parallel, Serial & Current 

Loop Interface, Operator Selectable Protocat. 



PRICE REDUCED 




Microline82 . 

MicrolineSO List $599. 

Tractor Feed for 

MicrolineBO &82 List $50. 

Hi-Speed Interface 
forMicroline82&83 . .List $210. 

256 Character Buffer, Expandable to 2K 

RS-232C Interface 
forMicroline80 List$150. 

256 Character Buffer 

Epson — 
Model MX-70 List $445. 

Bit Plot Graphic Printer, Adjustable Trac- 
tor 4 — 10 Inches. 80 CPS. 



NEWl -INTERFACES 

Hi-Res Bit Plot Graphics for 

Epson Printers , . . . List $90/Set. 

Plug In Prom Set 

Vardon IK Serial Interface Buf- 
fer for Epson MX-80. . .List $175. 

(Complete with Cable) 

Tymac — Apple Interface Using 
8th Data Bit List $139. 

(Complete with Cable) 

INTERFACES 

Apple Plug-In Interface 

&Cable ListSIIO. 

Serial Interface & Cable List $90. 
IEEE 488 Interface 

& Cable List $80. 

TRS-80' Expansion Interface 
Cable List $35. 

"A '.raJii idrre of Rdijio Sldck -- l"anflv Co'D 

Model 232 Universal Serial Inter- 
face Cable List $25. 




NEW 



MONITORS 

BMC & NEC — Black & White 
and Color 



No Penalty 

for 

Credit Card 

Orders 



NEW}-PRINTER LINES 

Centronics Printers In stock. 
iNEWl-with Graphics Model 739 




Model 739-1 (Parallel) - List $995. 
Model 739-3 (Serial) - List $1045. 
Model 704-9 (Serial) - List $1795. 
Model 704-11 - List $18.70 
Also Ribbons & Accessories 
All other Centronics Printers 
are Available. 

We now stock NEC Spinw/riters. 
Models 5510, 5515, 5520, 5525 & 
5530. Also Thimbles & Ribbons. 
Ail other models are available, 
including Band Printers. 

TEST EQUIPMENT 

We stock Beckman, Fluke. Global 
Specialties, Keithley & NLS 
DMM's and probles. Also Hayes 
Technical Breakout Boxes. 

MICRO-COMPUTERS 

We stock the ALTOS Computer 
Line Featuring Hard 
Disk Memory. 

FURNITURE & PRINTER 
STANDS 

Systems Furniture and Printer 
manufacturers 



ASK FOR OUR 
INSTANT DISCOUNT 

From Roy Hawthorne 

Talk To Bill Tokar On 

Applications 



CALL TOLL FREE 

U.S.A. 
1-800-521-2764 

MICHIGAN 
1-S00-4B2-8393 



Reminder: 

We are open 

8:30 to 6:00 PM EST 

Monday through Saturday 



WRITE TO: -"^^ 

"The Stocking Source" 
24069 Research Drive 
Farmington Hills, Ml 48024 
313-474-6708 



GENERAL 



Though the pundits differ, the users seem clear on the issue. 

Microcomputers- 
Business or Pleasure 



by Bert Latamore 

80 MiCtDComputina Staff 



TRS-80 microcomputers are business 
rr,aphines, not home cxsmputers, ac- 
cording to the offfciai view of Tandy/Radio 
Shac^, Fort Worth, TX. While this idea 
might surprise many home users, Tandy's 
T^a-Ke: surveys apparently back it up. 

'•O^' primary thrust has always been for 
the b\:s- ness user," Ed Juge, Tandy's direc- 
tor o' oorr^uier merchandising, said. "We 
only acwsrtise to homeowners during 
Chrstrv^ time." 

Tandy doesn't make its detailed market 
creaKdowns public, so it is hard to deter- 
Tf-ie jjst how large Tandy's business mar- 
Kel is. However, its last annual report shows 
Its total computer-related sales for fiscal 
year t979-80 was 12.7 percent of its approx- 
i.T.Bie-fy $1 .4 billion Qross corporate sales or 
$175,6-16,890. This is up from $19,678,320 in 
1978 o' i^ percent of Teuidy's sales. 

YanKe^ Group, Boston, MA, a market re- 
search firm, estimates 250,000 business mi- 
crocorr-pputers of all kinds were in use at the 
beginning of the year. 

Actuallythlsisjust the tip of the potential 
business marrcet. The question is not 
whether a potential market exists— it is 
how much of this market microcomputers 
like the TRS-80 can capture. The answer de- 
pends on several variables including the 
amount of resistance the market has to 
change, the availability of adequate pro- 
grams, and the ease with which the ma- 
chine can be used by the average business- 
person. 

The experts are split on this issue. Each 
seems to have a different answer based on 
a different theory ot the future. White they 
agree computerization is our common des- 
tiny, they are not all sanguine over the fu- 
ture of theTRS-80 in business, in fact, some 
are downright Dsssimistic. 

Not so, foi £3 Juge— he believes Radio 
Shack computers have a great future in the 
business market based on their record. 



"Sales are growing by leaps and 
bounds," he said. "I think there's not any 
qLisstlon that they earn their keep. I talk to 
people who say they saved the $4,IX)0 for a 
Model I disk system in the first three 
vi/eeks." 

Juge said the Model III is designed as a 
desktop unit for an administrator who 
wants such things as data base manage- 
ment and word processing at hiselbow.The 
Model II, he said, is intended to run a larger 
work station. 

"The mainframes serve a particular mar- 
ket, and we serve a particular market," he 
said. "As the micros grow they will undoubt- 
edly move into the mini market." 

Even In complex mathematical applica- 
tions, Juge said, the desktop unit has an ad- 
vantage over the typically heavily utilized 
mainframe. The big machine may not get to 
your program in the three hours It takes the 
micro to solve it. 

Juge predicted business microcomput- 
ers will do more communicating with each 
other and their larger cousins in the future. 
At Yankee Group, Senior Analyst George 
Colony expects the local network concept 
to grow. He predicts desktop computers In 
the future will normally be connected to a 
four-level system. The first level will be a 
mainframe computer— either company- 
owned or on timesharing. It will store data 
and run the network, which is the second 
level. The network will connect it with mini- 
computers which act as remote processing 
stations. These are connected with a micro- 
computer on each desk. 

Most actual programs would run on ei- 
ther the micro or the minicomputers. 

"The advanced work station (the desktop 
unit) must be fully compatible with Level III 
(the minis) and, perhaps. Level I," Ctolony 
said. "This cuts out TRS-80 and Apple." 

Colony predicted both IBM and Xerox will 
enter the microcomputer market with units 
designed to interface with their larger ma- 
chines. In fact, he said he had heard IBM 
wilt have two micros, one in the $700 range 
and one costing about $1,500. If Colony's 



highly-structured vision proves correct, 
these computers will have an overwhelming 
advantage over micros that are not specifi- 
cally designed to work as part of such a sys- 
tem. 

Colony said the ideal business micro- 
computer would be multifunctional, compo- 
nentized and highly intelligent, probably at 
least 32K bits. It would be very easy to use 
and self-teaching to the point that a new 
person could start using It five minutes af- 
ter he first sat down in front of it. It would be 
available through retail stores and may 
have a fiat-plane screen. 

Colony, tike many others, also predicted 
a strong Japanese entry into the U.S. 
market this year. 

Micros Not Ready 

Extensive Interfacing capabilities aren't 
the problem foreseen by Francis O'Reilty, 
an independent market analyst. His report 
for Business Communications Co., Stam- 
ford, CT, is the most pessimistic of those 
surveyed. He said the microcomputer and 
the business market just aren't ready for 
each other and won't be for 10 more years. 

The microcomputer, he said, still requires 
technical expertise. Most businessmen do 
not have technical minds. For instance, he 
talked with one small-business owner who 
did rK)t understand the need for programs. 
He thought he merely had to feed the com- 
puter data and ask it questions. To be ac- 
ceptable to such people, the system has to 
be easier to use, he said. 

This is part of a larger problem, he said. 
Today's micrcomputers are too limited in 
their abilities. 

"If you look at larger systems, they have a 
megabyte of memory and can do a whole 
chain of functions on a single command," 
he said. "You have to get more function into 
the system." 

This kind of power, which will allow mi- 
cros to handle many more applications and 
which will support a much friendlier sys- 
tem, will not be available until the next gen- 
eration of microcomputers, he said. He 
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does not expect this to be on the market in 
this decade. 

Therefore, he predicts only 2,355,000 
microcomputer units with a total retail 
value of $10,007,000,000, will be sold in the 
1980s. 

The next decade will be a different mat- 
ter, he said. By then the new generation of 
microcomputers will be available. A new 
generation of people, the children who are 
learning to use the microcomputer In 
school today, will be entering the business 
market as well. 

"In the 1950s, when a woman went into 
her first job from secretarial school, she 
told her boss she needed an IBM typewriter 
like the one she learned on," O'Reilly said. 
" He got her one. The same system will work 



". . .people are learning to 

use it (microcomputer). . . 

because of what it can do." 



here." 

In O'Reilly's model of the future many mi- 
crocomputers will stand alone. Therefore, 
while easy interfacing with larger machines 
is desirable, he doesn't see it as being of 
overwhelming significance. 

Limited Only by Programs 

The microcomputer market is here, ac- 
cording to Tom Arnett, market analyst for 
Creative Strategies, San Jose, CA. His 
views are much more optimistic. He be- 
lieves the market is limited mainly by avail- 
able programming, but also by the ease, or 
lack of ease, with which you can use the 
machine. 

"The typical machine has atrocious doc- 
umentation," he said, "but people are learn- 



ing to use it anyway because of what It can 
do." 

Arnett defined the microcomputer as a 
machine costing less than $15,000. He said 
in 1979 about 350,000 of these were sold 
with a total retail value of $650 million. By 
1984 he predicted sales will grow to $3.6 bil- 
lion annually. 

Tandy, he said, has a large portion of this 
market although their machines are on its 
low end. Hesaid they are sixth in number of 
units shipped but second in profit gener- 
ated. 

"The reason Radio Shack has been so 
successful is their 7,000 outlets," he said. 

He said microcomputers will be used 
more and more in both network and stand- 
alone situations. If IBM does enter the mar- 



In 1979, Dr. Henry Lee, President of Lee 
Pharmaceuticals, South El Monte, CA, 
bought a single TRS-80 Model I so he could 
learn something about programming. 

His main aim was to learn enough to 
allow him to arbitrate between the head of 
his data center, an MIT graduate with an 
MBA from Harvard, and that man's assis- 
tant, who holds a Ph.D. in chemical engi- 
neering from the California Institute of 
Technology. The two often disagree, based 
on different visions of the role the firm's Ba- 
sic/Four 730 minicomputer should play in 
the business, 

"The question was whether we would 
have several small computers or one mini in 
the company," Dr. Lee said. 

From that modest initial commitment, 
Lee Pharmaceuticals' involvement in micro- 
computers has grown. Today, they own 
about 45 Model Is, Dr. Lee said. They are 
used by everyone from scientists to sales- 
men and for everything from research to di- 
rect computer to computer supply ordering. 

The first thing Dr. Lee tried with his micro 
was word processing. They had just tried 
and failed to add a word processing capa- 
bility to the Basic/Four. 

"Once we got into them and modified my 
first one for upper and lowercase, I discov- 
ered what a fine typewriter it was," Dr. Lee 
said. "I decided it I could buy them cheap 
enough I would go to them and have my sci- 
entists do their own typing." 

He hoped this would speed up the pro- 
cess of getting reports out and eliminate 
the chronic problem of late reports. Dr. Lee 
bought them in lots of 10. 

They solved the report problem, but Dr. 
Lee found this was just the tip of the ice- 
berg. 

"The sales reps and manufacturing peo- 




ple and even our secretaries wanted them 
he said. 

The word processing application, alone, 
has made them worth their expense. Dr. Lee 
said. 

"It beats distributive processing and ter- 
minals on big machines," Lee said. "You 
don't have to worry about the response 
time." 

At the same time, he said, they "liberated 
the executive from the tyranny of the secre- 
tary." 

Dr. Lee and several of his executives have 
Model Is at home, and others sometimes 
take them home overn ight, so they can work 
at any time they find convenient. 

In fact, he said, the company has elimi- 
nated half its 12 secretarial positions by at- 
trition since the Model Is came in. 

But word processing is only the start for 
Lee. Virtually every department of this man- 
ufacturer of dental and orthodontic materi- 
als, biomedica) adhesives and artificial 
fingernails has found uses for them. 

Ten are equipped with modems. These 
are used to talk with Lee's Ventura County 
plant, 75 miles away, get chemical informa- 
tion from Lockheed's Dialog time-sharing 



system and placeordersdlrectty to thelBM 
370/168 of Van Waters & Rogers, a chemical 
supplier. Dr. Lee said this has eliminated 
problems caused by frequent misunder- 
standing of long chemical names in tele- 
phone orders. 

The machines are so light that the engi- 
neers carry them from building to building 
and salesmen take Model Is on appoint- 
ments. Dr. Lee said. 

Lee does not buy any hardware from 
Radio Shack, having found equivalent 
items at less cost elsewhere. The Model Is 
are equipped with Matchless disk drives, 
kit-built expansion interfaces and upper/ 
lowercase adaptors. They use seven Match- 
less dot matrix printers, six TRS Line Printer 
Ills for high-speed printing and eight daisy- 
wheel letter-quality printers. They also 
bought five used, modified IBM Selectrics, 
which turned out to be too slow, and a used 
Data Trans that has never worked. 

On the other hand, Lee depends on Radio 
Shack for software support. With its 7,000 
stores open seven days a week to 9 p.m.. Dr. 
l_ee said, Tandy gives him better service 
than he can get for his big computer, even 
though he pays a $1 ,500 monthly retainer to 
a service company. 

"Most of the utilities are great," Dr. Lee 
said. "The good ones include NEWDOS-h, 
NEWDOS 80, Electric Pencil. We like Xtra 
Special Delivery (a mail sorting program). 
We are just getting started with The Crea- 
tor. 

"But at least a third of the chaps are writ- 
ing their own programs," Dr. Lee said. 
"That's where the real power comes: You 
can write programs for your own sit- 
uation."! 

by Bert Latamore 
80 Microcomputing Staff 
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''They all agree 
business software 
is inadequate." 

Ket, he said, they will have a great impact 
The reason, however, will not be a pre 
sumed greater ability to communicate with 
larger IBM computers. Rather IBM's grea 
marketing ability combined with its reputa 
tion will allow it to blanket the market. 

"If you were a businessman," he asked 
"would you be more likely to buy a comput 
er from IBM or a Radio Shack store?" 

Micros have a long-term viability in the 
business area, he said. Rather than being 
replaced by minicomputers because busi- 
nesses want to upgrade their equipment, 
micros will replace minis in some applica- 
tions. 

"The thing is contagious." he said. "Peo- 
ple get hooked on it and discover how use- 
ful the thing really is." 

Karen Horowitz, market research analyst 
for Venture Deveiopmien: Corp., Wellesley, 
MA, sees the business microcomputer mar- 
ket as evolving from the personal computer 



hobby. She said Venture has not done a 
study of the business computer market, but 
she has written a report on personal com- 
puters. 

"Personal computers were thought of as 
a personal hobby at one time," she said 
"Then people wanted to play games or write 
programs. Now businesses are tmding if 
they have more software available they will 
get more use,. The home market is be- 
coming secondary," 

Inadequate Software 

They all agree business software is inad- 
equate. Quality has to improve, for one 
thing, 

"You have to understand who your pot en- 

t'a.i purchaser IS," J uge said "I think a lot of 
the secret is to keep it very simple. Comput- 
erize what he is probably doing now with a 
pe n c i I . " 

Horowitz said businessmen might be re- 



sistant to standardized programs that en- 
force a standardized way of doing things, 

"I think the businessman likes to think 
he's unique," she said, "However, if you can 
change a tew things you do. you can buy a 
package for a third of the cost of a specially 
produced program," 

Most of the experts agreed standardized 
programs fitting basic business uses were 
needed, Juge said, while needs may vary 
greatly from one industry subject area to 
another, needs of different businesses 
within an area — different print shops, for in- 
stance — do not. Therefore, programs could 
be written for each industry. 

OReiliy disagrees. To earn general ac- 
ceptance, he says programs must adapt to 
the businessman, not vice versa. 

Canned programs won't be attractive to 
large numbers of firms, he said, "because 
every company does things a little different- 
ly." 



Two years ago, Roy F, Weston Inc, West 
Chester, PA, was in the market for a way 
to get computer power to 10 regional of- 
fices and a variety of temporary field sites 
around the country. 

Their Univac 90/30, a mainframe comput- 
er which they bought in 1977, was doing the 
job at its main office. 

However, the only way for the 400 person 
firm to make this machine available to engi- 
neers in the field was to provide them with 
terminals and use the telephone lines. 

Instead, according to Donald R, Milner, 
manager of computer services for Weston, 
they decided to try the TRS-80 as a less ex- 
pensive way of doing the job. 

As a result of this decision, four Model Is 
of various configurations and six Model lis, 
each with a 64K disk drive and one diskette, 
are operating in a very demanding environ- 
ment. While problems have appeared from 
time to time. Milner said the experience has 
been generally positive. 

Weston's micros primarily handle engi- 
neering applications. They do operate as 
word processors at times, but Milner said 
they are not used for any other normal busi- 
ness functions, 

Weston does a lot of environmental engi- 
neering This involves constant air, ground- 
water and soil sampling. 

"Our initial application was to record in- 
strumentation readings(from sampling test 
instruments)," Milner said, 'We've devel- 
oped a field data management system for 
sample logging and reporting." 

Normally raw data is hand-fed into the 
machine. However, Weston does have one 
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automatic setup in which the measuring in- 
struments record their data as audio sig- 
nals on tape that can be fed directly into 
one of their Model Is. 

From there it was a natural step to have 
them perform data reduction and other pre- 
liminary data preparation. Milner said. They 
have moved beyond this to perform sanitary 
sewer system evaluating and laboratory 
management on the Model Ms, 

"I'm sure they are bemg used by some of 
the people to do exotic tormiulae and so 
forth," Milner said. 

In fact, he said, sometimes they have 
pushed the micros beyond their limits But 
then, he said, they have sometimes exceed- 
ed the limits of their 393K Univac and had to 
go to a time-sharing service to get their 
problem solved. 

They have had to write most of their own 
programs because they haven't been able 



to buy programs for their applications, 
Milner said. Their main problem in this area, 
he said, is "human engineering" the sys- 
tem. That mainly involves using the KISS 
Principle (Keep It Simple, Stupid). 

"There are applications that are built to 
be used by programmers." he said. "You 
can't give one of those systems to a layman 
and expect it to work." 

On the other hand, he said, the engineers 
have no trouble adapting to the microcom- 
puters, mainly because they learn to use 
computers in school, 

"An engineer cannot go through school 
without being exposed to a large amount of 
on-line computing," Milner said. 

The micros face a different kind of chal- 
lenge in interfacing with a variety of other 
machines. Wesson has already written a 
program for interfacing the Model lis with 
the Univac The firm also owns a Tektronix 
4045 with two dual-diskette drives, a four- 
color flatbed plotter and a Wang WP30 dedi- 
cated word processor. They plan to tie them 
together into an integrated system. 

Milner said he was basically happy with 
the Model II as it is. The main change he 
would like to see in it is a price reduction, 

"The situation we will probably continue 
to run into is matching the micro to the ap- 
plication," Milner said, "We have had the 
situation where we have asked the micro to 
do too much and it failed, but that was not 
the fault of the micro, it was the fault of us. 
They have their place." 

by Bert Latamore 
80 Microcomputing Staff 
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what has nine lives, three forms, 
multiple facerand a price tag 
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vThe Magical ^ 
Microline 80 Printer 



It's magic! Well, almost. The Microline 80 wWlfun 
all day at 80 cps with no duty cycle limitations. 
The head is warranted for 200.000,000 characters. 
That translates to over nine years on your 
TRS-80i' APPLE or other small computer. 

Want to change forms? The magical Microline 80 
is three printers disguised as one. There is a 
whisper-quiet rubber platen for cut sheets and roll 
paper, pins on nine Inch centers for pin feed stock 
and optional snap-on tractors that adjust to suit 
all your other forms. The Microline 80 also saves 
paper by letting you tear off as close as one inch 
from the last print tine. 

Want to change your image? The magical 
Microline 80 really does tricks. It prints upper 



and lower case, condensed and double width 
characters arid block graphics for charts, graphs 
and diagrams. 

The Microline 80 is not a toy. With two motors, a 
rugged cast aluminum base and a head you never 
have to throw away, the Microline 80 is built to 
handle the most demanding business applica- 
tions. 

Which brings us to the biggest magic of all. the 
price tag, the one that almost disappears. If we're 
not the lowest, we are so close that it doesn't mat- 
ter. There are stocking Microline distributors 
throughout the country. Call or write today for the 
name of the one near you and the price of the 
Magical Microline 80. 



OKIDATA 



Okidata Corporation. 111 Gaither Drive, Mount Laurel, New Jersey 08054 609-235-2600 
Okidata is a subsidiary of Oki Electric Industry Company, Ltd. 




TEACH YOUR 
CHILDREN 



Learning to count money by Makolm Nygren 



A thre^-program learning system that teaches 
the itnportani skill of counting money. 

1. Coi^ting Coins— Instruction and drill in 
counting pennies, nickels, dimes and 
quarters. 

2. Shopping Trip— Buy goods in various 
stores; count out the payments and earn 
"purple stamps" for a righi answer. Three 
speed levels. 

3. CheCk-Out — Run your own checkout 
counter. Learn and practice how to make 
change. 

Learning to count money by Malcolm Nygren 
features superior graphics and is available for 
TRS-80^Model I— Level II— I6K on cassette 
only. Shipped postpaid by first-class mail 

Each program S6.95— all three $19.95 



ALSO AVAILABLE 

• ' ALPHA— Alphabet reeognirjon for 
r preschoolers. 

^TilCMA — Addition problems for 
Grades 1-3 
SIGMA-EX — Addition problems for 
> i —the younger or slower 

I learner 

' SPE L — Spelling practice for 

Grades 2-4 
Available on cassette only, IJ. 95 each. Two for $11. 
AU four for SZO.OO. t^ 104 

Mercer SyXemi Inc. 

87 Scooter Lane 

Hkksvllle. N.V. IIBOl 



TRS-80 



SAVE A BUNDLE 

When you buy your 
TRS-80TM equipment! 

(Jse our loll free number lo 
l^ check our price before you buy iM 
"^ a TRS 80TM . . . anywhere! 



TftSA] it a rrMvntik oi i 



Don't delay . . . CALL TODAY £ 




.^MB 



SALES COMPANY 

1412 WEST FAIRFIELD DR. 

P.O. BOX809S PENSACOLA FL 3260S 

904/438-6507 

rtationwid* 1-800-874 1551 



"These market experts 

see the business microcomputer 

as still in its infancy/' 



He advocated programs with the flexibili- 
ty to adapt to variations in business activi- 
ties. For instance, he said, Radio Shack has 
a program which creates a matrix to hold 
data, programs, etc., that the user chooses 
to enter. In his report he predicts business 
software will generate only $8,192,000,000 



in gross sales In this decade. 

In general, these market experts see the 
business microcomputer as still In its infan- 
cy. Eventually It will gain an Important place 
in business, The questions that remain to 
be answered are how quickly this will hap- 
pen and just what their place will be. ■ 



One of the biggest headaches in retail- 
ing Is inventory. It must be performed 
continuously or you may find yourself in the 
embarrassing and costly position of run- 
ning out of your most popular items. But 
keeping a running inventory up to date can 
involve hours of work daily. Even at that you 
will make mistakes and have problems; no 
system Is perfect. 

This was exactly the situation at Bond 
Discount Wine & Liquor In New York, where 
for 25 years two generations of the Schneid- 
er family have labored, devoting three man- 
hours a day to maintaining a perpetual in- 
ventory. 

Enter the TRS-80. 

"One day my father read about them in 
The Wall Street Journal," Paul Shnelder 
said, "He went right out and bought one." 
He wanted a machine to do his inventory. 
What he ended up with was that and more. 

For a start it replaced the cash register. 
When a sale Is "rung up," it automatically 
adds the tax. It keeps complete unit pricing 
information on all items in the store. If the 
customer could get a better buy from a dif- 
ferent size of the item he selected, the com- 
puter shows this on its screen where the 
customer can see it. 

Bond was the first liquor store in New 
York state to offer unit pricing. The story 
was carried on two New York television sta- 
tions. 

The micro adds the dollar amounts from 
each sale to the appropriate bookkeeping 
categories— It can accept 15— thereby tak- 
ing care of another major problem, the daily 
bookkeeping postings. 

At the same time, the machine deducts 
each item purchased from two lists: one a 
record of what is out on the shelves, and the 
other a total inventory. The computer can 
list any items which have fallen below a pre- 
determined minimum on the shelves so the 
stock boy will know what to bring up from 
the basement. 

It will also list any items which have 
fallen below a predetermined minimum in 
total inventory and should be reordered. 

Using a TRS-80 Model I with two disk 
drives, the system can handle 2,500 sepa- 
rate stock items, with minlmums set sepa- 




rately for each one, Schneider said. How- 
ever, double-density disk drives would In- 
crease the system's capacity to 5,000— 
10,000 items. 

The system goes another step, Schneider 
said. It keeps records of the total monthly 
sales of each item for the last 15 months, tt 
then uses this information to calculate 
trends and seasonal fluctuations to project 
sales on each item for the next three 
months. 

This item, alone, has saved Bond several 
times the cost of the system and the profes- 
sionally written program, Schneider said, 
because it virtually eliminates costly over 
and under-stocking situations. 

Schneider said the system is simple to 
use and requires no training. In fact, he 
said, on Christmas Eve, which is the busiest 
day of the year for package stores, his wife, 
who has no previous experience with mi- 
cros, came in and ran the checkout all day 
with no problems. 

Schneider said he finds the microcom- 
puter totally adequate. 

"It's a matter of making the machine do 
what you want it to do," he said. 

Schneider is selling his program which, 
he said, will run on either a Model I or Model 
III. It is available through Accurate Busi- 
ness Computers, 800 Preston Road, East 
Meadow, NY, 11554. ■ 

by Bert Latamore 
80 Microcomputing Staff 
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"I'm Wayne Green 
and I can save you $986 
on the purchase of a 
computer system! 




I hope that has your attention. 



jy 



"That's the difference between 
walking into your local Radio Shack 
store and plunking down hard cash 
. . . and bu\ing from the ads in 80 
Microcomputing magazine. That's 
the difference for a simple combina- 
tion such as a Model lU two disk 
system with 48K of memory, a 
modem and a Line Printer II: The 
Radio Shack price for that cpm- 
bination is $3,612. If you buy from 
the ads in my magazine, you'll buy 
exactl)' the same system for $2,626. 



So wh>' throw awa\ $986? 

"The fact is that the money you 
can save on even the smallest acces- 
sory purchase will pay for the maga- 
zine subscription many times over. 
That's one of the reasons so many 
people are subscribing to 80. 

"Another is that it is the major 
source of information on the TRS-80 
computer. In 1980 there were 335 
feature articles on the system... 
^^ith detailed instruction on how to 
do things (sorry about that), evalua- 



tions nf accessories and software. . . 
and so on. I guarantee you'll find the 
magazine invaluable. 

"A subscription to 80 is still only 
$18 (when are we going to raise that 
darned price to $25, where it should 
be?), so get your subscription in be- 
fore I boost that price. It could be 
any day now." 



Wayne Green 
Editor/Publisher 
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I Sign me on as a subscriber to 
80 Microcomputing for only $18 a year! 



Ewr. 



Signature 
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GENERAL 



In search of the pathway to computer enlightenment. 



Language Quest '81 




by G- Michael Vose 

80 Microcomputing Staff 

(knew that I would have to join the twenti- 
eth century sooner or later. Besides, I'm a 
college graduate and I can even handle my- 
self in a disco. So I went down to the local 
computer store and started to browse. I sat 
down at a computer and typed HELLO on its 
keyboard and pressed this big white button. 
The screen showed ?SN ERROR and I fig- 
ured I must have committed some kind of 
mortal sin. I was just about to try to sneak 
out the door when a salesperson in a snap- 
py three-piece suit came up and asked if he 
could help me. I told him I had tried to talk to 
the computer but that things were not going 
well. 
"That's because the computer only un- 
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derstands BASIC," he explained and my 
brow began to furrow in the early stages of 
lack of comprehension. 

■I thought computers were brainy and 
now you tell me to stick to basics?" The guy 
in the three-piece suit gave me what couid 
only be described as a tolerant smile. 

"BASIC is a high-level, procedure-orient- 
ed language like FORTRAN or COBOL," he 
explained further. 

"Wait a minute," I retorted. "Do I look like 
I was born yesterday? First you tell me the 
computer needs BASIC and now you claim 
it understands the language of a German 
gnome called a kobold." I began to think I 
might need to look more deeply into this 
matter of communicating with computers. 

What Is a Computer Language? 

My search to discover a way to com- 
municate with the computer led me to some 
fascinating discoveries. First I learned that 
a computer language is simply a set of 
rules, representations and conventions 
used to transmit and convey information. 
Computer languages are classified as low- 
level or high-level. But low-level does not 
necessarily mean simple or easy. 

As it turns out, the computer actually 
understands one and only one language. 
That language is called machine language. 
Machine language is a low-level language 
simply because it is at the level at which the 
computer can directly recognize and manip- 
ulate numbers. All other languages must be 
converted into machine language to be un- 
derstood by the computer. 



Computers can only understand num- 
bers represented by groups of Is and Os 
called binary digits. Groups of these digits 
are called a binary code. Machine language 
is essentially binary code modified to allow 
you to enter and manipulate numbers using 
the more standard numeric form of decimal, 
octal or hexadecimal notation. A numlier in 
machine language will stand for a specific 
instruction (or memory address) that the 
computer can recognize and execute. This 
number is determined by the electronic ar- 
chitecture, or design, of the microproces- 
sor. In other words, the machine was built 
to handle these numbers in a certain way. 
This process is accomplished using elec- 
tronic devices, often called gates, which 
can only be opened or closed. These two 
states can represent a one or a zero, the 
digits of binary code. 

One step up from machine language is 
assembly language. This language is also a 
low-level language and differs from ma- 
chme language only in its code. Assembly 
language allows you to substitute certain 
mnemonics for numbers. Since these mne- 
monics are not directly recognizable by the 
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INTERPRETED 
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Table 1 




Model VIOOO 



ooking Out For You. 



Fight Inch Floppy Disk Drive Subsystem Model VIOOO 

The VIOOO. Vista's sophisticated new disk drive subsystem, sets 
new standards for ease of access and use Its innovative design 
permits disk dnves to be mountGd or removed quickly and easily for 
system reconfiguration or servicing. 

Features: 

• Deluxe chassis with internal slide allows easy access. 

• Storage capacity from 250 kilobytes to 2.5 megabytes. 



• Desk or rack mountable. 

• Accomodates both single-sided and double sided drives. 

• Industrial quality cabinet with die cast front bf ^el. 

• Drives pull out for easy service and maintenance- 
Prices: 

Cabinet ivith (2) single sided dnves w power supply . . $1595,00 
Cabinet lA-ith (2) double sided drives w power supply . $2295.00 
Cabinet wpower supply $ 495.00 




Vista's Line of High Performance, High Reliability 
Products also Includes these Advanced Components 



Single Eight-Inch Drive Sub«v^tern Model V500 
Features: 

• Up to 1.2 megabyte on line storage capacity 

• Compdlible with Radio Shack Model II, 
Apple II* and most popular SlOO based 
computer systems. 

• Highly reliable power supply provides tS'V 
regulation and over-vollage protection 

Prices: Starting a.' low as $900.00 

Single Minifloppy Disk Drive Subsystem 

Model V80 800 8000 

Features: 

• From 102K to 816K bytes on a single drive. 

• Fastest track-to-track access lime on any 
minifloppy drive - 5 milliseconds. 

• Dual head technology on the V800/8000 
allows on line use of both sides of diskette 

Prices: Starting as low as $395.00 

-'65 Vista Computer Company 1317 E Edinger Avenue • Santd Ana, CA. 92705 • (714) 953^523 
• IS a rpg.««fd i.id*m«k "I i>q.tai Rwwch ^calcf InquiHCS Call Toll Free 1800) 854 8017 .^^^ „ ,^ ^ .^g.^,,,^ i,^,Yark ^ Apple Cmpuio.. int 
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"The question may have occurred to you, 
'which language is the best one? 
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computer, they must be translated by an 
assembler. An assembler is a program that 
takes these non-machine language Instruc- 
tions and converts them into the numeric 
code understood by the computer. 

Pseudo- Language 

For the Human Pseudo-Brain 

Since low-level does not necessarily 
mean simple or easy when you are talking 
about computer languages, I assumed that 
a language called BASIC must be a low- 
level language. As is often the case when 
one makes assumptions, this turned out to 
be wrong. BASIC is a high-level language. 

High-level languages can be understood 
more readily by you and I. They are sym- 
bolic languages which use recognizable 
English words, groups of numbers, special 
words and standard mathematical nota- 
tion. It Is important to remember that these 
alphanumeric symbols are not the internal 
language of the computer. The symbolic 
code of high-level languages must be either 
compiled, or converted, into machine lan- 
guage, or interpreted for the computer by a 
separate component called an interpreter. 

There are several major differences be- 
tween compiled and interpreted languages. 
Operationally, the difference between com- 
piling and interpreting a source language is 
substantial. Each technique requires a sep- 
arate component, either a compiler or an in- 
terpreter. 

A compiler is a program that converts 
source language code symbols into ex- 
ecutable machine language code. This is 
done after the program has been written, or 
coded, by the programmer. The compiled 
program can then be run. This process is 
analogous to that of a book being trans- 
lated from French to English, 

An interpreterisacomponent of the com- 
puter's permanent memory that actually in- 
terprets each character of source language 
code for the computer's brain {the micropro- 
cessor) as the program Is being run. This 
process is analogous to the speech transla- 
tors at the United Nations who translate 
words as they are being spoken. 

Compiled and interpreted programs each 
have their advantages and disadvantages: 

• Compiled programs cannot be ex- 
ecuted until they are compiled, therefore 
they cannot be tested until they are written 
and converted. This compilation can often 
take a substantial amount of time. 

• Compiled programs execute faster 
than interpreted programs because they 
eliminate the interpretive step and because 
they are, once compiled, machine lan- 



guage. 

• Interpreted programs are interactive. 
This means that the programmer can ex- 
periment with different commands and in- 
structions and discover almost immediate- 
ly if that command or instruction will work. 
This is because the command can be ex- 
ecuted immediately, without having to be 
compiled. 

Some examples of compiled and inter- 
preted languages are shown in Table 1. 

Problems, Procedures- 
Procedures, Problems 

The language picture was beginning to 
get a little clearer when I ran into yet 
another classification. This time I discov- 
ered that languages are further classified 



as either problem-oriented languages, or 
procedure-oriented languages. These are 
pretty fancy-sounding categories, but they 
simply mean that languages are designed 
to allow us to solve specific classes of prob- 
lems, or wide classes of problems, in the 
latter case, we have to develop a procedure 
to solve our problem. 

Problem-oriented langauges are de- 
signed to solve a specific class of prob- 
lems, For example, the language whose 
acronym is ICES (Integrated Civil Engineer- 
ing System) is designed to solve specific 
problems in civil engineering. The engineer 
has only to input certain types of data and 
the program computes the specifics for 
building a solid concrete wall. The engineer 
cannot use the program to balance his 
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Language Primer for the Novice 

Compiler— A computer program that pro- 
duces a machine language program from 
a source program that Is usually written in 
a high-level language by a computer user. 
The compiler is capable of replacing sin- 
gle source program statements with a ser- 
ies of machine language instructions or 
with a subroutine. 

Compiie— To prepare a machine lan- 
guage program (or a program expressed 
in symbolic coding) from a program writ- 
ten in another high-level programming 
language, such as FORTRAN, PU1 or 
COBOL. 

Metacompiler— A compiler for a language 
that is used primarily for writing compil- 
ers, usually syntax-oriented compilers. A 
special purpose metacompiler language 
is not very useful for writing general pro- 
grams. 

Compiler Language— A source language 
that uses a compiler to translate the lan- 
guage statements into an object lan- 
guage. 

ALGOL— An acronym for ALGOrithmic 
Ijinguage, an international high-level pro- 
gramming language designed for scientif- 
ic programming. ALGOL Is used primarily 
in Europe. 
APL— A mathematically-structured lan- 



guage developed by IBM Corporation. In 
its simplest mode, APL performs the func- 
tions of an intelligent calculator. The pow- 
er of the language is demonstrated by its 
extended single operators which allow a 
user to directly perform such things as 
taking the inverse of a matrix, or solving a 
set of linear equations. APL is a powerful 
tool for the scientist or engineer. 
Assembly Language— A programming 
language which allows a computer user to 
write a program using mnemonics instead 
of numeric Instructions. It is a low-level 
symbolic programming language which 
closely resembles machine code lan- 
guage. 

Assembler— A computer program that 
takes non-machine language instructions 
prepared by a computer user and converts 
them into a form (binary) that may be used 
by the computer. 

ATOLL— A special language used by 
NASA on the Apollo space missions. 
BASIC— Beginner's All-purpose Symbolic 
Instruction Code. 

COBOL— common Business Oriented 
Language. Every COBOL source program 
has four divisions, whose names and 
functions are; Identification division, 
which identifies the source program and 
the output of a complllation; environment 
division, which specifies those aspects of 
a data processing problem that are depen- 
dent upon the physical characteristics of 
a particular computer; data division, 
which describes the data the object pro- 
gram as output; and procedure division, 
which specifies the procedures to be per- 
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checkbook. At the same time, the engineer 
does not have to know anything about pro- 
gramming to obtain the results he needs. 
The procedures for solving his problem are 
built into the program language. 

Other problem-oriented languages In- 
clude APT, RPG, COGO, GPSS, STRESS 
and others. One specialized group of prob- 
lem-oriented languages is the list-process- 
ing group which Includes LISP and SNO- 
BOL. These languages are designed specif- 
ically to process non-numeric data, such as 
lists of names and addresses. 

Procedure-oriented languages are more 
versatile. They allow the programmer to 
write routines to solve any problem that he 
can define and subsequently devise a solu- 
tion for. FORTRAN is the grandfather of this 



"The answer to that question will 
differ depending on who you ask." 



class of languages and is still one of the 
most powerful of the procedure-oriented 
languages. Designed to perform mathemat- 
ical, scientific and engineering computa- 
tions, FORTRAN exists today in five or six 
versions. Other procedure-oriented lan- 
guages include COBOL, BASIC, Pascal and 
PU1. 

Will We Ever Use English? 

The question may have occurred to you, 
"Which language is the best one?" The an- 
swer to that question will differ depending 
on who you ask. Programmers and manu- 
facturers will argue, with merit, that one lan- 
guages is better than another. There can be 
different versions of the same language, 
very often to accomodate the unique design 



of a particular manufacturer's machine. 

To some degree, determination of the 
best language will depend on what applica- 
tion is planned. There probably shouldn't be 
one universal computer language in much 
the same way that there probably shouldn't 
be one universal automobile manufacturer. 
No one group can satisfy the needs of a 
large population. 

One thing can be said with certainty. 
While the English language is too complex 
to adapt for use as a computer language, 
there will be other languages developed. 
Many wiil be simple, user-oriented lan- 
guages while others will be used to solve 
specific problems. AH will allow us to com- 
municate more effectively with this power- 
ful machine called the computer, ■ 



formed by the object program by means of 
English-like statements. 
COGO— coordinate GeOmetry, a lan- 
guage used by engineers. 
Cross Com pi ling/ Assembling— A tech- 
nique where one uses a minicomputer, 
large-scale computer, or time-sharing ser- 
vice to write and debug programs for sub- 
sequent use on microcomputers. 
DDL— Data Description Language, a lan- 
guage for declaring data structures in a 
data base. 

Firmware— Software that is hard-wired in- 
to a computer, usually as read-only memo- 
ry (ROM). Changes can only be made by 
changing the chips. 

FORTRAN-FORmula TRANslator, a 
high-level programming language used to 
perform mathematical, scientific and en- 
gineering computations. There are two 
versions, FORTRAN and Basic FOR- 
TRAN. 

High-Level Language — A programming 
language oriented toward the problem to 
be solved or the procedures to be used. 
interpreter — A computer program that 
translates each source language state- 
ment into a sequence of machine instruc- 
tions and then executes these instruc- 
tions before translating the next source 
language statement. 

JOVIAL— Jules' Own Version of the Inter- 
national Algorithmic Language, a scientif- 
ic language used by the U.S. Air Force. 
Language— A set of rules, representa- 
tions, and conventions used to convey in- 
formation. 
LOGO— A language suited to and used by 



grammar and junior high students. Devel- 
oped at MIT by Seymour Papert and staff. 
Low-Level Language— A machine-depen- 
dent programming language translated 
by an assembler into instructions and 
data formats for a given machine. Same 
as assembly language. 
Machine Code— An operation code that a 
machine is designed to recognize. 
Machine Instruction— An instruction that 
a computer can directly recognize and 
execute. 

Machine Language— The basic language 
of a computer. Programs written in ma- 
chine language require no further inter- 
pretation by the computer. 
Metalanguage— A language which is 
used to describe a language. 
Mnemonic— Pertaining to a technique 
used to aid human memory. A word or 
name which is easy to remember. 
Mnemonic Code— An easy-to-remember 
assembly language code, for example, a 
code that uses an abbreviation such as 
MPY for multiply. 

Native Language— A language peculiar to 
the machines of one manufacturer. 
Object Code— Output from a compiler or 
assembler which is itself executable ma- 
chine code or is suitable for processing to 
produce executable machine code. 
PL/1— A high-level programming lan- 
guage designed to process both scientific 
and business applications. It contains 
many of the best features of FORTRAN, 
COBOL, ALGOL and other languages as 
well as a number of facilities not available 
in previous languages. 



Problem-Oriented Language— A high-lev- 
el, machine-independent programming 
language designed for the convenient ex- 
pression of procedures used in the solu- 
tion of a wide class of problems, e.g., 
FORTRAN, COBOL, PU1, etc. 
Programming Language— A language 
used to express computer programs. 
Symbolic Language— A pseudolanguage 
made up of letters, characters and num- 
bers which are not the interna! language 
of the computer system. 
RPG— Report Program Generator, a popu- 
lar business-oriented programming lan- 
guage. The language will allow the user to 
program many business operations as 
well as generate reports. A fairly simple 
RPG program can perform a rather sophis- 
ticated business task. It is relatively easy 
to learn. 

SNOBOL— StrlNg Oriented SymBOLic 
Language, a string manipulation pro- 
gramming language used primarily in lan- 
guage translation, program compilation 
and combinatorial problems. The lan- 
guage stresses the ability to manipulate 
symbolic rather than numeric data. 
Source Program— A computer program 
written in a source language such as BA- 
SIC, COBOL, etc. It is converted to the ma- 
chine code object program by a special 
processing program, a compiler, interpret- 
er or assembler. 

Syntax— The grammatical and structural 
rules of a language. All assembly and 
high-level programming languages pos- 
sess a formal syntax. 
WATFOR-A version of FORTRAN. 
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At5y2, 

she's 
reading 

and 

thinking 
at a 4th 
grade 
level. 




Is she a prodigy? Not at all! When learning is fun, your child can rapidly Increase reading comprehen- 
sion and reasoning power beyond current age level. 

Now you can advance your child's educational level— without coaxing or hiring an expensive tutor. Everyone knows Ihe best 
stuOent-teachef ratio Is 1:1. In modern ctassrooms, this is impossible. But in your own home, it's as easy as C, A.I. (Computer- 
Aided Instruction). Without the distractions of a crowded classroom, students can progress, without pressure, at their own 
pace 

Computers are fun, and once the fun is introduced, studying becomes a pleasure — instead of a chore. The ability to inieract 
with the compuief will motivate your chttd to learn much more than from a book that cannot respond— a book that is too easily 
closed. These instant Software programs wili guide and teach each lesson with the infinite patience only a computer can pro- 
vide Each of Ihe twelve packages nave been written and edited by professional educators who know what it takes to make a 
child want to learn. You can tniroduce your child to the world of learning by computer with Instant Software's Educational Soft- 
ware Series, All 12 packages are avatlabie now. 



ARCHIMEDES' APPRENTICE 

Archimedes Apprentice is a geometry package Ihat will 
teach your child the formulas used to tmd the volume of any 
solid object, including paratlelopipeds tcubes and rectangu- 
lar solids), prisms, pyramids, cylinders, cones and spheres. It 
wili even quiz Ihe student on how well the lesson was learned 
Give your child the advantage of learning these concepts at 
home, before being faced with themm a classroom. Order No. 
0092R $9.95 

TYPING TEACHER 

A complete seven part package that guides you from 
familiarizalton of Ihe keyboard through typing words and 
phrases to mastery of touch-lyping Your video monitor be- 
comes a bottomless page tor typing practice, and your own 
private TYPING TEACHER, ready to leach when you're ready 
lo iearn Order No. 0099R $9,95 

TEACHER'S AIDE 

Now you can have the t>enefit of Computer Assisted In- 
stfuction (CAI) in your own home. The Teacher's Aide program 
allows you to create tailor made lessons for your child. The 
features of this program include the ability to review material 
before taking the lesson, a provision for hints to help answer 
questions and graphic displays as a reward for answermg all 
questions correctly Once you've created a lesson, you can 
save it and create an entire sequence of iessons 

The Teacher's Aide package is perfect lor parents, teach- 
ers, and students who need the unlimited patience oniy a 
computer can provide. Order No. 0214RD (disk-based) S39.95 



VIDEO SPEED READING TRAINER 

With this package, students can increase their reading 
Speed and comprehension. How? With practice! This three 
part program wilt flash characters, words and phrases onto 
the monitor screen. You must then type what you saw on the 
keyboard and enter it. You can begin at a relatively slow 
Speed As your speed and comprehension increase, the com- 
puter will automatically advance your speed. Order No. 0100R 
$9.95 

IQ TEST 

Are you smart enough to buy this package? 10 TEST will ad- 
minister and score an intelligence test in 30 minutes. There 
are three equivalent tests, each consisting of 35 questions. 
designed to test your general knowledge and problem-solving 
abilities. Most of us claim a "touch of genius"— here's your 
chance to prove it> Order No. 0157R $9.95 

VOCABULARY BUILDER 

One of Ihe most valuable tools your child can possess is a 
comprehensive vocabulary. Withinstant Software's VOCABU- 
LARY BUILDER package, you can help your child develop a 
twtter understanding of the English language— and the fun is 
in the learning! The crossword puzzle format of these pro- 
grams Vk-ill hold the attention of the most reluctant student. 
The first program in this package is "Potonius," offering 140 
crossword puzzles. The second Is "VeeBeeGee," a program 
thai provides the letters and allows the student to construct a 
puzzle on the game board. The VOCABULARY BUILDER pack- 
age is educational entertainment for all ages— and It's never 
at a loss for words. Order No. 0198R $9.95 



Instant Software 



PncBs siibiecl lu clia'i(|o witliOLii notice 

PETERBOROUGH, N.H. 03458 
603-924-7296 
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Now Your Child Can Learn More. . 



At a Faster Pace 



^^' 



•^^ 



GEOGRAPHY EXPLORER: U.S.A. 

This program allows your child to travel the country and 
learn vital facts about each of our 50 states. Geography Ex- 
plofer offers the most fascinating way of iearning yet. Learn 
each state's name, capitol, largest city, nickname, etc. As a 
bonus, this package offers the capability of light pen use. 
Order No. 0071 RD $49.95 



.^^^■ 



C^y 



^^ MATH MASTER 

WATH MASTER is an educational package designed to 
help your child understand the mathematical concepts of 
addition, subtraction, multiplication and division through 
problem solving. This package also instructs the student in 
fraction problem solving. MATH I^ASTER will 'walk" your 
child through the developmental concepts of mathematics 
with never-ending patience. Order No. 0257R $8.95 

WORDWATCH 

Wordwatch consists of 4 different programs, each de- 
signed to enhance your child's understanding of word rela- 
tionships—this results in an improved vocabulary. In WORD- 
RACE, the student must choose the proper definition for a 
given word. HIDE 'N SPELL asks the student to find misspell- 
ings. In SPELLING BEE. the student takes a pre-recorded quiz 
in which words are played aloud! Completing the package is 
SPELLING TUTOR, where words are jumbled, reversed or 
otherwise altered, and it's up to the student to straighten 
them out! Together, these four programs will help decrease 
dictionary dependency! Order No. 0111R $7.95 



^^ OMNI-CALCULATOR 

This package is a brilliant solution to the problems Involv- 
ing the complex world of different units of measure. It pro- 
vides rapid means of conversion from one unit o( measure to 
another in any of 10 categories: length, volume, mass, veloci- 
ty, area density, power, energy, pressure/stress and temper- 
ature. Omni Calculator will give your child a great learning ad- 
vantage, a head start In understanding the complex relation- 
ships between different units of measure Order No. 0211RD 
$19.95 



.^^' 



THE ELEMENTS 



This program can be used to Introduce students to the 
periodic table of the elements, or for review by students and 
adults who want to refresh their memory in chemistry. It in- 
cludes each of the elements name, atomic number, weight 
and symbol, as well as its acid/base and normal physical 
state. Enrich your child's knowledge o( science with the help 
of THE ELEMENTS. Order No. 0216R $9.95 

LIFE 

Evenif you've only been involved with computers for a short 
while, you're sure to have heard of LIFE, This program is the 
computerized simulation of the life cycle of a colony of 
bacteria. It is based on a few simple concepts, but the results 
are captivating, animated graphics and an enlightening Intro- 
duction into the world of biology and genetics. The LIFE pro- 
gram may be just the motivation your child needs to pursue 
an interest in the sciences. Order No. 0078R $9.95 



TO ORDER: 



Foi itie 
Tns-80- 



See your local 

Instant Software dealer. 

If these packages are 

unavailable, order direct 

or 

CALL TOLL FREE 

1-800-258-5473 

(We ship within 48 hours) 

We Guarantee It! 

^ ^i/fT Guarantee \ ^ | 

(H K PKIll.K WIS »KI (,l \H VM i I ii ^ 

lo HI ui \i iri I'kiim ( fs ii noi p 

((IMPUULI SMISI 11 l> Vdl M\'l Sl' 

^ Kl II KV nil PKfX.KWt wnlM\ ^ri S 

^ lJ\-i S \ ( Kl 1)11 (IK Ml D \i I Ml M 2 

^ Will HI V.llllN<.n i.lMV lilK -r. 

^ VSt Kl \S(.l^ ? 



"The microcomputef will be a power- 
lui tool in education. One ot its greatest 
advantages is Us interactive nature— 
the student tiecomes an active partici- 
pant in learning, and the computer can 
give Immediate feedback. The student 
does not have lo wail unhl the lesson is 
complete or ihe teacher Is tree lo check 
h(3 work; the computer can evaluate the 
wofk immediately, and reward him it it 
is correct or explain wliy i( the work is 
incorrect. The computer can then deler- 
mine, on the basis o( his work, whether 
the sludenl is ready to go on to ihe next 
lesson Of needs lo review the present 
one, 

"Educationai computer programs 
will t>e available tor students at all 
levels — from pre-school lo post-col- 
lege, from remedial to gilted — and <r\ 
any subject These programs can give a 
child a headstart In school; they can 
reinforce and provide practice in con- 
cepts from hand-eye coordination to 
Math lo English or even Health A com- 
puter can individualize a program lo a 
child's level and pace. Programs will 
challenge the gilted child, allowing him 
to advance al his own pace, Besl of all, 
educational computer programs can 
make learning tun." 




Mary Shooshan, Educational Software Editor and former teacher 



"TRS-aO la 8 IraOemaft" o' the TANDY CORPORATION 



Instant Software 



All packages are on casselie excepi fof 
Geographv Explorer- USA, Omni Calculalof 
and Teacher'5 Aide which are on disk. 

PETERBOROUGH, N.H. 03458 
603924-7296 



-See Lisl of Advertisers on psge 306 
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GENERAL 



Here's how to optimize BASIC 

and magnify computing power by calling in a Macro. 



A Macro Processor 
For BASIC-Part I 



The opening segment of this article, the first of a series, is part of a 
letter that accompanied Alan Olmstead's manuscript to our of f ices. 
Ihe editors felt that his thoughts were sufficiently perceptive to pref- 
ace hi& article, particularly in our examination of languages.— Eds. 



To perceive the microcomputer as a kind of calculator with delu- 
sions of grandeur is to miss the central point of its potential for 
changing the way mankind lives. The microcomputer is the first form 
of artificial intelligence applied on a large scale to hundreds of thou- 
sands of individuals. Furthermore, it has been applied under condi- 
tions of virtual natural selection— only those people capable of real- 
izing what it is come forward to acquire one. 

As demonstrated so admirably In the lifetime work of J. J. 
Bachoffen during the last century, intelligence— natural or artificial 
—is inconceivable without language, if a measure of intelligence is 
the abll^y to classify real things into abstract, invented categories. 
Thus, the importance of the microcomputer will not be found in 
mathematical applications, but in linguistic ones. Aside from theo- 
retical and technical applications, there is essentially little need for 
improving the microcomputer's capacity for solving computational 
problems. But in terms of the existence and use of language— and 
its corollary, intelligence— we are little more than infants. 

The only computer languages available to us are dinosaurian 
manifestations of essentially electrical, not electronic, logic. These 
ponderous beasts all function according to the elementary formula 
"this input equals that output." A specific and limited command rep- 
ertoire is'f irst recognized, then equated to a modestly variable form 
of output^. If the repertoire lacks an exactly appropriate command 
syntax, we must have an alternative, leaving the complied language 
entirely and switching Into an assembly language subroutine. 

The reason for such a limited concept of language (t would go so 
far as toquestion that they are even languages) is not lack of creativ- 
ity. The languages serve the needs of their developers, and their de- 
velopers are interested primarily in selling computer hardware. 
Thus, we saw Radio Shack Introduce the Model II before correcting 
the built-Irt deficiencies of the Model 11, and IBM delitwrateiy satx>tag- 
ing the Mddel 5110 to keep it out of the System 34 marketplace. As 
k^ng as language remains in the private domain of large corpora- 
tions the microcomputer customer will continue In his role as the ex- 



pedient servant of next year's fiscal planning. 
As the translation of the Bible contributed to the splintering of the 

Church of Rome when its promulgation was intended to preserve 
unity, so the rigid structure of predetermined languages must prove 
eventually counterproductive. Application needs change, and those 
languages which do not keep pace will doom the machines on which 
they run. So-called "dead" languages die because they no longer 
serve a purpose. Alternatively, newly evolved languages remain alive 
through their continuous use. The language of artificial intelligence 
must be capable of doing likewise. Like a beautiful bird, language 
must be set free before it will sing its t>est. 
language must be set free before it will sing its t)est. 

Language consists of two parts, form and content. The form, its 
parts of speech— nouns, verbs, prepositions, etc.— has remained 
neariy unchanged for centuries. But the content of language, the ac- 
tual words and their meanings, change continuously through time, 
so rapidly, In fact, that it is commonplace for parents to complain 
that they do not understand their children. 

Achieving such independence for the individual user is the whole 
point of MetaBASIC. It is not merely a simpler method of moving 
from a high level language like BASIC Into assembled code, or even 
merely to expand the existing command repertoire. It is rather to 
give the user the actual ability to make up his own command words 
and sentences according to his needs— even if he is the only user In 
the world with such a need. I have provided a general repertoire of 
MetaBASIC command sentences to serve very common needs, such 
as: 



LOAD STR AS (FROM) BS 

PLOT FH0Mp{1,Y1) TO(X2,Y2) WIDTH(W) 



However, these command sentences are merely electronic baby- 
talk. It is my sincere hope that users will invent their own command 
sentences with such enthusiasm that in a matter of a few years even 
I, the originator, will not recognize the language. Best of all, they will 
do so governed only by their own needs and desires, without having 
to ask my permission or obtain my cooperation In the effort. 

Just as we cannot foretell the style of the next major poet or novel- 
ist, none of us is capable of imagining what will t>ecome of this In- 
dustry when 50,000 Intelligent young people are turned loose to 
build anything they are capable of imagining.! 
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''BASIC might be called the guitar 

of the rock 'n' roll computer set, because it is 

quite willing to respond with good results 

and requires. . . only modest talent to use." 



MACROEDT 

Model! 

$50 

Rnancial Engineering Systems 

J. Olmstead 

Phoenix, AZ 

J. Alan Olmstead 

3843 West St. Moritz Lane 

Phoenix, AZ 85023 



At the end of 1980, the microcomputer 
industry came to an early maturity in 
many areas of its development. Witness the 
emergence of BASIC as the most common 
programming language in (he world. BASIC 
was clearly designed with straightforward 
syntax in mind by which computer novices 
might understand the workings of a com- 
puter in a short period of time- In this re- 
gard, the language is a total success, as 
there never was an easier language to learn 
and use. 

BASIC might be called the guitar of the 
rock 'n' roll computer set, because it is quite 
willing to respond with good results and re- 
quires practically no formal education and 
only modest talent to use. But in truth, BA- 
SIC is an astonishingly wasteful language 
which, in some environments, simply can- 
not be used. 

Because of certain applications like com- 
munications {600 baud is the practical limit 
under interpreted BASIC) and business 
problems involving reiterative mathemati- 
cal treatments, the BASIC cross compiler 
emerged. The cross-compiler was touted as 
the cure of BASIC'S ills as a run-time device. 
However, the greatest deficiency among 
compilers is their uniform failure to recog- 
nize that BASIC, as it is used, is a totally dif- 
ferent language from its high-level prede- 
cessors, such as COBOL and FORTRAN. 
Because of this difference, it requires addi- 
tional features. 



High-level applications programmers of 
the sixties and seventies were individual 
members of large teams which were backed 
up by small battalions of assembly lan- 
guage specialists. Individual high-level pro- 
grammers concentrated on developing ap- 
plications, while assembly language teams 
concentrated on optimizing the whole com- 
puter system. When an application method 
became too expensive for these individual 
high-level programmers, the team devel- 
oped new tools to ease their burden. These 
tools are brought into operation within the 
application programs by means of Call 
commands. 

Contemporary BASIC programmers are 
one-person computer departments. Even 
among the small percentage which are able 
to program in assembly language, who has 
the time? Assembly language programming 
requires ten times more programming 
hours than BASIC. The BASIC programmer 
is committed only to accomplishing his 
tasks using BASIC—aside from the few util- 
ities which appear on the market from time 
to time. Yet the programmer's demand is 
for ever more speed. 

The first part of this series will emphasize 
new tools and techniques for optimizing 
BASIC begmning with the BASIC macro 
processor. 

What Is a Macro? 

The definition of a macro varies from 
manufacturer to manufacturer, but for our 
purposes, the following definitions will 
suffice: 

• A macro is a program module of vary- 
ing size, which cannot execute by itself 
for two reasons: It is incomplete, being 
written to perform a specific kind of task; 
and it contains specialization commands 
which, when acted upon, change the 
form of the macro into a specific kind of 
sub-module which can then be executed, 

• A macro is always in source language 
which resides in a separate library file 
from any given application program into 
which it will later be incorporated. 



• A macro is capable of including, omit- 
ting and changing the form of its source 
code based upon the instructions re- 
ceived from the applications programmer 
at the time of the macro call. 

• A macro is called into the user's pro- 
gram during the program writing phase, 
before interpretation, compilation or 
assembly. 

The macro processor is an interpreter 
program that calls the macro from its li- 
brary into the new applications module, 
shaping it according to the user's instruc- 
tions contained in the macro call command 
syntax (see Fig. 1). 





New 




MACFW LIBRARY 


ApDilcation 
Program 

■MACRO=PROGAa,.a, 






MACRO -PflOGA 






MACRO =PROGB 


MACRO = PROGC 


MACRO =PROGD 




\ 




' 








MACRO PROCESSOR PROGRAM 


















COMPLETED APPLICATION 
PROGRAM 





Fig. 1. 

The specialization of a called macro 
takes place when two programming ele- 
ments interact in the macro processor pro- 
gram. First, there are arguments, or param- 
eters as they are sometimes called, append- 
ed to the end of the macro Call command. 
Second, there are various tests coded di- 
rectly into the lines of BASIC within the 
macro library module (in this case, PROGA) 
which tell the macro processor what to do If 
the call arguments are; present, absent, re- 
lational to a given integer value, or in 
AND/OR relationships between two of the 
arguments. 
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m SICK s 

OF PROGRAMS THAT TREAT YOU LIKE 
AN IDIOT, WASTING TIME & MONEY?? 

RANDOM ACCESS PAYROLL VER. 1.1 

• No complicated initialization 

• EDITS LIST 

• NO SPECIAL CHECKS 

• uses NEB 9020 checks 

• PAY any employee anyti'iie 

• SALARIED or hourly 

• SPECIAL PAY-spB(;ial hours 

• TWO SAVINGS including RIA 

• CLASSED hy occupation or bepl 

• PAYSTUB shows Year-to-Date 

• STATE FICA — FED. TAXES- SAVINGS 

SEND YOUR STATE TAX SCHEDULE- 
FREE— customized to your state tax 

Documentation $10.00 
•-'.* Disk & Oocumenialion $95 00 

R^IVNDOM ACCESS DEPRECIATION 

• LISTS any ore year's deprecialion 

• OR complete list of all prope-Iy 

• PRINTOUT shows — I D Njmber-descriplion 

• Vr purchased — life — rrettiod^ 
Isl yr additional depreciation- 

• Reg deprec — deDiec prior yrs. — balance 

• SUMMARY 'otal value prop — additional 1st yr 

• REGULAR [Jeprec —deprec prior ys. 

• PERMANENT records tor /Obr taxes 

Docurrentation $15.00 
Disk S Documentation $195 00 
TERMS Personal checks require 3 weeks to clear 
USE — VISA — MASTER CHARGE — MONEY ORDERS 

M1N.32K-1 DISK-PRINTER;132CPI 

TEL 7 PM-9 30 l=M EASTERN— (617) 359-2364/6370 

SEND SASE for additional 'n'o'nat'Or 

* MEDFIELD -^"^ 

COMPUTER SOFTWARE 

39 GREEN ST , MEDFIELD, MA 02052 



Plug-in 

and 
PRINT 




f.o.b. 



TRS-80 MODEL 1 OR 3 

NO EXPANSION INTERFACE NEEDED 

COMMERCLM. DUTY MODEL 35 
TELETYPE WITH BUILT IN SYNTEX 
TTY-SO INTERFACE. 

ACHIEVE LETTER QUALITY TYPE 
WITH THE MOST RUGGED PRINTER 
IN THE INDUSTRY. 

THE MOST COST EFFICIENT WAY 
TO ADD A PRINITR TO YOUR TRS 80 

FOR MORE INFORMATION CALL: 



WILLIAM STRUBE, INC- 

AIRCRAFT I»*TRT.'MEIVX« 

(TIT) 4S6-1906 

629 W. Market St. Marietta, PA 17547 „„ 



"The macro processor 

is an interpreter program 

that calls the macro from its library 

into the new applications module." 



To more clearly Illustrate this, examine 
the generalized code illustrated in Example 
1. It appears to be BASIC code, but it cannot 
be executed either in interpreter or compiler 
form. At line 1000, a remark line, appears 
the pseudo-command word 'MACRO-, 
which signals to the macro library proces- 
sor that a library module is being defined. 
Ttie definition continues until an 'ENDMAC 
pseudo-command word is encountered (at 
line 1100). The name of the library module 
follows the pseudo-command. It does not 
use any form of a BASIC reserved word, 
which might present a problem to some In- 
terpreters and compilers, even though it ap- 
pears Inside a comment line. 

Finally, a series of arguments appear, 
each separated by a comma. The argu- 
ments are not legal BASIC values, but are 
two numbers preceded by the flag symbol 
&&. 

The arguments could continue up to nine- 
ty-nine—from 01 to 99, Argument 00 is used 



by the library processor as internal work 
space. The arguments are In ascending 
order only for convenience. The same Is 
true ot sequence, which may contain skips 
or gaps in which argument numbers are 
used- Line 1000 indicates to the library pro- 
cessor the outer dimensions of the speciali- 
zation problem about to be undertaken. 

Throughout the macro appearing in Ex- 
ample 1, there are true BASIC statements, 
such as line 1010, and other almost-BASIC 
statements, like line 1020. Line 1020 is a 
standard Radio Shack TRSDOS Open com- 
mand, but in generalized form. It will be spe- 
cialized Into a true command when the user 
presents the actual values of arguments 
one, two and three to the library processor 
program. During specialization, the true 
arguments presented to the library proces- 
sor are substituted into their physical coun- 
terpart locations (one into one, two into 
two, etc.), and the resulting BASIC code is 
then included into the user's program in its 



1000 


■MACRO = DSKOPN &&01 .&&02,&&03,&&04.8.SOb &&06 | 


1010 


ON ERROR GOTO 1050 






1020 


OPEN S,&01,S&02,&&03 






1030 


ON EHRORGOTO&S.04 






1040 


RETURN 






1050 


ON ERROR GOTO &&04 






1060 


■BOOLi&05-t-5&06 






1070 


&805^&S06 






1080 


ENDB 






1090 


GOTO 1040 






1100 


ENDMAC 






Example 1. Example of a 


Type 


f Generalized Code 



100 PROGRAM MODULE "ESTPROG" 

110 CLS:GLEAR1000-DIM AJ,BS,CI:ON ERROR GOTO 260 

120 INPUT "ENTER DISK FILENAME ".AS 

130 INPUT "ENTER DRIVE NUMBER: ",8$ 

140 A$ = A$. ■ BS 

150 BS = "R":CS:r ■ " 

160 GOSUB220:IFCS = " "THEN 170 ELSE 240 

170 FIELD1,64 AS XI $,64 AS X2$,64 AS X3J, 64 AS X4$ 

180 GET 1,1 

190 PRINT X1S;X2$;X3S;X4S 

200 CLOSE 1 

210 END 

220 MACRO = DSKOPN B$.1,AS 

230 '-260.C$, "CANT OPEN FILE" 

240 PRINT C$,A$ 

250 GOTO 200 

260 PRINT "ERROR ",ERR," AT LINE ",ERL 

270 STOP 



Example 2 User's Program Before Specialization 
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Powerful Utilities To Get More Out Of Programming your TRS-807r. 

BOSS 2.2 Back to work everybody the BOSS is BACK! A BASIC 

Operated Single Stepper -monitor your basic programs, line by line, 

while they are executing! c 3 



VFU Visual File Utility - Allows you to; EXECUTE or PURGE a basic 

or machine language file; COPY a file from one disk drive to another 

or HARD copy your directory, ALL with single key entries . . . , c 

d 

ULTRAZAP Disk modification utility - Read, Write. Copy. Purge 

or ZAP! any byte or sector on your diskette. The same utility that comes 

with ULTRADOS c 

d 

SPOOL Parallel port, print spooler - Define spooler buffer size, lines 
per page, and characters per line, allows continued use of CPU during 
the printing process. A True RAM Spooler! ^ . . . c 

d 

GEDIT Global Editor - Allows the user to search and replace any 

keyword command, variable or string with incredible speed, even pack 

strings for high speed graphics c 

d 



RENUM-80 Program Renumberer - Tape or Disk operation, ultra 

fast, accurate operation 

Lower Case Driver - Will work with all Model 1 lower case con- 
versions. Shortest available, only 68 bytes 

Epson Driver - For the Epson MX-80 printer, allows the use of all the 

functions available on today's most popular printer ■ Works with the 
Model I or Model IIL cassette or disk 



I 




OR. 

Get most of these utilities and much, much more with. 
ULTRADOS! 
Now only $ 94.95! 



For Orders Only 1(800) 521-3305 
For InformsHon (313) 525-6200 
32461 Schoolcraft Rd., 
^14 Livonia. Michigan 48150 




24.95 
29.95 



19.95 
24.95 



19,95 
24 95 



19.95 
24.95 



19.95 
24.95 

5,95 

5,95 

5,95 






-;;- A trademark of Tandy Corpoiation 



.^ 




pio shack'^tr 

' COhPUTERS 

DISCOUNTS 

FREE SHIPPING TO 
4S CONTINENTAL 
CONTIGIOUS STATES 

■JliLL FREE ORDER NO 
0-531-7466 



x>, s] -n^ V, j». m. m, m. 
^ *> *\ ^ '* --^ /*\ /= 



American 
Electronics 

INCORPORATED^.. 



NEWSdr.wioom 
291^ N Main 
Ft yVoftti,TX 



Department 57 
1117 Conway Avenue 
Mission, Texas 78572 

Texas and Principle 
Number 512/581-2765 
Teiex Number 767339 




'•«i^ f^ ^ ,^ 




. RS-80 is Trademark of Tandy Corp. 



j)f...-f^.V,-,Vf,..,.,' 



• Sem Usl ot AOvtnia^n on page 30G 
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DATA READER & 
PROGRAMMER'S 

RULER 

ONLY 

$2.00 

(It's even FREE if you 
order from our catalog!) 



Don't count, measure with 
thishelpfuM5"data 
reader-counter-spacer- 
measurer. Only $2 post- 
paid and you get a Gift 
Certificate for $2 when 
you order computer 
accessories from 
our catalog 
(at a savings of 
25% & more!) 



15" flexible plastic 
clear & tinted 



Higti lighted 
reading window 

Vertical spacing 

scale for 8 lines 

per incfi 

6 lines per 
incfi vertical 
spacing scale 

Horizontal 

spacing scale, 

150 print 

positions 



▲ 




National Tricor, Inc. 

3335 Greenleaf Blvd. ^ua 
Kalamazoo, Ml 49008 
Phone orders (800) 253-4358 
In Michigan: (616) 375-7519 



D Here's my $2 for a Data Headet/Ruler and 
send me your catalog with 25%-50% savings 
01 name brand disks, paoer, labels and other 
computer accessories. 

n I don't need the Oata Reader/Rder but please 
put me on your catalog mailing list 

Name 

Company 

Address - . . -^__ 

City 



State/Zip 



"Anything and everything 

appearing between two commas 

wiil be considered to be the value of the argument, 

including both single and double quotes/' 



new, interpretable/compilable form. 

The programmer's new program gives the 
specialization commands to the library pro- 
cessor program. Example 2 shows a pro- 
gram, which opens up a named file and 
prints the first record on the screen. Begin- 
ning at line 220, and including line 230, the 
sample macro illustrated in Example 1 is 
called by the pseudo-command 'MACRO = , 
in the exact same form as previously seen. 
This time, however, instead of following the 
pseudo-command with dummy arguments, 
the actual proper values are given. The 
propervalues must be in ascending sequen- 
tial order, and If any arguments are option- 
ally omitted, the parameter slot must be 
preserved. This is done by Inserting the 
comma which would have followed the ar- 
gument if it were present. 

Lengthy Arguments 

In the case where the arguments are too 
lengthy to fit on a single line, they may be 
continued in sequence to the next line with 
the continuation pseudo-command word '-. 
(See line 230 In Example 1.) Of further inter- 
est is the delimiter character comma. Any- 
thing and everything appearing between 
two commas will be considered to be the 
value of the argument. Including both single 
and double quotes. However, the one value 
which may not appear between two com- 
mas is another comma. 

Note also that the dummy argument 
&&01 (and others) require only four charac- 
ter positions, white literal arguments (with 
actual proper values) that are substituted 
into that place may take either fewer or 
more character positions. This is of no con- 
sequence; the specialized output code will 
be expanded within the same line, not to ex- 
ceed a total of 128 character positions. 

The reason why the dummy argument Is 
required to take four positions, even if the 
leading zero must be inserted (&&01), is for 
flexibility. For example, if the generalized 
code directed the last two numbers of the 
lines to be used as a GOTO, it would look 
as follows: 

1000 ON &&01 GOTO &&0210,&&0220.6i8i0230 

When specialized, this line will test the val- 
ue of the numeric variable specified as 
argument one and conditionally jump to 
one of three lines whose numbers are rela- 
tive to a base line number like 5000. The de- 
sired specialization would be: 

1000 ON A GOTO 5010,5020,5030 



If the leading zero were not present in &&02, 
the library processor would either look for 
&&21, &&22, &&23 or for &&210, &&220, 
&&230, the latter group being, of course, 
illegal. 

In line 1060 of the generalized code in Ex- 
ample 1, there is another pseudo-command 
word, 'BOOL, which is logically grouped 
with the pseudo-command word 'ENDB at 
line 1080. This pseudo-command set incor- 
porates elementary Boolean logic in a 
method by which the library processor de- 
cides whether or not certain lines or sets of 
lines are supposed to be included into the 
specialized output. The Boolean method 
tests for truth. Accordingly, line 1060 Is in- 
terpreted to mean "If both argument five 
and argument six were specified in the spe- 
cialization pseudo-command line, then do 
Include all lines until the next 'ENDB line is 
found." if either argument five or six had 
tjeen optionally omitted by the calling pro- 
grammer, line 1070 would not appear in the 
specialized output. 



'T/ie Boolean method 
tests for truth." 



The forms of the 'BOOL pseudo-com- 
mand permit quite complicated and flexible 
conditiontestlng.TheORcombination is in- 
dicated by a minus sign between two argu- 
ments: 

'BOOL &&23-&&03 

This means "If argument 23 or argument 3 
is present, include the lines which follow 
until the next 'ENDB pseudo-command." 
Remember that the 'BOOL command is al- 
ways a test of truth for inclusion. 

In addition to the logical AND and OR 
possibilities, combinations of present and 
absent argument conditions may be tested 
in the 'BOOLean test for inclusion. The ex- 
amples of the arguments illustrated so far 
have actually implied a " -f- " just before the 
numerals of the argument. For example, the 
illustration atx)ve actually means &&-t-23— 
&& -I- 03, that is, a test for the presence of 
argument numbers 23 or three. A test for ab- 
sence coutd be written: 



'BOOL&8L-23-&& + 03 
BOOL &&- 23 + as -03 
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Apparat, Inc. announces the most powerful Disk Operating 
System for the TRS-80®. tt has been designed for the 
sophisticated user and profes^onal programmer who 
demands the ultimate in disk operating systems. 

New 2.0 version has ail of the features of NEWDOS/80 plus 
many more enhancements; 

• DOUBLE DENSITY ON MODEL I 

Use the LNW DOUBLER or PERCOM DOUBLER to expand 
storage 80% under NEWDOS/80 Version 2.0. mixing single 
and double density specifications without any patches. 

• SINGLE DENSITY ON MODEL III 

Will allow the MODEL 111 to read disks from MODEL 1 and to 
write disks the MODEL I can read, making it easy to move 
programs between the two under NEWDOS/80 on both 
machines. 

• COPY BY FILE EXPANDED 

CBF will now work with system files and can run on single 
drive systems. Files to be copied can be limited to files of 
common extension or only non-invisible files. Files for copying 
can be listed in a data file. This is helpful in moving programs 
from NEWDOS/80 Version 1.0 system disks to NEWDOS/80 
Version 2.0. 

• EXPANDED DIRECTORIES 

Directories can be expanded three times the normal number of 
available entries, even on DOS disks. This is extremely useful 
when using double density. 

• DYNAMICALLY MERGE IN BASIC 

To allow sections of BASIC programs to be deleted and 
replaced during program execution with non-ASCII files from 
disk. Also allows passing of variable values between BASIC 
programs. 

• SELECTIVE VARIABLE CLEARING 

Will allow the pnagrammer to keep some variables and release 
the space used by the rest: also, specific variables may be 
erased releasing the space they use. 

• CHAINING ENHANCEMENTS 

Features to allow chain files to be vmtten from SCRIPSIT; also. 
chaining may be switched on and off without changing chain 
file positioning, and may be executed via CMD "XXX" and 
DOS-CALL 



• PAGE SCROLLING IN BASIC 

Scrolling has been modified to allow the user to display 
programs page by page, in addition to the reojiar line scrolKfig. 

• CREATE PRE-ALLOCATED FILES 

pie space may be allocated on the dis-^ in advance, to prevent 
the possibility of disk full errors. 

• REPEAT FUNCTIONS 

Keys in MODEL 1 repeat when held down. Entering "R" a^ s. 
DOS command causes the prevnous DOS command to be 
repeated. 

• ROUTING FOR DEVICE HANDLING 

To send input and output from one device (display, printe* 
keyboard. etc.) to others or to a routine in main memor." 

• FORMS COMMAND (MODEL III) 

To set printer formatting on the MODEL 111. 

• SET COM RS-Z32 (MODEL III) 

Commands to set the spedfications on the serial o'Jtput pert: 

• DISASSEMBLER OUTPUT TO DISK 

The DiMSsembler will now write a source code tile to disk 
which the editor assembler can read and edit 

• DATE AND TIME VALUES 

Saved through non-powerup reset and can be used as defaults 
for DOS commands. COPY and FORMAT. 

• SUPERZAP 

Has the abilily to scan diskettes or disk files to find the 
occurences of specific values. Also will generate passwords and 
hashcodes. 

NEWDOS/80 Version 2.0 Model I or III (When ordering, 
please specify model number). Priced at only . . . ^^4SP^. 




^264 



, Apparat, Inc. 

4401 South Tamarac Parkway 
Denver, CO 80237 

(303)741-1778 

"On-going Support for MiCTocomputers" 

TFlS-80* is a registered trademart of Tanoy Corp. 



^See List of Advartisen on page 308 
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"It's important to write 

BASIC functions 

with the same deliberate and meticulous care 

as when writing assembly language." 



In the first example, inclusion wiil occur it 
argument 23 is absent, or, if argument three 
ispresejit. in the second example, inclusion 
will occur if agrument 23 is absent, and if 
eirgument three is absent. The OR condition 
could as easily test for the absence of 
either argument: 



■BOOL&&-23-&S-03. 

In order to obtain additional complexity 
and flexibility, nest combinations of code 
lines to 10 levels of 'BOOL, The rules apply- 
ing to subroutines also apply to nesting. 

The code lines appearing in Example 3 il- 
lustrate the results of running the user's 
program (Example 2) against the macro li- 
brary through the macro processor pro- 
gram, A number of quite interesting things 
did and did not take place. 

First, note that only the named macro, 
DSKOPN, is included into the user's final 
program. Other macros cataloged in the 
same library file with DSKOPN are not 
called. 

Second, the macro is inserted into the us- 
er's calling program in the exact sequential 
place where its pseudo-command occurred. 
Thus, it is the programmer's responsibility 
to document this macro library, knowing 
which modules may be dropped through 
and which must be accessed by the GOSUB 
command. The macro processor program 
makes no attempt to analyze program logic 



(except for common macros, described 
below). 

Third, all arguments are inserted Into 
their corresponding argument locations. 
The format of each line is expanded or 
shortened, accordingly. 

Fourth, since both arguments five and six 
are specified, line )070 of the original macro 
is included, as line 280 of the final, 
specialized output. Both the 'BOOL and 
■ENDS pseudo-command lines are not In- 
cluded, nor the 'ENDMAC, 

Fifth, the entire program is renumbered. 

Addftlonal Features 

This simple example illustrates the tre- 
mendous increase in programming power a 
macro processor makes possible. It's im- 
portant to write BASIC functions with the 
same deliberate and meticulous care as 
when writing assembly language. Such au- 
thorship is expensive in programming time 
and, therefore, should be placed in a macro 
library for economical reuse. 

Since economy is the principal purpose 
of the macro processor, there are two addi- 
tional devices which conserve both memory 
and time. These include the common mod- 
ule designator and the list-printing control 
commands, 

A common macro module's call is com- 
mon to several sections of the user's pro- 
gram, or is called through a nested macro 
by two or more macros. A good example of 
this might be a disk I/O command which, for 



100 


■PROGRAM MODUEL"TESTPROG- 


110 CLS:CLEAH1000;OIM A$,B$,C$:0N ERROR GOTO 320 ] 


120 


INPUT "ENTER DISK FILE NAME: "AS 


130 


INPUT "ENTER DRIVE NUMBER; ";BS 


140 


A$ = A$ + ":" + B$ 


150 


B$ = -'R":C$ = "" 


160 


GOSUB 220:IFCS = " "THEN 170 ELSE 300 


170 FIELDV61 AS X1$,M AS X2$,64 AS X3$.64 AS X4$ | 


180 


GETI.I 


190 


PRINT X1$;X2$:X3$.X4S 


200 


CLOSE 1 


210 


END 


220 


•MACRO = DSKOPN B$,1.A$,320,CS,"CANT OPEN FILE " 


230 


ON ERROR GOTO 270 


240 


OPEN B$,1,A$ 


250 ON ERROR GOTO 320 | 


260 


RETURN 


270 


ON ERROR GOTO 320 


2B0 


C$ = "CAN'T OPEN FILE" 


290 


GOTO 260 


300 


PRINT C$;AI 


310 


GOTO 200 


320 


PRINT "ERROR ";ERR: ' AT LINE ";ERL 


330 


STOP 


Example 3. User's Program After Specialization 



economy of space, serves several different 
logically designated files. The macro ap- 
pears in the library as: 



1000 ■MACRO = DSEQPS&01,&&02 
1010 PUTi&01,AAO2 
1020 RETURN 
1030 ENDMAC 



This macro is a simple Put to a sequential 
disk file. Arguments one and two are, re- 
spectively, the logical file number and the 
record number. But the arguments could be 
specified as the numeric variable contain- 
ing the logical tile number, and the numeric 
variable containing the record number. In 
that event, the macro name could read: 

1000 MACnO = DSEQP-C&401,4&02 

The macro would then be declared common 
to any and all places in the program where 
the same macro call is found. The first form 
of the macro would appear every time it is 
named in the user's program or is nested 
within any other macros called by the user's 
program. But the second, common form 
would appear in the user's program only 
once, no matter how many times it is called. 

The common designation -C causes the 
macro processor to search through the 
macro for the Return command. It it is 
found, any subsequent call to the common 
macro will be replaced by the GOSUB nnnn 
command. It no Return command is found, 
every subsequent call to the common mac- 
ro is replaced by the GOTO nnnn command. 

The argument values that specialize a 
common macro are taken from the first 
macro call encountered (lowest line num- 
ber). The argument values specified in sub- 
sequent calls are completely ignored. How- 
ever, it is a good idea to include them each 
time because i1 is easy to go back and in- 
sert a new macro call. It is also easy to tor- 
get that it nests a call to a common macro 
whose specialization arguments are now in 
the second encountered macro call. 

This warning also points up another fea- 
ture of the macro processor's 'BOOL logic. 
the present/absent switch operates within 
every line, even if there is no 'BOOL pseudo- 
command. If a line of macro code calls for 
an argument, and if that argument is not 
provided with the macro call, the dummy ar- 
gument &&nn remains in the line and an er- 
ror message Is printed at the left of the line 
during the final printing. 

The second economical feature permits 
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"Often, the (program) writer calls 

as many as 30 or more macros 

In each BASIC program, none of which 

Is being seen for the first time." 



selective control over printed listings. After 
the macro library modules are debugged 
and used several times, the user has no in- 
terest in seeing them again. Furthermore, 
vi/ith practice in vi/riting macros, the user 
finds ways to standardize his programming 
procedures, so that the macro modules in 
the library become large and numerous. Of- 
ten, the writer calls as many as 30 or more 
macros in each BASIC program, none of 
which is being seen for the first time. 

Selective listing controls are illustrated 
in these two examples: 

1000 llSTF#22-#255 

1010 , , , . 

1020 .... 

1030 'LISTN 

1040 1ISTF#33 + #255 

1050 . , , . 

1060 .... 

1070 'LISTN 

At line 1000 (either in the user's program or 
in a macro), the list-off command states, 
"Do not print the following lines until the 
next list-on command, unless print suppres- 
sion is overridden by operator's keyboard 
switches number 22 or 255." These switches 
are entered either at the beginning of the 
second pass (after macro specialization but 
before printing) by the operator, or they may 
be entered in the program itself by the 
pseudo-command: 

1000 'SWITCH #22,#33.#255 

(The commas are included only for readabil- 
ity, since the # is the controlling delimiter.) 
The switch numbers mean anything the 
programmer wants. For example, switch 
255, the highest available switch, might 
mean GLOBAL PRINT. When switch 255 is 
entered, every section of code containing 
the simple switch command #255 or the OR 
switch command #nnn-#255 would print. 

Operating Requirements 

Given the 256-byte character of nearly all 
disk systems, you should have 64K (48K us- 
er) main memory with two disk drives. The 
macro library and user application program 
are input to the macro processor from one 
drive. The specialized output file is written 
to this same drive. The other drive is re- 
served as working space for the macro pro- 
cessor program. 

The macro library should not contain 
more than 160 macros, and a five-inch disk 
system shouid limit the number of argu- 



ments per macro to 32. Macro nesting 
should also be limited to ten levels in such a 
small system. Visually illustrated, a 10-level 
macro call nest would appear: 

1000 'MACRO = PROGA&&01,&Si02,&&03 

1010 ■MACR0 = PROGB44. ..&&. . 

1020 'MACRO = PROGC &«..,&&,, 

1030 'MACRO = PR0GD&8..,&&., 

1040 'MACRO = PflOGE &4 , . ,&8 , , 

1050 'MACRO = PROGF &&..,&&., 

1060 'MACRO = PBOGG &&..,&&. . 

1070 'MACRO = PROGH &A. .,&&. . 

loao 'MACRO^PROGI &4. .,&&.. 

1090 'MACRO = PROGJ &S ,.,&&. . 

1100 'CODING FROM PROGJ 

1110 'ENDMAC 

1120 'CODING FROM PROGI 

1130 'ENDMAC 

1140 'CODING FROM PROGH 

1150 'ENDMAC 

1160 -CODING FROM PROGG 

1170 'ENDMAC 

1180 'CODING FROM PBOGF 

1190 'ENDMAC 

1200 'CODING FROM PROGE 

1210 'ENDMAC 

1220 'CODING FROM PROGD 

1230 'ENDMAC 

1240 'CODING FROM PROGC 

1250 -ENDMAC 

1260 'CODING FROM PROGB 

1270 'ENDMAC 

1280 'CODING FROM PROGA 

1290 'ENDMAC 

Program line lengths should be kept at or 
below 64 bytes, including the line number- 
ing characters. However, this is not a re- 
striction, since programming for macros 
usually involves so many 'BOOLean opera- 
tors that lines are short anyway. 

The total number of lines per program 
should be kept at 2500 maximum, including 
all specialized macros. However, with long- 
er lines it probably would not be possible to 
contain 2500 lines within the computer's us- 
er memory under the interpreter, and cross- 
compilation into executable machine lan- 
guage would definitely not be possible. 

As indicated above, the macro processor 
operates in two passes. If any called mac- 
ros have not been found in the named li- 
brary, a second library may be named and 
two more passes result. This continues un- 
til ail macro calls have been honored. If any 
called macro cannot be found when the op- 
erator calls for a print listing, they are 
flagged with an error indicator at the left of 
the line number. Error-flagging also over- 
rides print suppression, in case one of the 
unfound macro calls is nested inside an- 
other macro. 

Line number references are also impor- 
tant. The user program may reference any 
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Packer 

FOR THE TRS SO 
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• Draw a picture; graphics, 
ASCH II Characters or Mixejd, 
with String Packer's Screen 
Drawing Routine. 

• Issuethe'Pack'commandahd 
the screen is packed into a 
string, ready to merge with 
your programs. 

• String Packer also packs 
machine language sub- 
routines — no hassle. 

• String Packer can edit the 
packed strings that it creates. 
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YOUCANBUY. 



Ip 111 77 hiRh-qiiality proerams 
for TRS-80, only SIO 95 



NewDOS-SO— New Low Price! 

Successor to NewDOS+ , ssme package tor which 
rou pay S149 elsewhere, at CIE Just... Jill 

SuperPIMS—People's Database 

P IMS has been greatly speeded up and simplified, 
with machine-language sorts, key debounce, 
optional automatic lowercase (no keying, no 
hardware iTiod) on lal>els or reports. Up to 20 
fields, limited by 240 character maximum ppr 
record Easy to ri^nse, add records, split or 
merge files, sum or average any fields 
Cuslomiied for tape, tape A disk, Zoom, TC8 Poor 
Man's Floppy, BIT, Stringy Floppy — all on one 
tape! As mailing labels program, easily manages 
20,000 list. CIE does! Advanced labels module to 
come, S24.9S, making system most powerful 
mailer available! on disk, tZS »0 

pracram (CIE) $19.95 (121.13 CA) 

book, details uses (CIE) $11.95 (112 67 CA) 

PASPATCH 

PasPatch, Tape 6P, makes Tandy tiny 
Pascal a powerful disk system! 

Modular Soltware Assoc $19.95 

Level II Tapes 

Tiny' Pascal runs on any 16K Level II system, in- 
cludes the programming structuring capabilities 
of full Pascal, but not data struciuring 

Able to compile Z-80 machine code, programs run 
about 5X faster than Level II Basic — graphics run 
eight times faster' Requires use of T-Bug (or Tape 
71 and ETASM 
Tape 3, People's Pascal 119 9r> 



$10 95 

>k Some 

SIO 95 

110.95 

JIO 95 

$10.95 

JIO 95 

$10.95 

S39. 95 



Tape I, 34 buis , edu game progs 
Tape 2, 77 programs from Osborne 

Common Basic Programs 
Tape 5, 24 buis , edu , game progs. 
Tape 7, 31 buis., edu , game progs 
Tape 8, 40. inc. 4X tape speedup 
Tape 9, 25 buis , edu , game progs 
Tape 10, income ta», checkg act 
People's Taiman, fills out all form 

Send for free monthly bulletin 
and price list. 

NewDOS-80 (Model l or 3?) $111 

DOS-plus (Model 1 or 3?) $100 

Percom Doublet $165 

LNW dbl. density, DOS-plus $175 
DoubleZAP-II/80 patch $47.45 

PMC-80 16k computer $610 

PMC-80 expansion (S-100) $380 
32k S-100 RAM card $270 

Percom 40-track drive $375 

Ep&CHi MX-80 printer $525 

Centronics 737 printer $850 

Starwriter 25cps daisywheel $1,610 



$1,525 

$610 

$57 

$61 

$147 

$90 



Anadex DP9500 200cps 

EPROM programmer 

ROM extender 

ANALOG input module 

Fastload hi-speed cassette 

CTR-41M cassette deck 

5" Memorex sing den bx 10 $27.50 

5" Memorex dd bx 10 $29.50 

5" FD or 3M cleaning kit $25.50 

Add $1 shlppiDK per order, plus SO cents per 
media boi or kit, Ha)or llemG shipped freight 
collect. Small items t books, software shipped 
postpaid. 

NEW: Send for free monthly catalog 

10% DISCOUNT 
when ordering 3 items 
totaling $50 or more 

All orders charge card, check or m o. 

Calif resMenUaddB pet t*« Dealer Inq. Invited 

Overseas, add |1 50 per tape postage 
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"A line number which is 
the name of a line 
may not be a parameter. " 

of its own lines, some of which are macro 
calls. But the user may not reference any 
line believed to be inside a macro or an un- 
defined line error will be flagged. 

When writing a macro library module, 
lines within the macro may be numbered at 
the convenience of the programmer— they 
will never remain similarly numbered after 
specialization. A macro may reference only 
its own lines, unless the line number is sup- 
plied as an argument to resolve a GOTO, 
GOSUB, Then or Else command word in the 
macro with one of the user's program lines. 
An argument line number may not attempt 
to reference a line number internal to an- 
other macro. 

A line number which is the name of a line 
may not be a parameter. For example: 

&&03 GOTO &807 

This line is illegal, because it does not begin 
with a number. However, as described 
above, the following is legal: 

1000 GOTO &S07 

The value for argument number seven is a 
line in the user's program. 

Any line number which is equal to or less 
than the original (library file) line number of 
a macro, but which is not supplied as an 
argument value, is considered to be a Re- 
start command. 

For example: 

1000 ■MACRO = PHOGA-CS&01,&&02,&&03 

1020 PRINT@&&01,&&02:&&01 = 8&01 +64:&&03- 

S&03■^1 
1030 ON 8&03 GOTO 0,0,0,0,0,1040 
1040 RETURN 
1050 ENDMAC 

This macro provides repeated printing of a 
message (from one to five times) depending 
upon the value of the numeric constant 
named as argument three. The zero line 
numbers in line 1030 will be replaced with 
tine number 10OO, as would be any number 
from 0-999. 

Conclusions 

Although writing a macro processor is 
not easy fare for any but experienced pro- 
grammers, it can and should be written in 
BASIC. If made a macro itself, the library 
processor program may be specialized for 
such diverse purposes as macro library pro- 
cessing for COBOL and for word process- 
ing applications, such as filling in pre-print- 
ed forms and contracts. 

Once debugged, it should be cross-com- 
piled and run as executable machine code in 
order to increase its speed (by as much as 30 
times) in some of its math/logic functions. ■ 



See your local 

A.M. Electronics 

dealer 



Here is a partial lislmg ol authorized A M 
Electronics. Inc dealers 



ARIZONA 

Simuiek Compuler Pfoducli 
POBo. :i6e;' 

fui;wn Ariiona BS'lO 

Micr<KOfnput«n. Inc 

432? E Fdirmom 

PdOfnii Arifona 9^018 

CALIFORNIA 

RAC Producli 

3200 KrpgniErtOoa Way 
San Jose Caiilornia 95iJe 

CONNECTICUT 

Mountain Vtow Software 

Mtryb'QOk Roaa 

Danhury Cunne<.i<cuf 06810 

Computfti Scrvicei ol Oanbury 

Dsnbuiy Co-^-^ectiCut D6«l0 

DIST. OF COLUMBIA 

Program Store 

4300 Wisconsin Ave N W 
vuasnmqton DC ?001fi 

FLORIDA 

Computer WorUi 

^23JEs5i Bay Drive 

Ciearwale' Fionoa 33516 

M¥enluia IniemaUonal 

M^EaslSlreel 

Longwood FJonOa 32^'^il 

All Syilami Go 

105 West PlaniSlieel 
Winle'CarOen Florna 32^8/ 

ILLINOIS 



Reintrhabit Sot1i>«r« 

l508ADele"5e 

Muskegon Miciigan J94ai 

Jftmea Buiktr 

■13S East Lsfce Street 
Peloskey Michigan J97?0 

EKint BI1 Corner 

;2?EvanslonA.enuf 
Muskegon Michigan 49443 

Soil S«lor Mirheling, Inc. 

6?50MiaaleDeit Foad 

Garden Ciiy Michigan 4813^1 

Malm Sollwice 

Jli Mfliion Avenue 

B.g Rapids Michigan 4930.- 

Breef« Cornpuling 

POBo. tOlJ 



Be 



Mil 



3.'3 



A, I 



3H Computer 

19iOBil(r<f!rj,iiJ 
ruia IMinois 6lbU4 



NEW HAMPSHIRE 

Haras'de 

tiijoiiin Siif'-i 
Milltirij NHwHamp5hiif 030i^ 

NEW JERSEY 

rioppv Disk Services 
40 Misty Morn Lane Noitn 
Ticnlon t^ewJorsuv 086:!fl 

New YORK 

John D Oweni Aisociales. IrK 

i^SchunenSiieet 
Slalen isiann Nevt fork IU305 



Cenleteacn NewVork i W30 

NORTH CAROLINA 

Alpha Tect^nology 

1MI W cki.-( EJn„(. 

faleigh r>J or th Carolina 37604 



AAA Chicago Compuler Center 

120 Cheslnul Lane 
.vneeiing Illinois 60090 

Midw«at Computer Perlpheraii 

■4P'S Mi.'higan A'.e 
Chn,igj i.i.fTjis hi:)60-, 

MASSACHUSETTS 

Small Busineti Systems Group 

6 Carlisle Float] 
Wi-s1f(j«l Mass 01886 
Marli Gordon Computers 

1 18 Magaiine Slreei 

(.amnndge Mass 0?i39 

Omnilek Sytlenu 

1899 Mam Sliefi 

Tewfcsniir^ Mass 01876 

Computei Plus 

245A Great Floarl 
Liltlfton Mass 01460 

MICHIGAN 

Adapit - 

600 28tn Street 

GranoOapiOs (ulictirgan 49509 



OHIO 



Eleclromci Unhr 

B34 Easi iJihSi 



OKLAHOMA 

Anwncan Busiriess Cornpulers 

118 South Mill Sireel 

Ci.i.r Oki^hiima -J3fi1 

OREGON 

>300 Centre Etectromcs 

1300 btn Street 
Umatilla Orfgoh 9788^ 

PENNSYLVANIA 

Sleoens Radio Sliack 

;J>^N„ri Rn.iri 
t'hiB ri,.„i|i> Pii-iriS,lvrJiii,l iy4l3(l 

TEXAS 

Oualliy Sotlw«re 

1 1-600 Stemmons E^presswav 
Dallas teias 75339 



SeeyOLjr local A M Electronics Inc 

computer aealer tor the best in TRS-80" 

hardware or soflware products and sen/ice 

The power behind the drives^ 




A.M. ELECTRONICS, INC. 

3366 Washtenaw Avenue 

Ann Arbor, Michigan 48104 

(313) 973-2312 

A Hen lion Computer Relsllers: 

Interested inoKering your customers high-quality A M 
Electronics hardware anO software products'' 
Call lor mote Oetaits' 
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More power to you. 

Disk drives, hardware and software— now more affordable and more available! 



NOW IN STOCK! 

MODEL 111 DISK 

CONTROLLER BOARDS! 

All retrofit packages include 
circuitry, power supplies, 
mounting brackets, cables and 
everything required to turn your 
Model III into a reliable, disk- 
based system. 100% compatible 
with Radio Shack hardware! 
AM-1 — Supports 4 single-sided, 
double-density SV^-inch disk 

drives $445 

AM-2 — Supports 4 double- 
sided, double-density 5'/4-inch 

disk drives $545 

AM-3 — Supports 2 internal 5Va- 
inch single-sided, double-density 
disk drives and 2 external 8-inch 
single-sided, double-density disk 
drives $645 

TRS-80^- SOFTWARE 

MAKE 80© 

Converts standard 35 or 40 track 
diskettes into 80-track-readable 
diskettes $14.95 

ModellllTRSDOS 

40-track Model III TRSDOS & 

manual $20 

80-track Model III TRSDOS & 
manual $35 

Attention OEM's & Distributors: 

Call us for details on our attractive 
pricing! 

New Store Hours; 

Monday-Friday 10-6, Sat. 10-5 

'■TRS-80 IS a trademark ot Tandy Corp. 
^See List ot Advertisers on page 306 



SPECIALS! 



SAVE ON COMPLETE 
DISK DRIVE PACKAGES! 

5y4-inch drives 

40-track MPI 51 with case, 
power supply and extender 

cables $320 

80-track MPI 91 with case, 
power supply and extender 

cable $425 

Dual-headed 80-track drive 
with case, power supply $550 
8-inch drives 

Single Siemens 8-inch drive 
with single case & power 
supply $695 

TEAC DISK DRIVES— 

THE BEST WE'VE SEEN TO 

DATE! 

Teac 40-track disk drive 

$299 Complete! 
Teac 80-track disk drive 

$399 Complete! 

PRINTER SPECIAL! 

Epson MX-80 Printer 

$495 Cash Discounted 



The power behind ^M^^^^^M^f% 

7 Am 

A.M. ELECTRONICS, INC 

^^ 3366 Washtenaw Ave. 
B Ann Arbor, Michigan 48104 
(313)973-2312 



NEW TRS-80'" MODEL III! 
NOW WITH DISK DRIVES! 

Model ill with dual 80-track disk 
drives— 704K of reliable disk 
storage on only two drives! 

• Features two double-density 
80-track drives 

• 48KRAM 

• Includes A.M. Electronics 
controller board 

• Complete, ready-to-run 
Now only $22951 

The Ultimate Small Business 
Computer: Model III with four 
dual-headed 80-track disk drivesi 

• Features four drives 

• 48K RAM 

• 2.8 Megabytes reliable disk 
storage 

• Includes A.M. Electronics 
controller board 

• Complete, ready-to-run 
Now only $3,795! 

CASES & POWER SUPPLIES 

5V2-lnch enclosures 

Single drive unit case and power 

supply $85 

Dual drive unit case and power 
supply $120 

( Extender cables S1 5 each extra) 

8-Inch enclosures 

Single drive unit case and power 
supply $150 

Send For Your FREE Disk Drive Guide I 

Get your concise and fact-filled guide 
from A.M. Electronics, written in 
engaging Question/Answer style. Call 
or write us to order your Guide today! 
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GENERAL 



Some buzz\\>ords defined. 



Coming to Terms 



Joe D. Fugate 
8979 Mandan Ct. 
Boise, tD 83709 



The word computer is becoming a com- 
mon buzzword. However, along wilh the 
microcomputef has come many not-so- 
com.mon concepts that are both unfamiliar 
and confusing to the layman. 

Let's lay some ground work: The TRS-80 
(and aii microcomputers) is based on a par- 
ticular chip (integrated circuit) or micropro- 
cessor. The TRS-80 microprocessor chip is 
called the Z-80, To program the Z-80 directly, 
one must use numeric codes known as ma- 
chine-code. This is not very convenient for 
humans who are not accustomed to talking 
to each other in strings of numeric codes. 

To ease our communication problem, as- 
semblers, compilers and interpreters were 
developed. The basic job of these three is 
the same: to decode your programs into 
something the machine can understand 
and operate on. How they each accomplish 
this is where the difference between them 
lies. 

Your Level Nor Level i ROM is a BASIC in- 
terpreter. That is. the ROM is coded to inter- 
pret the computer language known as BA- 
SIC, Another ROM might be designed to in- 
terpret FORTRAN, another Pascal. 

Interpreter vs Compiler 

Let's talk about the difference between 
your BASIC ROM and a BASIC compiler. 
The following are concise descriptions of 
the functions of an interpreter and a com pil- 
ar; 

i 

Interpreter 

^. Examines BASIC program statements. 



2, Determines the action requested, 

3, Calls machine code subroutine(s) that 
do the action. 

Compiler 

1, Examines BASIC program statements, 

2, Generates equivalent machine codes, 

3, Saves generated machine code, 

A compiler generates a genuine machine 
code replacement for a BASIC program, 
while an interpreter only fakes it, 

The outstanding feature of an interpreter 
is its ability to make the computer seem 
ready to do your every bidding— to be inter- 
active. It immediately does what is request- 
ed. This nicety is not free, though; it costs in 
speed. For example, when you code a FOR- 
NEXT loop, an interpreter must re-interpret 
each instruction every single time it goes 
through the loop! To enhance the interac- 
tive feature, the interpreter is constantly 
scanning the keyboard (taking valuable 
time) so the computer will always remain 
ready to do your bidding. 

With a compiler, getting from the pro- 
gram coding stage to the program running 
stage is less convenient, but what the com- 
piler lacks in convenience, it makes up for in 
program execution speed. Compare the 
programming steps required with an inter- 
preter versus that of a compiler: 



Interpreter Programming Steps 

1, Code program statement(s), 

2, Run program, 

(The program doesn't work the first time? 
Locate the offending statement and re- 
peat the above steps until it does work). 

Compiler Programming Steps 

1, Code program statement(s) (source). 



2, Run statements through compiler to 
produce machine code output (object). 

3, Machine code program is saved on 
tape or disk, 

4, Save source program statements from 
step 1, 

5, Reload machine code program from 
tape or disk (step 3). 

6, Run machine code program. 

(The program doesn't work right? Uh-oh. 
You're going to have to reload the compil- 
er program, reload your saved source 
code from step 4, and repeal aii the steps 
to replace the offending statements. You 
must repeat this until the program 
works). 

Using a compiler seems like a lot of has- 
sle, doesn't it? Ah, but the final result 
makes it ail worth it! The machine code out- 
put from a compiler can be run directly, 
without the need for an Interpreter standing 
between your BASIC program and the ma- 
chine. As a result, compiled programs will 
typically run 10 to 20 times faster than the 
same source program running through an 
interpreter. Sure beats that 2X clock mod! 

Assemblers 

An assembler is similar to a compiler in 
function. The difference is that an assem- 
bler is used to make coding direct machine 
code a little easier tor us humans. For ex- 
ample, to the TRS-80, 128 (hexadecimal 80) 
means "take the contents of the B register 
and add it to the A register." You have to 
have a really good memory to remember all 
256 possible machine code instructions by 
their number codes! An assembler simply 
allows you to code "ADD A,B" and it will re- 
place that mnemonic phrase with 128 when 
you run the assembler against your mne- 
monic machine code. See Figs. 1 and 2. 
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DIAGRAM OF INT£RPRET£R FUNCriON 



INTERPFtETCR 




COMPUTER 





F\g. 1. The interpreter stands between your 
program and the computer. Your program 
simply telis the interpreter which machine 
code $ubroutine(s) to run to get the resuit 
you want. 

DIAGRAM OF COMPILER OR ASSEMBLER STEPS 



C0MPI1.ER 

OH 

ASSEHBLEtl 



SOURCE OBJECT 

CREATING fl DIHECTLr "RUNABLE" MSCHIM CODE EQUIVALENT 



Fig. 2. in the compiler method, there Is ulti- 
mately nothing standing between the com- 
puter and your program. As a resuit, execu- 
tion is much faster. However, a compiler in- 
volves many more steps to get from the 
source program to the directly executable 
object machine code. 



Subroutines and Macros 

There are methods available to you as a 
programmer that will spare you the tedium 
of repetitive coding. The most commonly 
used is the subroutine. Compilers and as- 
semblers also often incorporate an addi- 
tional method— the macro. 

Using subroutines, you code only a sin- 
gle copy of your repetitive code, and trigger 
its execution with a subroutine ca{l (GOSUB 
in BASIC). At the end of your subroutine 
code you must return control back to your 
calling program (RETURN in BASIC). You 
need to code your subroutine only once, yet 
you can use it often. Subroutines reduce 
the over-ail size of the program as well as 
provide relief for the programmer's poor 
numb fingers. 

With all its virtues, a subroutine does 
cost time. When the computer is told to exe- 
cute a subroutine, it takes time for the com- 
puter to figure out where the subroutine is, 
execute the subroutine, and then determine 
where to resume processing again. With 
some compilers or assemblers, there is an 
alternate approach to the subroutine: the 
macro. 

The macro is best thought of as a kind of 
in-line subroutine. A macro inserts the sub- 
routine code into your program each time it 
is used. Using a hypothetical programming 
language, let's illustrate how a macro is 
used. 

This code tells the computer this Is a ma- 
cro routine. 



ADDEMUP MACRO: 
INPUT X 
Y = X + Y 
END MACRO 

Before you run the compiler against your 
program, the following shows how you 

^See List of Aiivertisers on page 306 



might code ADDEMUP to sum three input 
numbers and display a total: 

Y = 

ADDEMUP 

ADDEMUP 

ADDEMUP 

DISPLAY Y 

STOP 

When the compiler is run against your 
program, it wilt see ADDEMUP and replace 
ADDEMUP with the actual code it repre- 
sents: 

AHer compiler macro expansion: 
Y = 



• MACRO REPLACED. 



• MACRO REPLACED. 



-MACRO REPLACED. 



ADDEMUP 
INPUTX 

Y = X + Y 
ADDEMUP 
INPUT X 

Y = X + Y 
ADDEMUP 
INPUT X 

Y = X + Y 
DISPLAY Y 
STOP 



After macro expansion, the compiler will 
convert the expanded code into machine 
code. 

With the compiled program loaded into 
the computer and run, the computer will 
never know we coded all those commands 



with the help of a macro. 

Why not always code a subroutine for re- 
petitive code instead of a macro? After all, 
subroutines take less memory! Again, the 
reason goes back to the memory/run -time 
trade off. Even though a subroutine saves 
memory, it's slower. All those macro expan- 
sions for each use of the macro take mem- 
ory, but save time! 

Did you know when you compile a BASIC 
program, each BASIC statement could gen- 
erate several equivalent machine code in- 
structions? What does this mean? Your BA- 
SIC program statement is actually a macrol 
Ah-ha! ,,,,:,, 

Link Editors and Loaders 

A loader is a special loading program 
that will load your machine-code and move 
it around in memory. A link-editor is a fancy 
loader that will tie two or more programs 
with references to each other together into 
one big program. 

The link-editor allows you to code your 
program in modules if you like (modular pro- 
gramming). You can code each module sep- 
arately and then link-edit them together. 

You should now understand these com- 
puter terms a bit better. At least, better than 
the fellow who typed this graffiti on a com- 
puter in a Radio Shack store: Byte My 
Baud.* 



Computer Gaines! 

How can we fell you about 400 
computer games In one advertisement? 



We ve got the world s largest line of 
computer games. Over 400 in all. 
They re on cassette and disk for eight 
popular personal computers: Atari, 
Apple, Tl 99/4, PET, TRS-80, Sorcerer, 
SolandCP/M. 

From A to 7, Action Games to Z-Chess 
II, we've got loads ot best-sellers inclu- 
ding "Super Invader" for the Apple, a 
complete line of six Adventure games, 
Backgammon, Milestones and Cycle 
Jump 

Not only t^^at, we publish the best- 
selling booths, Basic Computer Games 
and More Basic Computer Games with 
over 500.000 copies in print- 

We ve also got a nifty board game, 
Compuferflage, sets of three binary dice, 
acrobatic toy robots, T-shirts and lots of 
other goodies. 

You 11 fine comprehensive descriptions 
of all of our software, books, games and 
peripherals in our huge 48-page catalog. 
Its unique in the small ccmputerfield. For 
your free copy, write or call us today or 
circle our number on the reader service 
card. 



5coc[<oe(e0 HI -scooe-oeeeo 



w -^ ic :u, 



Super Invader features superbr high- 
resolution graphics, nail-biting tension 
and hilarious antics by the moon crea- 
tures. 



GPeative 
GOiRpatiR{^ 



^512 



39 East Hanover Ave. 
Morris Plains, NJ 0/950 
Toll-free 800-631-8112 

InNJ 201-540-0445 
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The Newest Peripheral 
for your Microcomputer 

The Encyclopedia for the TRS-80* 



"^ 



What's the ke\- to getting the most from your TRS-80? No, 
it isn't disk drives nr printrrs or joj'stick.s it's information 
U'ithotil a fontimial supply of information and ideav. you 
can't realize the full [xjlential of the TRS-SO. 

Now. you'd think that the 150 pages oi articles published in 
80 Microcomputinjt each month \\ mild satisfy even the most 
vntaeious of TRS-80 iis«rs, But iiu! You're asked for ev'cii 
more information! 

Our response to the clamor ior additional information is 
the Errcvclopedia for the THS-8fl, a ten volume reference 
work tliat is u!»<>liitely packed with programs and articlci 
carefully selected to help you make the most of your 
microcomputer. Vou can comider the \oiumes of the liiKV- 
clopedia to Ix- iin extension ol the d<x^iimrntation that came 
with your TRS-SO. The articles and programs will \yc similar 
to tho«f found in 80 Microcomputin){. Each book is full of 
material on programming techniques, biLsiness, games, 
tutorials, education, utilities, interfacing you name it. 

Unlike LXHivcntioiia! encjclopi^dias, the Encyclopedia fur 
the TR&-80 will never betome siale or out of date 1 iial's 
tiwause the volumes ot the Encyclopedia are being Lssued 
one-at-a-lime, over a peritxj ol months. This means that each 
fK'w volume will reflwl the latest developments and 
discoveries, making this a living encyclopedia for TRS-SO 
iLscrs. 

Volume 1 \^ ill be oul in June. It's more than 270 pages in 
length . that's 270 pages of sohd inloruialion no adver- 
tising. Here's a sample ot what s included m Volume i: 



The Encvclopedia for the TRS-80 Ls available in tw o c<.ii- 
tions The deluxe COLLECTOHSIDITION is a handsome 
green and black hardcover volume, with the title stamped in 
gold and a colorful protective dust jacket pnisiiicd These 
durable volumes arc jx-rftvl for school and lihi-m use and 
make a handsome addition tu yxir personal bbrar>', They are 
ri'.atlable for $19.95 per volume Also available is the more 
economical snftcover edition. This Cllll^:li^^ :ill tl>e informa- 
tion in the hardctis ei txiition, but at a sa\ mgs ol ■net 45 % . It 
is mggedly Ixtund for iieaw use and has an altractue green, 
ivorv. and gold cover. AvBilahlc fur S 10 95 per volume Both 
editions are in an eas>'-tQ-readb ■ M" format whichisperfeit 
b<nind to remain flat when open«i. 



80 MICROCOMPUTING 
SPECIAL INTRODUCTORY OFFER 



UiiV-i tin enlitr V' (ihe flr*t Im) voI- 

atimi 111 itu- Km-lclnpnlii fnr thp 

TRS-80 iiwl p«*HT (he tMilh M.iui.«- 

FHEEI 

TAV OM V tlM.DD for the Lnl ien 

M.li,ri.,^ ,r( ihr deluw hirdctnw COI. 

I H T(1R s 1-niTlON-i. rrunUr 

lIM..'Wvalii.' 

r.Sl OSL-i tSJOO Ini (he liiM i,-ii 

lull. mm ii( ihe «iftcviv!-t pdillfHi - a 

"^'>]«r tlOe.50^■JuF 

ri.i:S- Tim ,p«.nil <>f(ci induda Ul'S 

iliipping kimI hamilln)! tliarura (■r. luldi 

ti'irial iiisiTiesr>( ItB.OOl 

Bi'Bl uJ'yuLHin li\ iHisiiiK ilw \iK..i.- «■■ 

^JlJ^e viilijinf prKtfi lor tuEurif v-oJunwh 
IrMi L'a:mol lus*-l Previpw tlie firct Mil 



• imr nf itir !e» and |ud{p for ^inirwll U 
itH' Enrvciopcdia for the TRV HO dm-. 

rrtrf pte*H ••o'li fv*%U "T *^i^JT^Taf|f»TB, ]u»[ 
return 'he hni •oliiiT.r within leii it«« 
Hint HP ttili ri'fiiiMi ihi fnWrr amount of 
S'oijt |mrcfi«>e If al an> Uu»- nm are 
tUsHiUiJiwi. >im nia> f«nn.-l ihi- ji-iiiain. 
Miu loliinn* and t'T«-i\f a n^nlKt tor the 
full ..Joe of Iluse voiimla l>ie Uwks 
Hill be autiinutioalK shi|>|>nj li> mxi 
r\'rr. H wtefa n» L'PS Takt «(fv«nt»iBr 
iif ihmiffer iHiH ! Ymj ran't sfforti In mBK 
out L'n thr Fk-wrst ]**Ti]ih(Tal ihr Vn- 
nclopedi. for thr TRS-80 Call v^-if 
or<ier in Hwl«\ TOI.I, mEF at 1-SOO- 
25N-.'M7'J. r.r iw thr(-o.ip..n h<-li«i or it* 
iX»taBe-i«nl piBtcaid iiM-luiliii in thu. 
imea/IIiF 
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Four Graphics Metiiods — Improved 
techniques for dealing with the 
TRS-80's low resolution graph- 
ics. 

ITY Interface — Build an interface 
hooktip a Teiet\-pe to a TBS-80 

The President Decides— A ihrilUng 
simulation that lets you make de- 
cisions as if you vsere President of 
the United Slates 

Measure Instrucdonal Effectiveness 
— Many programs teach or tutor; 
this one helps determine the ef- 
fectiveness of the lessons 

The Invoice — A program for small 
businesses which produces cus- 
tom invoices 

PurK-h Out Your Disks— Double 
your disk storage in seven easy- 
steps 



1 



THE Encyclopedia for the TRS-80* 

YES, please raserve to> iT>e a complete set o* me Pitst ten volumes ot trie EncyctofWdia lor Itw TRS-SO. 

I want 10 go lirsl class so send me the deluxe hardlXHjnd COLLECTOR'S EDITION — a $199 50 value tor 
S1M.00 postpaid. A lotai savings ot S34.95 over \ne single volume price! lOcdO'- »EN81(XI) 
Send mettle bfue collar" sotlcovei edition— the same intormatlon at a substantially lower price, a St 09. 50 
value tof t83.00 po«tpatdl A total savings ol $25 95 over the single volume prlcel lOfdef #EN8080) 
YES, I want to Start my Encyclopedia collection due out m June. 

Volume 1 or the dolunoharocover COLLECTOR'S EDITON a$l995 lOrder •ENeiOir* 

Volume 1 0' the So ft cover edition a $10 95 (Order (»EN80fll)" 

I 

' '(Please enclose $1.50 pei volume ten snipptng and handling All volumes will be shipped UPS il th« ootHilele 
slFBet address IS provided, otherwise shipment is by 4lh class t)ooti rate ) Allow 4-6 weeks tor delivery. 



L 



^^_Payment enclosed Please charge to my VISA 

Card* MC Interbank**. 

Name^ _^__„ 

A ddress 

City 

Signature 



Mastercard __ 
Expires^ 



^AmEx 



.Stelt_ 



-ZiP- 



80 MlcrDcompultr>9. P)na St , PatartMrough. NH 0345B 

■JR&flO Is a IrademarV o' Tandy Corp. 
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A mainframe tool for the 
businesslike. It's waiting in the wings. 




Roberf L Bradley 

10720 Danbury 

Baton Houge, LA 70809 



Several languages are vying for primacy 
among microcomputer users. What we 
call BASIC is really a generic term for each 
manufacturer's version of an equation- 
oriented language. The diversity of BASIC 
precludes its consideration as a single enti- 
ty. We need fevi/er, not more, languages. 

The need for a minimum number of lan- 
guages is apparent. If we are to commu- 
nicate ideas effectively, we must have an 
understanding of the rules. The more lan- 
guages there are, the greater the number of 
rules. Program portability becomes more 
difficult with the increasing number of lan- 
guages. The more conversions required, the 
higher the probability of errors and misin- 
terpretations. 

Ideally, an industry committee should be 
formed to standardize a language, as did 
the Conference on Data Systems Language 
(CODASYL) more than 20 years ago, vi^hlch 
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COBOL: 
Ready and 

Waiting 



established an English-based language un- 
derstandable to businessmen and capable 
of being easily changed. The language that 
CODASYL defined and developed was 
COBOL (COmmon Business Oriented Lan- 
guage). 

COBOL is now the most commonly used 
language for business applications on 
mainframes. What has this to do with mi- 
crocomputers? As memory gets cheaper 
and the trend toward larger memories con- 
tinues, COBOL is waiting in the wings for 
serious business programmers. Several In- 
dependent software firms have released 
COBOL compilers, and Tandy Corporation 
recently announced one for the TRS-80 
Model II. 

The Radio Shacit version has the greatest 
potential for widespread acceptance be- 
cause of Tandy's marketing power. The 
compiler is software-based; there are no 
hardware modifications needed to run it on 



the Model II. Although some of the com- 
mands found in standardized COBOL are 
not present in the Radio Shacit compiler, 
the TRS-80 version represents a giant stride 
in providing mainframe computing tools to 
micros. The documentation is well written 
and, except for the laclt of an index, pro- 
vides an excellent guide to the rules of the 
language. 

COBOL Structure 

I wish to Impart the flavor of the language 
and make a few comparisons with what we 
call BASIC. The application which I shall 
use to illustrate COBOL is simple, but by re- 
fining the programming technique I hope to 
demonstrate the power of the language. 
The purpose of the program is to calculate a 
few commonly used business financial ra- 
tios: 

(1) Profit margin = net income/net sales 

(2) Current ratio = current assets/current 



IDENTIFICATION DIVISION. 

PROGRAM-ID. FINRATIO. 

AUTHOR. R L BRADLEY, 

INSTALLATION. HOME. 

DATE-WRITTEN. JULY 80. 



CALCULATE BUSINESS FINANCIAL RATIOS 



Program Listing 1. Identification Division. 



STAND OP, CP/M USERS 




For the past few months you have patiently endured the 
indignity of watching your friends show off their flashy 
visible number cruncher on their game-playing computer 
and longed for something as slick. 

You seriously considered buying their computer, but you 
just couldn't give up the benefits of the CP/M operating 
system. 

Well, say hello to TARGET^", the best business planning 
system available on micros today (and some big 
computers besides). 

Talk about a blank ledger sheet or columnar tabulator! 
Target is much more than that. Sure, just like their 
product, you can fill in the rows and columns as you see fit 
and the numbers will whiz by you on the screen. But, we 
let you create your report in English, not in some combina- 
tion of reverse Polish notation and algebraic matrix 
languages. 

Oi//- Target on Voi/r system. . . 

LINE 1 SALES = 100 200 300 400 
LINE2EXP =GROW50BY15% 
LINE 3 NET = SALES - EXP 

Their Product on Their System . . . 
SALES 100 200 300 400 
EXP50 +82*1.15 +C2"1 +D2"1.15 
NET +81-82 +C1-C2 +D1-D2 +E1-E2 

At least, that is what their product might look like if you 
could see all of your data and calculation rules at the same 
time, which you can't. If you think that it is an easy 
approach for debugging, guess again. 

Target^" displays a full screen of results or data and 
calculation rules at your command. And, it runs on your 
system. How much more could you ask? 

Lots! And TARGET™ delivers. We give you the ability to: 
• Obtain hard copy printouts of both the results and your 

set of data and calculation rules used to create those 

results. 



CP/M i* 8 rogittered tradafnark of DIgrtsI Rmearch. 
SoftCard n a trademark ot Mictotofl. 
TRS-80 i* a tradBmai* of Tandy Corporation. 



• Write the results of data and calculation rules to the disk 
as formatted files for word processing. 

• Use full conditionals (IF . . . THEN . . . ELSE) in your set 
of rules and stack conditionats within conditionals. 

• Build powerful models with commands such as GROW, 
MIN, MAX, AVE, CUM, GREATER, LESSER, SUM. 

• Edit lines with ease. 

• Enter rules and data in any order you wish. 
TARGET^"^ will automatically sort rows in ascending 
order and process vour model correctly even if LINE 
33 SALARIES needs to be calculated before LINE 3 
EXPENSES. 

There is so much more about the TARGET^" Planner that 
will impress you. Our manual explains not just what a 
command or function is, but how to use the functions in 
everyday business situations. Our manual and our news- 
letter give you illustrative examples of business planning 
problems and how TARGET^" can help you solve those 
problems. For example, we will show you how to quickly 
determine the payback period for a proposed project. 

TARGET"" is a compiled system running under CP/M. 
There is no need to buy BASIC or FORTRAN or any other 
system software. And the price is only $195 for the 
TARGET'f" Planner, our basic system. 

Stand up and be proud, CP/M users. The best business 
planning system runs on the best operating system 
your computer. 

Advanced Management Strategies, Inc. 

1935 Cliff Valley Way, N.E.. Suite 200 

Atlanta. Georgia 30329 

404/634 9535 ^260 

P.S, When all of your friends start 
drooling over your product, 
tell them to cheer up. With 
Microsoft's great SoftCard 
and 16-K memory board, 
your friend's Apple can 
move up to your oper- 
ating system and run 

Targettm 



"The Radio Shack version 
(of COBOL) has the greatest potential 
for widespread acceptance, 
because of Tandy's marl<eting power.' 



liabilities 

(3) Quick ratio = quick assets/current 
liabilities 

All COBOL programs are divided into four 
major parts. They are, in order of appear- 
ance, the identification, environment, data, 
and procedure divisions. Divisions can be 
partitioned into sections, sections into 
paragraphs, paragraphs Into sentences. 

The identification division for the sample 
program is shown in Listing 1. This is the 
type of information one would expect to 
find in the remarks of a BASIC program. The 
difference is that here it has been standard- 
ized. A COBOL comment statement, indi- 



cated by the ', states the purpose of the 
program. 

The environment division, shown In Pro- 
gram Listing 2, describes the hardware en- 
vironment. If we were using files in this pro- 
gram, the relationship between their pro- 
gram representations and their physical 
counterparts would be established here. 

Program Listing 3 depicts the data divi- 
sion. Here we define the variables which are 
used in the program, as indicated by the 
code 77. Variable names can be quite de- 
scriptive without sacrificing their unique- 
ness; in fact, names can be up to 30 charac- 
ters in length. 



ENVIRONMENT DIVISION. 
CONFIGURATION SECTION. 
SOURCE-COMPUTER. 
OBJECT-COMPUTER. 



M0DELII-6')K. 
M0DELII-6AK. 



Program Listing 2. Environment Division. 



PROCEDURE DIVISION. 
PRINT-HEADING. 

DISPLAY "FINANCIAL RATIOS CALCULATION", LINE 1, POSITION 27, 
ERASE. DISPLAY "ENTER:", LINE 3, POSITION 27. 
DISPLAY "1. NET INCOME", LINE 5, POSITION 27. 
DISPLAY "2. NET SALES", LINE 7, POSITION 27- 

f ENTER-DATA. 
ACCEPT NET-INCOME, LINE 5, POSITION 50, PROMPT ".", CONVERT. 
HOVE NET-INCOME TO NET-INCOME-DISP . 
% DISPLAY NET-INCOME-DISP, LINE 5, POSITION 50. 
^^ ACCEPT NET-SALES, LINE 7, POSITION 50, PROMPT ".", CONVERT. 
MOVE NET-SALES TO NET-3ALES-DISP . 
DISPLAY NET-SALES-DISP, LINE 7, POSITION 50. 
CALCULATE-RATIO. 

DIVIDE NET-INCOME BY NET-SALES GIVING PROFIT-MARGIN ROUNDED, 
MULTIPLY PROFIT-MARGIN BY 100 GIVING PROGIT-MARGIN . 
MOVE PROFIT-MARGIN TO PROFIT-MARGIN-DISP. 
PRINT-RATIO. 
-,1 DISPLAY "PROFIT MARGIN :", LINE 10, POSITION 27. 
DISPLAY PROFIT-MARGIN-DISP, LINE 10, POSITION A3. 
'DISPLAY "%", LINE 10, POSITION 49- 
END PROGRAM. 

Program Listing 4. Procedure Division. 



DATA DIVISION. 




WORKING-STORAGE SECTION. 




77 


NET-INCOME 


PIC S9(7) COMP-3 VALUE 0. 


77 


NET-SALES 


PIC S9(7) COMP-3. 


^ 77 


NET-INCOME-DISP 


PIC $Z,ZZZ,ZZZ-. 


77 


NET-SALES-DISP 


PIC $Z,ZZZ,ZZZ. 


77 


PROFIT-MARGIN 


PIC S99V999 COMP-3. 


77 


PROFIT-MARGIN-DISP 


PIC -Z9.9. 




Program Listing 3. Data Division. 



The use of the PIC (or PICTURE) clause 
permits the definition of both the type and 
format of the variable. There are essentially 
two types of PICTURE clauses, those for In- 
ternal use (unedited) and those for input/ 
output (edited). An example of the unedited 
numeric type, as seen in the definition of 
the net-income variable, is signed (indicat- 
ed by the S) and has seven digits (the nine 
indicates any digit and the seven in paren- 
theses indicates the number of digits per- 
missible). 

A decimal position would be indicated by 
a V, as illustrated in the definition of profit- 
margin. The variable net-income-dlspuses 
an edited numeric clause. The $ symbol will 
be printed in the first print position. The Z in- 
dicates that if the resulting digit is a non- 
significant zero, nothing will be printed (in- 
cluding any intervening commas). Thus, a 
number such as 15872 would be printed as$ 
15,872. If the number were negative, $ 
15,872- would result. The clause COMP-3 
accompanies the unedited Items; this indi- 
cates packed decimal representation. Vari- 
ables may be initialized by use of the VAL- 
UE clause. 

Several advantages of the data division 
are evident. First, the format establishes a 
variable list, an optional exercise in BASIC. 
If the variable names chosen are descrip- 
tive ones, this list is excellent documenta- 
tion. Secondly, the format of any variable 
can be easily changed simply by modifying 
the PICTURE clause. The power of the edit- 
ing features permits virtually any format of 
input/output. One disadvantage of COBOL 
is that the representation of a variable for 
program internal use must be distinct from 
that for input/output purposes when the val- 
ue is numeric. Thus, two variables are 
sometimes required to denote the same 
value. 

The procedure division, shown in Pro- 
gram Listing 4, is the part that makes things 
happen. Statements are grouped into para- 
graphs, for which the programmer must se- 
lect names. A glance at the listing therefore 
enables one to obtain a quick summary of 
the actions that are taken. In this first exam- 
ple we are going to calculate only the profit 
margin. Additional statements could be 
used to calculate the other two ratios. 

Each statement in the procedure division 
begins with a command called a verb. In the 
PRINT-HEADING paragraph the DISPLAY 
verb outputs messages to the CRT at the 
screen positions indicated. The ENTER- 
DATA paragraph receives the data into the 
program by the use of the ACCEPT verb. 
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"Because (COBOL) is virtually 

self-documenting, tfie time 

required to understand 

someone else's program is minimal." 



The CONVERT clause in the ACCEPT state- 
ment changes the input to the format speci- 
fied by COMP-3 in the data division. In order 
to display the edited input on the CRT, the 
data must be MOVEd to a variabie defined 
for that format. The purpose of the state- 
ments in the CALCULATE-RATIO and 
PRINT-RATIO paragraphs can be easily 
interpreted. 

A Better Way 

Although this technique will accomplish 
the desired tasl^, if additional ratios are cai- 
culated, the amount of coding increases al- 
most proportionally. We must find a more 
compact way to calcuiate several ratios. In 
Program Listing 5 we have selected the vari- 
abie names to reflect their more generalized 
use. Each variable will assume several val- 
ues during the course of the program. This 
change enables us to utilize the PERFORM 
verb, a command analogous to GOSUB in 
BASIC. 

PERFORM transfers control to the para- 
graph specified. After the statements in 
that paragraph are executed, program flow 
is resumed at the statement following PER- 
FORM. In this program version we have two 
subroutines, or paragraphs, to be PER- 
FORMed, one for entering data and the 
other for calculating a ratio. With the power 
of the PERFORM verb we have noticeably 
increased the throughput of the program. 
We are now ready to expand the program to 
calculate all three ratios. The data and pro- 
cedure divisions for this effort are shown in 
Program Listing 6. The sample run appears 
in Program Listing 7. 

This was only a very brief glimpse at what 
COBOL can do. There are dozens of addi- 
tional features and commands too numer- 
ous even to mention. 

Your first reaction may be that it is much 
too wordy and time consuming, compared 
to BASIC. Yet this is one of COBOL's great 
strengths. Because it is virtually self-docu- 
menting, the time required to understand 
someone else's program is minimal. 

A second advantage is that COBOL is 
easier to learn than other languages. One 
can memorize the rules of BASIC quickly, 
but effective techniques can take months 
to master. Because of its more rigid format 
and its English language syntax, the learn- 
ing time for COBOL is shorter. 

Your final argument against COBOL may 
be that you simply don't need it. The lan- 
guage was designed for business applica- 
tions, and unless you are writing business 
programs which may be modified by some- 



one else, you really don't need COBOL. 
However, the day may be approaching 
when microcomputer users need a stan- 



dardized business language that provides 
easily understood programs which can be 
quickly modified. Many people, including 



PIC S9(7) COMP-3. 
PIC $Z,ZZZ,ZZZ-. 
PIC 99 COMP-3. 
PIC S9(7) COHP-3. 
PIC 39(7) COHP-3. 
PIC S99V999 COMP-3. 
PIC -Z9.9- 



DATA DIVISION. 
WORKING-STORAGE SECTION. 
77 EHTRY 
77 ENTRY-DISP 
77 LIHE-NO 
77 VAR1 
77 VA!i2 
77 RESULT 
77 RESULT-DISP 
PROCEDURE DIVISION. 
PRINT-HEADING. 

DISPLAY "FINANCIAL RATIOS CALCULATION", LINE 1, POSITION 27, 
ERASE. DISPLAY "ENTER:", LINE 3, POSITION 27. 
DISPLAY "1. NET INCOME", LINE 5, POSITION 27. 
DISPLAY "2. NET SALES", LINE 7, POSITION 27. 
ENTER-AND-CALCULATE. 

MOVE 5 TO LINE-NO. PERFORM ENTER-DATA. MOVE ENTRY TO VARl. 
MOVE 7 TO LINE-NO. PERFORM ENTER-DATA. MOVE ENTRY TO VAR2. 
PERFORM CALCULATE-RATIO. 
PRINT-RATIO. 

DISPLAY "PROFIT-MARGIN =", LINE 10, POSITION 27. 
DISPLAY RESULT-DISP, LINE 10, POSITION A3. 
DISPLAY "%", LINE 10, POSITION ^9. 
STOP RUN. 
ENTER-DATA. 

ACCEPT ENTRY, LINE LINE-NO, POSITION 50, PROMPT ".", 
CONVERT. 

MOVE EHTRY TO ENTRY-DISP. 

DISPLAY ENTRY-DISP, LINE LINE-NO, POSITION 50. 
CALCULATE-RATIO. 

DIVIDE VARl BY VAR2 GIVING RESULT. 
MULTIPLY RESULT BY 100 GIVING RESULT. 
MOVE RESULT TO RESULT-DISP. 
END PROGRAM. 

Program Listing 5. 



Program Listing 6. 



DATA DIVISION. 
WORKING-STORAGE SECTION. 
77 ENTRY 

ENTRY-DISP 
LINE-NO 
VARl 
VAR2 
RESULT 
RESULT-DISP 
PERCENT 
PROCEDURE DIVISION. 
PRINT-HEADING. 

DISPLAY "FINANCIAL RATIOS CALCULATION", LINE 1, POSITION 27, 
ERASE. DISPLAY "ENTER: ", LINE 3, POSITION 27. 



77 
77 
77 
77 
77 
77 
77 



PIC S9(7) COHP-3. 
PIC $Z,ZZZ,ZZZ-. 
PIC 99 COMP-3. 
PIC S9(7) COMP-3. 
PIC S9(7) COMP-3. 
PIC S99V999 CCMP-3. 
PIC -Z9.9. 
PIC 9 COMP-3. 



NET INCOME", LINE 5, POSITION 27- 
NET SALES", LINE 7, POSITION 27. 
CURRENT ASSETS", LINE 9. POSITION 27. 
CURRENT LIABILITIES", LINE 11, POSITION 27. 
QUICK ASSETS", LINE 13, POSITION 27. 



DISPLAY "1 . 
DISPLAY "2. 
DISPLAY "3. 
DISPLAY "A, 
DISPLAY "5. 
PROFIT-MARGIN. 

MOVE 5 TO LINE-NO. PERFORM ENTER-DftTA. HOVE ENTRY TO VARl. 
MOVE 7 TO LINE-NO. PERFORM ENTER-DATA. HOVE ENTRY TO VAR2 ■ 
MOVE 1 TO PERCENT. PERFORM CALCULATE-RATIO. MOVE TO PERCENT. 

Program continues 



i^See List ot Advertisers on page 306 
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DISPLAY "PROFIT MARGIN =" , LINE 16, POSITION 27- 

DISPLAY RESULT-DISP, LINE 16, POSITION '.3. 

DISPLAY "%", LIME 16, POSITION 50. 
CURRENT-RATIO. 

MOVE 9 TO LINE-NO. PERFORM ENTER-DATA. MOVE ENTRY TO VARl. 

MOVE 11 TO LINE-NO. PERFORM ENTER-DATA. MOVE ENTRY TO VAR2. 

PERFORM CALCULATE-RATIO. 

DISPLAY "CURRENT RATIO =", LINE 20, POSITION 27. 

DISPLAY RESULT-DISP, LINE 18, POSITION 43. 
QUICK-RATIO. 

MOVE 13 TO LINE-NO. PERFORM ENTER-DATA. MOVE ENTRY TO VARl 

PERFORM CALCULATE-RATIO. 

DISPLAY "QUICK RATIO =", LINE 20, POSITION 27. 

DISPLAY RESULT-DISP, LINE 20, POSITION ^3. 

STOP RUN. 
ENTER-DATA. 

ACCEPT ENTRY, LINE LINE-NO, POSITION 52, PROMPT ".", 

CONVERT. 

MOVE ENTRY TO ENTRY-DISP. 

DISPLAY ENTRY-DISP, LINE LINE-NO, POSITION 52. 
CALCULATE-RATIO. 

DIVIDE VARl BY VAfi2 GIVING RESULT. 

IF PERCENT=1, MULTIPLY RESULT BY 100 GIVING RESULT. 

HOVE RESULT TO RESULT-DISP. 
END PROGRAM. 



those at Tandy, are preparing for that day. 
When the time arrives, COBOL will be 
waiting. ■ 



FINANCIAL RATIOS CALCULATION 






ENTETt: 








1 . NET INCOME 


$ 




900 


2. NET SALES 


t 


6 


500 


3. CURRENT ASSETS 


$ 


15 


'tOO 


1,. CURRENT LIABILITIES 


4 


20 


800 


5- QUICK ASSETS 


t 


7 


600 


PROFIT HARGIN= 1 3 . 8'i% 








CURRENT FATIO= 0.74 








QUICK RATIO : 0.36 








Program Listing 7. 








UTILTTY 
FORCE 



THE VIDEO MANAGER ^«^ FIRST IN A SERIES 

Our Video Manager will enhance your computer's per- 
formance with these features: vertical printing on 
screen; forms design direct from screen to printer; send 
entire screen or any part to your printer; save screen to 
disk as a file and more. Written so you can utilize it from 
DOS or BASIC. Available on disic for: TRS-80,' Mod I TRS 
DOS 2.3, Mod II TRS DOS 1.2 & 2.0, CRW 2.0 or later, 
soon available for Mod HI. For your convenience with 
Visa or M/C phone in your order. Please add $2 for hand- 
ling and postage. ""Tandy corp 

SOFTWAREHOUSE IINTTERNATIOIMAL 

5070 N. Sixth St. Suite 103B 
Fresno, CA 93710 (209) 221-7877 

TO RECEIVE A FREE CATALOG PLEASE .^13 



THE BIGGEST NAME IN UTTLE COMPUTERS^ 

TRS-80 ' Model II— Your Best Buy 
In a Business Microcomputer 




on 



TRS-80 computers, 
software and peripherals 

Similar values on all merchandise 
CALL COLLECT: 

915-283-2920 

Van Horn Office Supply 

701 W. Broadw/ay -- P O Box 1060 
Van Horn, Texas 79855 

DEALER G055 ^ 

Form F48 Provided • 

Standard Warranty in Effect 
THE NATIONWIDE SUPERMAWCET OP SOUND'^ 



^137 
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ALPHA BYTE DOES IT AGAIN... 




Call us for our never undersold price. 

fiLPiin 

BYTE e, 
STORE/ 

[213] 883-8594 

5115 Douglas Fir Road • Suite B • Calabasas, CA 91302 




GENERAL 



An introduction to an 

interpreter listing for the exciting new education language. 




Pilot 

Language of Computer 

Aided Instruction 



Randy Hawkins 
6214 Hidden Cove 
Corpus Christi, TX 78412 



On« of the most exciting applications 
for the home computer is computer 
aided instruction (CAI). Not only is the com- 
puter infinitely patient with the user, but the 
noveity of using a computer in learning, es- 
pecially for children, keeps the user in- 
trigued and involved during the entire les- 
son. A well written CAI program can both 
teach and entertain the student in virtually 
any subject area. 

However, to communicate ideas and con- 
cepts to the student, the programmer must 
first organize his ideas and, in turn, com- 
municate them to the computer. This in- 
volves an organized set of commands 
which make up a computer language. The 
TRS-80 uses BASIC which is both powerful 
and flexible, but taites time and effort to be- 
come proficient in. Often it takes months 
for the novice to become truly skilled in BA- 
SIC programming. This presents a problem; 
an expert in foreign language, for example, 
would be best suited for preparing a CAI 
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Program Listing 1. BASIC Program to Create the Pilot Interpreter. 

10 CLEAR1000:CLS:PRINT"THIS PROGRAM WILL PREPARE A SYSTEM TAPE T 

HAT CONTAINS THE" : PRINT"PILOT INTERPRETER FOR THE TRS-80. THE I 

NFORMATION IS NOW BEING" : PRINT"PREPARED ..." 

20 LN=90:FORI=1TO26!CS=0:LN=LN+10 

30 F0RJ=1T08:READX:AS=AS+CHR$(X) : CS=CS+X :NEXTJ:READXX : IFCSOXXTH 

ENPRINT"CHECKSUH ERROR IN LINE";LN;"— CHECK YOUR ENTRIES. ": STOP 

40 NEKTI:FORI=1TO25:CS=0:LN=LN+10 

50 FORJ=lT08:READX:BS=B$-hCHR5(X) :CS=CS+X:NEXTJ!READXX: IFCSOXXTH 

ENPRINT-'CHECKSUM ERROR IN LINE";LN;"— CHECK YOUR ENTRIES .": STOP 

60 NEXTI:A$=A$-»-"":ML$=CHRS(229)+CHRS(205)+CHRS(127)+CHR$(10)+CHR 

${205)+CHR$.(132)+CHR$(2)+CHR${6)+CHRS(3)+CHR$(126)+CHR?(205)+CHR 

${100)+CHR${2)+CHR${35)+CHRS(254)+CHR$(0)+CHR$(32}-HCHRS(245)+CHR 

S(16}+CHRS(245)+CHRS(205)+CHRS(248)+CHR$(1)+CHR5(225)+CHR$(201) 

70 POKE16526,PEEK(VARPTR(MLS)+l) :POKE16527 ,PEEK {VARPTR{HL$) +2) • X 

X=PEEK(VARPTR(A$)+I)+256*PEEK(VARPTR(AS)+2}:XX=XX+65535*(XX>3276 

75 PRINT:PRINT"WHAT SIZE COMPUTER ARE YOU" : INPUT"MAKING THIS TAP 

E FOR (4K,16K,32K)";MS$:IPHS$="16K"THEN90 

80 IFHSS="4K"THENPOKEXX+12 , 50 : POKEXX+13 , 48: P0KEXX-H4 , 49 : POKEXX+1 

5,55: POKEXX+ie , 55 : POKEXX+18 , 42 : POKEXX+24 ,78: POKEXX+25 , 60 : POKEXX+ 

29,78:P0KEXX+32,78:POKEXX+44,78:POKEXX+162,79:POKEXX+267,79:POKE 

XX+295,79:POKEXX+15a,26:POKEXX+291,150:POKEXX+400,83:GOTO90 

85 IFMSS="32K"THENPOKEXX+12, 52: POKEXX+13, 56 : POKEXX+14, 56 :POKEXX+ 
15,52:POKEXX+16,57:POKEXX-fl8,58:POKEXX+24,190:POKEXX+25,172:POKE 
XX+29,190:POKEXX+32,190:POKEXX+44,190:POKEXX+162,191:POKEXX+267, 
191:POKEXX4-295,191:POKEXX+158,106:POKEXX+291,118:POKEXX+400,195 

86 IFMS$<>"32K"THEN75 

90 XX=XX+1:PRINT:PRINT"PREPARE YOUR CASSETTE BY PLACING IT IN TH 
E RECORD MODE.": INPUT-PRESS ENTER WHEN YOU ARE READY TO BEGIN";Z 
Z$:XX=USR(XX} 

Program conlinues 



"Pilot is amazingly simple, 

allowing experienced programmers 

and non-computerists alike 

to prepare useful programs." 



program in this area, but is not likely to de- 
vote tine time and energy necessary to learn 
BASIC programming. 

Enter the Pilot language. Pilot {Pro- 
grammed Inquiry Learning Or Teaching) Is 
written expressly for computer aided in- 
struction applications. The structure and 
commands of Pilot are extremely versatile 
and, above all, easily learned in a single ses- 
sion. 

Pilot was developed by Dr. John Stark- 
weather in the mid-70's. From its origins, as 
a method of teaching pharmacology to 
medical students, it has expanded to many 
different dialects and systems. The version 
presented in this article implements most 
of the standard features of Pilot and also 
utilizes some of the best features of BASIC 
as well as Level II text editing capabilities. 
Unlike several other TRS-80 Pilot interpret- 
ers, this Pilot interpreter makes it very sim- 
ple to construct, load, save and execute CAI 
programs. 

The Pilot interpreter is a machine lan- 
guage program which resides In the highest 
300 bytes of memory. However, absolutely 
no knowledge of machine language is nec- 
essary to use Pilot. A BASIC program is pre- 



sented which will construct a System tape 
containing the machine language Pilot pro- 
gram and even teach you how to load it. An 
assembly language listing of the interpreter 
is also included for those who may wish to 
study the program and possibly improve it. 
Finally, a Pilot program Is presented to 
teach you the finer points of Pilot program- 
ming. This is the ultimate use of Pilot — a Pi- 
lot program to teach Pilot. 

An Introduction to the Language 

Let us first begin with an introduction to 
the Pilot language. Pilot is strictly a dia- 
logue-oriented computer language. It will 
not balance your checkbook, solve trigo- 
nometry problems, or prepare a mailing list. 
It does, however, deal in interactive ques- 
tion-answer exchanges which are required 
for CAI applications. Pilot Is amazingly sim- 
ple, allowing experienced programmers 
and non-computerists alike to prepare use- 
ful programs. We wilt assume you know ab- 
solutely nothing about computer program- 
ming. 

When programming the computer, you 
must first decide how to present the infor- 
mation to the student along with what Infor- 




mation is to be expected of the students in 
response to the computer's questions. The 
program might begin by presenting a para- 
graph of information, and then asking a se- 
ries of questions to see if the student under- 
stands. This sequence can be reduced to 
the following steps: 

•Type the introductory message on the 
screen for the student to study and 
learn. 

•Clear the screen and ask a question to 
see how well the student has learned 
the material. 

•Compare the student's response with 
the correct answer. If the answer is cor- 
rect, proceed to the next section or 
question. 

•Compare the student's answer with 
some incorrect responses and explain 
why, in each case, the answer was 
wrong. If a complete review is neces- 
sary, return to step 1. If a second try is 
appropriate, return to step 2. 
If you understand the process illustrated 
above, then preparing CAI programs using 
Pilot should be very easy. All Pilot com- 
mands are represented by a single letter. 
The letters correspond to easily remem- 
bered phrases as listed below: 

T— Type the following message on the TV 

screen. 
A— Ask the student the following question 

and wait for an answer. 
M— Match the student's answer with the 

list of valid responses and decide 

whether or not they match. 
J— Jump to the listed step number. 
E— End this program. 
C— Clear the screen before typing this 

message. 
W— Clear the screen and type the following 

message in wide letters. 

A Pilot command consists of one of the 
above command letters, followed by a quo- 
tation mark and any text needed with that 
command. The quotation mark is a special 
delimiter which separates the command let- 
ter and the rest of the statement. (Some ver- 
sions of Pilot use the colon.) Only one quo- 
tation mark can be found in one Pilot state- 
ment; If quotes are needed you can substi- 
tute apostrophes for them. 

Every Pilot statement must also have a 
line number. These numbers correspond to 
the step numbers used in the above discus- 
sion. The first step must have the lowest 
line number, the second step the second 
line number, and so on. When programming 
use multiples of 10. This way you may add 
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"All Pilot commands 
are represented by 
a single letter." 



440 DATA154, 10, 205, 189, 15, 205, 167, 40, 985 

450 DATA118,14,e9,35,126,254,34,32,702 

460 DATA23 1,229, 246, 6 0,104, 15 2, 127, 24, 117 3 

470 DATA48, 35, 126, 254, 34, 32, 222, 35, 786 

480 DATA197,20 5,90,30,42,164,64,125,917 

490 DATA180,40,27,7 8,35,70,197,35,66 2 

500 DATA126,ia7,40,3,225,24,240,35,8B0 

510 DATA126,186,40,3,225,24,232,43,879 

520 DATA43, 43, 193, 193, 24, 137, 193, 24, 850 

530 DATA180,35,17,232,65,126,254,47,956 

540 DATA40, 28, 254, 0,40, 24, 235, 70, 691 

550 DATA235,184,32,4,35,19,24,237,770 

560 DATA35, 126, 254, 0,40, 6, 254, 47, 76 2 

570 DATA40, 223, 24, 244, 14, 78, 225, 24, 872 

580 DATA13 8, 6 9, 82, 82, 7 9, 82, 32, 73, 6 37 

590 DATA78, 32, 76, 73, 78, 69, 0,131, 537 

600 DATA120, 0,0, 0,0, 0,0, 0,120 

700 PRINT:PRINT"THE MACHINE LANGUAGE PROGRAM HAS BEEN SAVED ON Y 

OUR TAPE,"!lNPUT"PRESS ENTER WHEN YOU ARE READY TO LEARN HOW TO 

USE 1T";ZZS 

710 CLS:PRINT"HEMORY SI ZE?" : PRINTe704 , "THIS IS THE WRY THE SCREE 

N LOOKS AFTER YOU FIRST TURN ON THE" : PRINT"TRS-80 . AT THIS POIN 

r, YOU SHOULD JUST PRESS ENTER — NO NUHBERHUST BE ENTERED TO PR 

ESERVE MEMORY, PRESS THE ENTER KEY NOW. " : PRINT@13 ,CHR$ (95) 

720 IFINKEYS<>CHRS{13)THEN720ELSEPRINTei3," " : PRINT'RADIO SHACK 

LEVEL II BASIC":PRINT"READY":PRINT">";CHRS(95) ;CHRS(31) 

730 PRINTe704,"THE PILOT TAPE IS A MACHINE LANGUAGE PROGRAM SO Y 

00 MUST USE":PRINT"THE SYSTEM COMMAND TO ENTER IT. AT THIS POINT 

YOU WOULD TYPE THEWORD 'SYSTEM' LIKE THIS ..." 
7 40 PRINTei9 4,; : A$=''SYSTEM" :F0RI=lT06 : FORTI=1TO500 :NEXTTI : PRINTC 
HRS(24) ;MID$(AS,I,1);CHRS(95) ;:NEXTI:PRINTe862,"AND NOW PRESS EN 
TER ..." 

750 IFINKEYS<>CHR$(13)THEN750ELSEPR1NT@199," " :PRINTe320 , " *? ";C 
HRS(95) ;CHRS(31) ; :PRINT@704,"THE COMPUTER IS WAITING FOR THE NAM 
E OF THE PROGRAM YOU WISH TO" : PRINT"LOAD — WHICH IS OF COURSE ' 
PILOT'. YOU SHOULD TYPE IN THE WORD'PILOT' LIKE THIS ..."; 
760 PRINTg324,f rASs" PILOT": FORI =1TO5:FORTI=1TO500:NEXTTI:PRINTCH 
R$(24) ;MIDS(A$,I,1) fCHRS(95) ;:NEXTI:PRINTg862,"AND THEN PRESS EN 
TER ..." 

770 IFINKEYS<>CHR$(13)THEN770ELSEPRINTe329," ";CHR$(31) jPRINTg70 
4, "THE RECORDER WILL TURN ON (IF YOU HAVE IT IN THE PLAY SETTING 
)":PRINT"AND LOAD THE SHORT PROGRAM, THE ASTERISKS WILL BLINK L 
IKE THIS.":FORTI=1TO500:NEXTTI 

780 PRINT@62, "**";: FORI =lTO7:FORTI=lTO10a+RND( 200) :NEXTTI : PRINTS 
63," "; :FORTI=1TO100+RND(200) : NEXTTI : PRINT^63 , " * " ; :NEXTI 
790 CLS:PRINT"TRS-80 PILOT INTERPRETER &": PRINT-RADIO SHACK LEVE 
lA 11 BASIC":PRINT"READY":PRINT">";CHR5(95) :PRINT@704,"THE SCREEN 

KILL IMMEDIATELY CLEAR LEAVING A DISPLAY LIKE THE" : PRINT"ONE AB 
OVE. THE PILOT INTERPRETER IS NOW ACTIVATED AND READY TO" 
600 PRINT"USE. THE COMMAND 'NAME' EXECUTES THE PILOT PROGRAM. ":F 
ORTI=1TO1000:NEXTTI:PRINT?384, "WOULD YOU LIKE TO SEE THESE INSTR 
UCTIONS AGAIN (Y/N) ?" 

810 ZZS=INKEyS:IFZZ5="Y"THEN710ELSEIFZZS="N"THEN820ELSE810 
820 PRINT"ARE YOU READY TO TRY YOUR PILOT TAPE (Y/N) ?" 
830 ZZS=INKEY$:IFZZ5='Y"THEN840ELSEIFZZS="N"THENENDELSE830 
840 POKE16526,0:POKE16527,fl;X=USR(0) 



Program Listing 2. Pilot Program to Teach Pilot Programming. 



tV^E^ 



^L^A°N^G U^A^g'e 



F 

COMPUTER AIDED 
INSTRUCTION. . . 

20 T"PILOT IS A LANGUAGE THAT WAS 

CREATED BY DR. JOHN STARKWEATHERIN THE MID-70 'S AND INTENDED TO 

BE THE IDEAL METHOD OF USING THECOMPUTER AS A TEACHING DEVICE. 



Du9 lo a printing •fror, tha twchward apotlrophM In llnm 310-330 ahould bo SHIFT@a. 



Program contmues 



Statements later between steps if it be- 
comes necessary. 

Let's look at the shortest possible exam- 
ple program in Pilot. To print a simple mes- 
sage, a program of this type is needed: 10 
T'THIS IS A SAMPLE PROGRAM. Note the 
line number, the command letter T, the 
quote mark and the statement text. When 
executed by Pilot, it will print the message 
and then stop with no further commands 
found. 

To clear the screen and print the mes- 
sage in the upper left corner, type: 10 
C'THIS IS A SAMPLE PROGRAM. Similarly, 
10 W'THIS IS A SAMPLE PROGRAM, will 
clear the screen and print the message In 
wide letters (32 characters per line) in the 
upper left. 

Although it is not required, one could add 
a statement lo signal the end of the pro- 
gram. 10 T'THIS IS A SAMPLE PROGRAM. 
20 E". 

These three statements— T, C and W— 
are very useful for displaying information 
on the screen. In practice, more than half of 
the statements In a Pilot program will prob- 
ably be one of these three varieties. 

To ask the student a question, use the A, 
for ask. Since the A command will always 
be a question, the question mark need not 
be typed. For example, 10 A"WHAT IS 
YOUR NAME will print "WHAT IS YOUR 
NAME?" on the screen and wait for the stu- 
dent to type in his answer and then Enter. 
The A command can also be used to stop 
the program and wait for the student to En- 
ter to continue. For example, 10 A"ARE 
YOU READY TO CONTINUE will print the 
question and also wait for the student to 
Enter. Until this key is pressed, the com- 
puter will wait indefinitely for that response. 

When the A statement is used to halt pro- 
gram execution, the answer the student 
gives is not important. But when a specific 
question is asked, the student's answer is 
of prime importance. The input answer is 
stored in a special portion of the TRS-flO's 
memory, and until another question Is 
asked, the student's answer stays un- 
touched In that memory location. The most 
recent answer can be echoed back to the 
student by using the @ symbol in a T state- 
ment. Whenever the computer encounters 
the @ symbol, it is replaced by the charac- 
ters in the most recent answer. For exam- 
ple, 10 A"WHAT IS YOUR NAME, 20 T"HEL- 
LO @, WELCOME TO PILOT. 

The first statement asks "WHAT IS YOUR 
NAME?" and waits for user response. The 
answer Is stored, and when the Type com- 
mand in line 20 is executed, the answer Is 
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Get your flipper fingers ready for action in this 
real-time machine language game. 

Lots of sound and flashing graphics make this 
fast action game so much like the real thing 
that you'll have to remind yourself not to 
shake your TRS-80* Choose from five playing 
speeds to match your skill — but be prepared 
for a lot of practice if you ever hope to master 
the fastest speed. 

Can you beat your friends' scores? Will you 
avoid the dreaded "Bermuda Square?" Get 
PINBALL today and find out. Available for 
$14.95 on tape or $20.95 on disk. 



Try to keep up with the action and outscore 
your opponent in five minutes of one-on-one 
basketball. Steal the ball, duck around your 
opponent and slant toward the basket for a lay 
up! The graphics are based on a 3-dimension- 
al depiction of a basketball court, and ball 
dribbling sounds add to the realism. Compete 
against a friend or your computer 

It's all there but the cheers— on tape for only 
$14.95, disk version for $20.95. 





By Leo Christopherson 

Your 'droid has already learned NIM, so now 
it's time to teach it how to wield a laser sword! 
For DUEL-N-DROIDS, a new type of animation 
and high-quality sound has been developed by 
Leo Christopherson, author of "Android NIM;' 
"Dancing Demon" and other animations. 

Your 'droid starts out as a lowly clown. You teach 
it how to use a laser sword by controlling its 
movements. After it attains the rank of "Grand 
Master," enter it in the tournament against the 
program. Entertainment for all ages! 

Available for $14.95 on tape, $20.95 for disk. 



By Carl Miller 

A new and faster machine language approach to this 
classic (and addictive) space game. As you play, the 
al iens drop bombs, move from side to side, and try to 
overrun your bases. All you have to do is shoot them 
down. It'seasy— until they speed up their action! 

You choose the speed, enemy bomb frequency 
and accuracy, and how many shots and bases 
you have. Unlike other games of this type, you 
can move your base and simultaneously fire at 
the invaders. Fun for all ages and skill levels. It 
has full sound effects for even more excitement. 

Available for only $14.96 on tape or $20.95 on disk. 



Available now from these and other fine Acorn dealers 



ALL ACORN ENTERTAINMENT 
SOFTWARE IS NOW AVAILABLE 
FOR TRS-80* MODEL III I 



^^^^^B Software Products, Inc. 

^^^^^^^ (202) 544-4259 

634 North Carolina Avenue. S.E., Washington, DC. 20003 



Acorn 



^34 



ADVENTURE INTERNATIONAL 
Box 3435 
Longwood, FL 32750 

COMPUTER CENTER 
28351 Ford Rd. 
Garden City, Ml 48135 

DIGIBYTE COMPUTER CENTER 
31 East 31st SI. 
New York, NY 10016 

E,B, GARCIA & ASSOCIATES 
203 North WaOash 
Chicago, IL 60601 

HOBBY WORLD ELECTRONICS 
19511 Business Center Dr. 
North Ridge, CA 91324 



H S E COMPUTRONICS 
50 North PascacK 
Spring Valley, NY 10977 

MICRO MANAGEMENT SYSTEMS 
115-C Second Avenue, S.W, 
Cairo, GA 31728 

THE PROGRAM STORE 
4200 Wisconsin Ave. 
Washington, DC 20016 
and 

W. Bell Plaza 
6600 Secunty Blvd. 
Baltimore, MO 2120? 

' TRS-80 la a trademark ot Tandy Corp. 



-See List ot Advertisers on page 306 
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^ HARD DISK FOR ^ 

TRS-80* 
MODELS I & III 

S2495 

• 5 megabyte formatted capacity 

■ Controller, case, power supply, and cable 
Included 

• Software interface 

• LOW PRICE 

NOW Is the tinw to upgrade your Mod I or III 
lo Iricorporate the latest technology In 
retiable mass data storage. We are able to 
bring you Winchester disk drives for this 
fantastic price due to quantity purchases and 
high technology design. EVERYTHING need- 
ed to add a "Winnie" to your system is 
provided 
FEATURES: 

■ Seagate ST506 5.25 Inch disk drive 

• 5.0 Mbits/sec transfer rate 

■ 3 msec track- to- track access time 

■ S.33 msec latency 

• 32 256-byte sectors per track 

• 4 read/write heads 

• Winchester controller 

• Read/Write/Format macro-commands 
" Automatic CRC checking 

• Sector Interleave capability 

• "Bad Block" mark and detection 

• Software Interface to disk BASIC 

• Complete documentation 

• Cooling fan 

• 90 day wan-anty 

ACT NOW to take advantage of this special 
offer. S2495 Is the TOTAL price Inciuding 
shipping via UPS In the continental United 
Slates. 

Order Ispeclty MocM I or III] from: 

PSMInc. 

P.O. Box 1877 

Kettwlng, OH 45429 ^66 

Charge Cards & COD's WELCOME! 

Ohio resider^ts add sales tax. 

L^ 'TRS-SQ Is a trademark of Tandy Co. A 



MTS OFFERS A COMPLETE 

EDUCATIONAL PACKAGE FOR 
STUDENTS AND TEACHERS OF 
ENGINEERING 

MATHEMATICS 
STATISTICS 

DEVELOPED BY DR S W TURNER 
FOR THE TRS SO' 

^ L/A Vrl I DtTfTminci ri»tlK:«nl5 lor all polynomials up lo 

HiKdfgr^ ihfoijgh Ijrge no ofddFd poinTadimiT^bvmemorv^f?) 
Dala poinls may be input in any order pTosfam tabulates (orre la I Kin 
■.^iiefficienl^ lor vkeclion of besi lil 



CURVPLOT Rap..v 




uJi rdT>qe o( X & V and program labels bolh d 



POLYSOLV 



ix>lvnOFnk»J 111 driy degree for itW ifx^i*. irnliidfng real ind imaginarv 
PioqTdm uws ileuTivf procedirres mjIiii h auiOTnalicallv uary starting 

iHJi'il lo hdndEe dnv pqiidFion 

Anv of [hp abowp progrdnis on 

' -.swire lor L^ LVII 16 SS 2 lor ?9 OS 

kHmal«l disk lor 32K. ^SK disk 19 % 2 fo. ^2 % 

BONUS PACKAGE o, d,.. u^. a . 

puKjrd'ni piov-dt d ptjwerlul 10(>l lor ddid drid'v^iS OT insltucEloi^ 

ll^elui [i.t tm.ill bLiSinpssp). si bonis. cc)lle9e% personal use All ihree 
liri>irar^i .1" loTrndieri disk onk . 39(1) 

INDEX-80 tor (tie 5er»3us TRS 80* user sdve hours ol 
sedritimg rdpidly sedrches dll 1980 issues ol '80 Mii:rncompurin9'+ 
/or l<ev>~ords or subiecls 35* ariitles & reviews Willi Tiedily ?000 
subieurs stored Includes Alphabetiidf inden ol keywords subiecrs 
3 versions specify 
IbK lVncasBetle.32Kor MKdisk 19 9ft 

Malt Of Phon* (904) 897-3741 
FL rasidanis add 4% sales tan 
Shipping: add S1 .00; locaign S2.00 -' 



S3 



ENTERPRISES 



P.O. floj. 596 ^ictYille, FL 32S7B 



MICROCOMPUTER TECHNOLOGY AND SOnWAPE 



30 T"THERE ARE ONLY A FEW COMMANDS 

USED WITH PILOT, BUT THEY ARE 

POWERFUL ENOUGH TO CREATE INTER-ACTIVE LEARNING PROGRAMS THAT 

ARE EFFECTIVE FOR THE USER AND 

40 A"EASY TO CREATE. PRESS ENTER 

50 W"PILOT IS TEXT ORIENTED RATHER 

THAN MATHEMATICALLY ORIENTED SO 

THAT ALMOST ANY SUBJECT AREA CANBE PRESENTED IN A DIALOGUE-TYPE 

APPROACH. THE COMMANDS ARE 

SIMPLE AND EASILY LEARNED, SO 

THAT THOSE UNFAMILIAR WITH 

60 T"HIGHER LEVEL LANGUAGES CAN 

QUICKLY ADVANCE PAST THE DETAILSOF PROGRAMMING AND CONCENTRATE 

ON THE INFORMATION TO BE TAUGHT 

TO THE STUDENT. 

70 T''THIS TAPE WILL TEACH YOU PILOT 

PROGRAMMING BY USING THE PILOT 

LANGUAGE ITSELF, 

80 A" PLEASE PRESS ENTER TO BEGIN 

90 C"PILOT PROGRAMS USE ONLY 9 SPECIAL COMMAND SYMBOLS: T,A,M,J, 

E, 

C,W,Y, AND N. THE SYMBOLS CORRESPOND TO EASILY REMEMBERED 

COMMAND WORDS AS SUMMARIZED BELOW: 

T = TYPE A = ASK M = MATCH 

100 T" J = JUMP E = END C = CLEAR SCREEN 

Y = YES N = NO W = WIDE LETTERS 

110 T"PILOT PROGRAMS (USING THIS INTERPRETER) USE LINE NUMBERS. 

EACH 
PROGRAM STATEMENT IS NUMBERED IN ANY MANNER YOU WISH. USING THE 
AUTO COMMAND OF THE TRS-80, YOU AUTOMATICALLY GET LINE NUMBERS 
120 T"STARTING WITH 10 AND INCREMENTING BY 10. THE PILOT 
PROGRAM WILL FOLLOW THESE NUMBERS WHEN IT IS RUN — DOING THE 
INSTRUCTIONS AT LINE 10 FIRST, THEN THOSE AT LINE 20, LINE 30, 
AND SO ON. IN ADDITION, IF YOU WANT THE PROGRAM TO JUMP PAST 
130 T"A SECTION OR JUMP BACK TO A PREVIOUS COMMAND WE WILL SEE 
HOW THE JUMP COMMAND LOOKS FOR THE LINE NUMBER YOU SPECIFY. 
140 A"PLEASE PRESS ENTER TO CONTINUE 

150 C"PILOT STATEMENTS ALL LOOK BASICALLY THE SAME. THERE IS ALW 
AYS 

A LINE NUMBER, FOLLOWED BY A COMMAND LETTER, A QUOTATION MARK, 
AND THE INSTRUCTIONS OR MESSAGE TO BE DISPLAYED. FOR EXAMPLE, 
160 T"THIS SIMPLE ONE LINE PROGRAM WOULD DISPLAY THE MESSAGE 
<<THIS IS THE PILOT LANGUAGE, >> 

10 T"THIS IS THE PILOT LANGUAGE. 
170 T"THIS INTRODUCES THE T FOR TYPE COMMAND. WHATEVER MESSAGE I 
S 

FOUND AFTER THE QUOTATION MARK WILL BE TYPED OUT OR DISPLAYED ON 
THE VIDEO SCREEN. THERE MUST BE NO EXTRA SPACES BETWEEN THE 
180 T"LETTER T AND THE QUOTATION HARK. ALSO, THE QUOTATION MARK 
MUST NOT BE USED IN YOUR MESSAGE. IT CAN ONLY BE USED ONCE — 
TO DESIGNATE THE BEGINNING OF THE MESSAGE TO BE DISPLAYED. YOU 
190 T'CAN USE SUBSTITUTE QUOTE MARKS, SUCH AS <<THESE>>. 
200 A" 

PLEASE PRESS THE <<ENTER>> KEY TO CONTINUE YOUR INSTRUCTIONS 
210 C" 

THE C AND THE W COMMANDS ARE ACTUALLY ALTERNATE TYPE COMMANDS 
WITH SPECIAL FEATURES. THE C COMMAND CLEARS THE SCREEN AND THEN 
TYPES YOUR MESSAGE AT THE TOP LEFT HAND CORNER. FOR EXAMPLE, 
220 T" 10 C"THIS WILL ERASE THE SCREEN PLUS TYPE THIS MESSAGE. 
230 T" 

THE W COMMAND WILL DO ALL OF THE ABOVE PLUS CONVERT THE DISPLAY 
TO THE WIDE LETTERS (32 CHARACTERS PER LINE). FOR EXAMPLE, 

10 W"THIS WILL ERASE PLUS TYPE THE MESSAGE IN WIDE STYLE. 
240 A" 

PLEASE PRESS ENTER WHEN YOU HAVE STUDIED THE ABOVE INFORMATION 
250 W"THIS IS AN EXAMPLE OF THE WIDE 
LETTER OUTPUT. THE A COMMAND 

STANDS FOR <<ASK THIS QUESTION>>AND WAIT FOR A REPLY. AFTER 
260 T"TYPING YOUR MESSAGE THE TRS-80 
WILL TYPE A QUESTION HARK AND 

Program continues 
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ALLOW THE USER TO TYPE IN AN 
ANSWER. FOR EXAMPLE, 
270 T" 

10 A"WHAT IS YOUR ANSWER 
280 T" 

WILL TYPE THE MESSAGE AND A 

QUESTION MARK AND ALLOW THE USERTO TYPE IN HIS ANSWER AND PRESS 
290 A"ENTER WHEN COMPLETED. 
PRESS ENTER TO CONTINUE 

300 C"WHAT HAPPENS TO THE ANSWER TYPED IN BY THE USER? IT IS ST 
ORED 

IN A SPECIAL AREA OF THE COMPUTER'S MEMORY AND UNTIL ANOTHER 
QUESTION IS ASKED IT STAYS IN THAT SPECIAL MEMORY LOCATION. 
310 T"THE PROGRAM CAN RE-PRINT THE USER'S ANSWER BY USING THE ' 
SIGN IN THE PROGRAM. WHEN THE ' SIGN IS FOUND IN A TYPE 
STATEMENT, THE MOST RECENT USER'S ANSWER IS PRINTED RATHER THAN 
THE ' SIGN. FOR EXAMPLE, 
320 T" 10 A"WHAT IS YOUR ANSWER 

325 T" 20 T"YOUR ANSWER OF ' IS RIGHTI 

326 T''BE VERY CAREFUL WHEN TYPING — THE ^ SYMBOL AND THE SHIFT- 
ARE TWO DIFFERENT CHARACTERS TO THE COMPUTER. DO NOT 
ACCIDENTALLY HOLD THE SHIFT KEY DOWN WHILE TYPING THE ~ SYMBOL. 
330 T"WHATEVER THE USER TYPES IN RESPONSE TO THE QUESTION OF LIN 
E 10 

WILL BE ECHOED BACK IN LINE 20 IN PLACE OF THE ' SYMBOL. 

340 A''PLEASE PRESS ENTER TO CONTINUE 

350 C"THE NEXT QUESTION IS HOW DO WE USE THE ANSWER SUPPLIED BY 

THE 

USER — HOW DO WE CHECK TO SEE IF IT IS RIGHT OR WRONG? THIS IS 

DONE BY THE MATCH STATEMENT REPRESENTED BY THE M COMMAND, 

360 T-AFTER ASKING A QUESTION BY USING THE A COMMAND, WE CAN CHE 

CK 

TO SEE IF IT MATCHES A LIST OF POSSIBLE RESPONSES. FOR EXAMPLE, 

10 A"WHAT IS YOUR ANSWER 
20 M-'YES/OF COURSE/SURE/OK 

370 T"THIS SIMPLE PROGRAM WAITS FOR THE USER'S ANSWER. IT THEN 

COMPARES HIS RESPONSE TO THE LIST OF VALID RESPONSES. AS YOU 

380 T''CAN SEE, EACH DIFFERENT RESPONSE IS SEPARATED BY A / AND A 

NY 

NUMBER OF ANSWERS CAN BE INCLUDED AS LONG AS SLASHES SEPARATE 

THEM. SO THE ANSWER MATCHES ONE OF THE CORRECT RESPONSES — 

390 A"WHAT NEXT ? PRESS ENTER TO CONTINUE 

400 C"IF THE USER ANSWER MATCHES ANY ONE OF THE ITEMS IN THE MAT 

CH 

STATEMENT, A 'FLAG' IS SET TO 'YES'. IF THE ANSWER DOES NOT 

MATCH ANY ITEM, THE 'NO FLAG' IS SET. ONCE A 'FLAG' IS SET 

410 T"IT REMAINS AT THAT VALUE UNTIL THE NEXT MATCH STATEMENT. 

WE NOW INTRODUCE TWO NEW COMMAND LETTERS — Y AND N — FOR YES 

AND NO. WHEN THE Y LETTER IS FOUND AT THE BEGINNING OF A 

420 T"PILOT STATEMENT, IT MEANS 'IF THE YES FLAG HAS BEEN SET TH 

EN 

DO THIS STATEMENT — OTHERWISE SKIP THIS STATEMENT AND MOVE TO 

THE NEXT NUMBERED STATEMENT'. SIMILARLY, THE N COMMAND MEANS 

'IF THE NO FLAG HAS BEEN SET DO IT — ELSE SKIP IT' . 

425 A" 

WOULD YOU LIKE TO SEE AN EXAMPLE OF THE Y AND N STATEMENTS 

430 C" 10 A"WHAT IS YOUR ANSWER 
20 M"TEXAS 
30 YT'THAT IS RIGHTI 
40 NT''NO, THAT IS WRONG! 

440 T" 

IF THE USER TYPES IN 'TEXAS' IN RESPONSE TO THE QUESTION OF 

LINE 10, THE COMPUTER WILL WRITE THE MESSAGE OF LINE 30; IF IT 

450 T''DOES NOT MATCH, IT WRITES THE MESSAGE OF LINE 40. ANY 

STATEMENT CAN BE USED IN CONJUNCTION WITH THE Y AND N COMMANDS. 

AFTER DECIDING IF THE CORRECT FLAG HAS BEEN SET, THE STATEMENT 

IS EITHER EXECUTED NORMALLY OR SKIPPED COMPLETELY. 

455 A" 

PRESS ENTER TO CONTINUE 

Program continues 



ANNOUNCING 
MMSFORTH VERSION 2.0: 

MORE FOR YOUR RADIO SHACK 
TRS-80 MODEL I OR MODEL III ! 

* MORE SPEED 

1020 times (asier than Level II BASIC 

* MORE ROOM 

Vary compacl compiled code plus 
VIRTUAL MEMORY makes your RAM 
act larger Variable number ot block 
butters 31-char.. unique wofdnames 
use only 4 bytes in header' 

* MORE INSTRUCTIONS 

Add YOUF commands to Us 
79-STANDARD-pluS insl'uclion set' 
Far more oompleie Ihan most Fortbs 
single 8 double precision, arrays 
String-handling, cIocK, more 
-* MORE EASE 

Excellent fullscreen Editor, structured 
& modular programming 
Word search utility 
Optimised for your TRS-80 wilh key- 
board repeats, upper/lower case dis- 
play driver, full ASCII, single- & 
double-width graphics, etc 

■k MORE POWER 

Forth operating system 

Interpreter AND compiler 

8080 Assembler 

(280 Assembler also available) 

Intermix 35- to 80-lrack disk driyes 

Model III System can read, 

write 8 run Model I diskettes' 

VIRTUAL 110 tor video and printer, disk 



and tape (10-Megabyte hard disk available] 




FORTH 
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THE PROFESSIONAL FORTH 
FOR TRS-80 

(Over 1 ,500 systems in usel 
PricBs: 

MMSFORTH Disk Syslem V2 (requires 1 disk 
driue & 16K RAM, 32K for Model 111) S129.95' 

MMSFORTH Cassette Syslem V2 (requires 
Level II BASIC 8 16K RAM} $69,95' 

AND MMS GIVES IT 
PROFESSIONAL SUPPORT 

Source code provided 
MMSFORTH Newsletter 
Many demo programs aboard 
MMSFORTH User Groups 
Ineipensive upgrades lo latest version 
Programming staff can provide advice, 
modifications and custom programs, 
to tit YOUR needs, 

MMSFORTH UTILITIES DISKETTE; includes 
FLOATING POINT MATH (L.2 BASIC ROM rou- 
tines plus Compie« numbers, Rectangular-Polar 
coordinate conversions. Degrees mode, morel, 
plus a full Forth-style Z80 ASSEMBLER; plus a 
powerful CROSS-REFERENCER lo list Forth 
words by block and line. All on one diskette 
(requires fVlMSFOBTH V2.0, 1 Orive & 32K 
RAM) ... $39.95' 

THE DATAHANDLER V1 1. a very sophisticated 
database management syslem operable by non- 
programmers (requires MMSFORTH V2.0, 1 drive 
8 32K RAM) SS9.95' 

MMSFORTH GAMES DISKETTE, real-time 
graphics & board games w'source code- In- 
cludes BHEAKFORTH, CRASHFORTH, FREE- 
WAY, OTHELLO 8, TICTACFORTH (requires MMS 
FORTH V2.0, 1 drive S 32K RAM) . . S39.95' 

Other MMSFORTH products under devalopmenl 

FORTH BOOKS AVAILABLE 

MicroFORTH PRIMER comes with MMS 

FORTH; separaiely 115.00 

USING FORTH - more detailed and advanced 
than above .... .... $25.00 

THREADED INTERPRETIVE LANGUAGES - ad 
vancsd, excellent analysis of MMSFORTH-like 

language, $18,95 

PROGRAM DESIGN & CONSTRUCTION - intro 
to structured program, good tor Forth . . . S8.95 
FORTH 79 STANDARD MANUAL - official refer 
enceto79-STANDARDwDrdsel,etc . J10,OO 
CALTECH FORTH MANUAL ■ good on Forth in 

lernal structure, etc 110,00 

FORTH SPECIAL ISSUE, BYTE Magazine (Aug 
1980) - we stock this collector's item tor Forth 
users and beginners J4.00' 

' ORDERING INFORMATION. Software prices 
include manuals and require signing of a single 
syslem, smgle-user license SPECIF^Y for Model 
I or Model III! Add S2 00 S/H plus $1-00 per addi- 
tional book. Mass orders add 5% tax. Foreign 
orders add 20%, UPS COD, VISA & M/C ac- 
cepted; no unpaid purchase orders, please. 
Send SASE to' tree MMSFORTH inlotmalion 
GooO aealers sougM 
Gel MMSFORTH products from your 
computer dealer or 

MILLER MICROCOMPUTER ^112 
SERVICES (M7) 

61 Lake Shore Road, Natick, MA 01760 

(617)653-6136 ^ 



80 Microcomputing, July 1981 • 127 



"Any Pilot statement can be 
either executed or skipped 
depending on tfie current value 
of the yes/no flag." 



460 C" 

THE FINAL PILOT COMMAND IS J FOR JUMP. A JUMP STATEMENT MAY LOOK 

LIKE THIS 

10 J-SB 
470 T"THIS WOULD TELL THE COMPUTER TO JUMP AHEAD TO THE SET OF 
INSTRUCTIONS BEGINNING AT LINE 30. THE PILOT STATEMENT 

50 YJ''90 
480 T"WOULD JUMP TO LINE 90 IF THE YES FLAG HAD BEEN SET. 
490 A"PRESS ENTER TO CONTINUE 
500 C"HERE ARE SEVERAL OTHER MISCELLANEOUS HINTS AND TIPS: 

> ALL STANDARD LEVEL ii TEXT EDITING COMMANDS SHOULD BE USED 
TO ENTER YOUR PILOT PROGRAM. THESE INCLUDE LIST, AUTO, EDIT, 
NEW, AND DELETE. SEE THE LEVEL II MANUAL FOR DETAILS. 

510 T" 

> THE PILOT PROGRAM IS EXECUTED WITH THE 'NAME' COMMAND. THIS 
COMMAND IS NOT NORMALLY USED BY THE BASIC INTERPETER. REMEMBER 
THAT BASIC IS STILL AVAILABLE AND USES THE 'RUN' COMMAND. 

520 T" 

> THE PILOT PROGRAMS CAN BE SAVED AND LOADED USING THE CSAVE, 
CLOAD, AND CLOAD? COMMANDS OF LEVEL ii BASIC. AGAIN, SEE THE 
LEVEL ii MANUAL FOR- DETAILS. 

530 A" 

Program continues 



replaced at the location of the @ symbol. 

The answer can be compared to a list of 
other alphanumeric characters by using the 
Match command: 10 A"WHAT TYPE OF 
COMPUTER DO YOU HAVE 20 M"TRS-80. 
The answer supplied in line 10 is compared 
to the value in line 20; that Is, TRS-80. If the 
student's answer matches the word or 
words or numbers in the M statement exact- 
ly, then a yes flag is set. If It does not match, 
a no flag is set. The response to the user's 
answer is remembered until another Match 
statement is found. More than one answer 
may be valid. Multiple answers can be han- 
dled by separating them with slashes: 20 
M"TRS— 80/ATARI/APPLE. If any one an- 
swer matches, the computer remembers 
yes. 

Any Pilot statement can be either execut- 
ed or skipped depending on the current val- 
ue of the yes/no flag by adding the letter Y 
or N In front of the Pilot command letter. If 



$ 




MAKE 
MONEY 




$ 



Selling SO Microcomputing, the only major journal for the users of the 
TRS-80*f is a sure bet Sor getting the computer enthusiast into your 
store. Once through the door you can sell him anything. 

Wc know "BO" will make you money. . .It's the only maBazinc tor the THS-BO' uscrm and you know how many of those there are. 
So call today and Join the dealers ivho make money with "SO". For Information on selling M Microcomputing, call 603-9Z4-7Z9b and 
■peak with Cinnie Boudrleau, our Bulk Soles Manager. Or write to her at BO Microcomputing, Pine Street, Peterberengh, NH 0345B. 



Features of the 1 A 



I iciri! u : 



REDUCES OPEnATOn FATIGUE THEREBY ALLOWING MORE EFFI- 
CIENT USE OF THE COMPUTER. 

INBTALLB EASILY Wmi PRESSURE SENBITIVE ADHESIVE. NO 
SCREWS, CUPS, on DRIUJNO TO DAMAGE MONITOR. 
0C8I0NED TO MATCH TR8-80' STYUNO FROM THE BLACK AND 
SILVER BORDER TO THE LETTERtNO TYPE FACE. 
MADE OF TOUOH 1/B INCH THICK ACRYLIC SHEET FOR DURABIL- 
ITY, EASE OF CLEANING, AND A QUALrTY APPEARANCE. 
RTS BOTH THE MODEL I AND THE MODEL II. 
DOES NOT VOID THE COMPUTER WARRANTY. 



f » f *pl 



TRS-aO IS A TRAOEMARK OF TANDV 



SmvS Nimi 1 Addmi TypMl Dr CiMity PtlnMd win 
ChKk (H Monay Omar loc Sli 95 Each. Inclutflna Shlf^ 
MnQ COD 1 xe ii 5C Additlonil Pw OnMi 4 ar* *£> 
caolad by Mill ot Dt Calling g04'37ft^24»4 »-i M-F. 

FtatW> H M ldi m a am 4% Stit lu. 

SOUTHERN INNDUATIUE DESIGN 
15S0 NORTHEAST 1ETH STREET 
GAINESVfl'F, Fff^niP". r^.^Pni .;■/. 



mis 

rsll<Mlno« PM«e*t*toWool oUMIm 
tftow wrmm\ t« ho ooot w' 
tlw *Kton«M wleailno. Cv» 
ttwitv M«ks In tfw arvon _ 
of uw iPioU^^ Cvttf^eot la 
* tMTo« a bw ro«ucln« t*w — >!■<<■ 
11«*M felUni cr * CTT. ThBOo 
Uvoo raotorv oo^lrw to tl«ri 
c^oratcr- f«tioue> Finally mo 
MW X X Moro Umti m»1 fiowtien. 
U» MOntw« • filtor ttiot wtMollv 
Mtohod T«»-«a sWllrtft. ^lo«a«>«0 
tioro |« mrwt of otr ■uooooOr • 
^r«Aaot HO jr« prout or. 
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ARCADE SO 

Three rugn quaiiiy Jt^-ide g.iri^es in 

one simple formal This ih home enter- 

tainmcnt ai Jts best. 

Game I: Falling BrKks— Balances accuracy 

agjinst trme. If you're not quick enough 
the bricks come crashing down on you 

Game 2: AstrnM ines— Seek and destroy the 
r'lemy's mtnes before fuel runs out Be careful 
or you wril destroy yourself. 

Game 3: Star Run— A Star Raiders type game 
filled wrth refreshlrtg graphics, 

TRS-aO Model I (Diskette) S24.95 jCassettef S19.9S 




FOOTBALL 
CLASSICS 



puter football programs. You 

can recreate sports history by 

prtting top teams against each 

otlier in their best years. You 

rake the plays and the statistics 

:■■ ide the oulcome And that's r>ot 

aWI With the easy to use updated input file. 

you can update or create your own statistics. 

Included with the program are six teams of the past. 

TRS«) Models I A lit (Dfjkette) S24.9S (Cassette) S19.95 



Da 




o 



Dms," 



Mr 



16606 Schoenborn Street, Sepurveda, Calif. 9I343-(213) 894-9154 




T CT f '•"w * ■-'- ' -^ '■'■' — """^ — ' 

IhlH oltf p &OBC lilffi, Ji***, 2i4». W 

zfli* ir Y> i_^ ifti 3fit:n y- i'lApC -i^i: 




Four New Programs in July for Your TRS-80* 



GEOGRAPHY EXPLORER: USA 

The Geography Explorer USA package is the most fas- 
cinating (and least painful) way of learning social studies 
that we've seen yet. 

The program displays computer generated maps of the 
United States, its seven regions, and its individual states. The 
student then answers questions about the states of a given 
region. These questions may be in multiple choice recogni- 
tion of fill-in format. 

Geography Explorer has a unique TEACHER mode which 
allows the teacher or parent to choose multiple options of 
-how the material is to t>e presented. This permits directed 
learning for the student. 

The package is also just plain fun! When the student an- 
swers the questions correctly, there are a variety of graphic 
rewards that flash on the screen to provide immediate, posi- 
tive reinforcement. 

As a bonus, this educational package can use a com- 
patible Light Pen ! The union of sophisticated software with 
the speed and novelty of the Light Pen represents a mile- 
stone in Computer Assisted instruction. 
Order No. 0071RD (Model I, Level II 16K, E/l 16K + disk drive) 
$49.95 DISK 

RENUM/COMPRESS 

RENUM/COI^PRESS is a machine-language utility which 
addstwocommandstoTRS-80 Level II BASIC. Occupying the 
top 767 bytes of memory, the program allows you to 
renumber and/or compress any BASIC program. In renum- 
bering, all GOTO and GOSUB commands are re-addressed to 
the new line numbers. With simultaneous renumbering and 
compression, ail lines are renumbered, GOTO and GOSUB 
commands are re-addressed, and the entire BASIC program 
is reduced in size by elimination of all spaces not enclosed in 
quotes and all REM statements. This program allows you to 
expand your number-to-number intervals to accommodate 
insertion of new lines, and then to compress your program to 
free up additional memory. 
Order No. 01338 $1455 TAPE 

Instant Software 

PETERBOROUGH, M.H. 03458 

ADIVISION OF WAYNE GREEN INC, 



THE WORDSLINGER 

At last . . .simplified word processing! The Wordslinger is 
an economical word processing program designed for the 
individual user or small business. The program has 
automatic formatting for letterhead stationary and 
envelope addressing. You can write and edit letters, reports, 
forms, even schoolwork! 

One of the Wordslinger's major advantages is that you 
don't need disk drives or an expansion interface. The mini- 
mum system required is the TRS-80 Level II with 16Kof RAM 
and appropriate printer (you may need an expansion inter- 
face if your printer can't operate with just a printer interface 
cable, such as Radio Shack's part #26-1411 or 26-1416). 

Complete text editing is yours for the asking— just ask 
for the Wordslinger. 
Order No. 0129R (Model I, Level II, 16K RAM) $29.95 TAPE 

PROGRAMMER'S PRIMER 

There is a well known cliche, "One picture is worth a 
thousands words. " That time tested message has served 
as the Impetus for this program that demonstrates, for 
the novice programmer, the logic used in six common 
computer operations. The program is designed to func- 
tion as a CAI device. 

The six routines presented Include Decimal to Hexa- 
decimal Conversion (and vice-versa): Subscription of a 
Variable and Three Dimensional Array data storage 
operations; the For-Next-Ixjops demonstration of logical 
program flow; and the Bubble Sort sorting routine. 

All of these routines are clearly presented with on- 
screen step-by-step instructions and are displayed with a 
sequence of the logic used to arrive at the desired goal. 
Several of the routines can be modified to suit individual 
needs. 

Order No. 0245R (Model I, Level II 16K, Model III 16K) $9.95 
TAPE 



^531 



To Order: See your local Instani Soft- 
ware dealer. If these programs are unavail- 
able, order directly. 

Call Toil-Free 
1-800-258-5473 



*A reoistered trademark of Tandy Corp. 
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Ask for Instant Software at a computer store near you. 



ALABAMA 

ANDERSON COMPUTERS, HunI e 

COMPUTER CENTER. Tusca'ioosa 

COMPUTERLAND, HuntsvillH 

OLENSKY BHOTHEBS, INC., Mobllo 

ALASKA 

JUNEAU ELECTROMCS Junuu 

ARIZONA 

COMMERCIAL S HOME SYSTEMS. Tucson 

COMPUTER STORE. PhoeflK 

M * M ELECTRONICS, Satlord 

MESA ELECTRONICS Mesa 

MILLETS ELECTRONICS. Mesa 

PERSONAL COMPUTER PLACE, Mess 

PROFESSIONAL DATA SYSTEMS, Phoenii 

RUSALEM ELECTRONICS, Sjn Cily 

SIMUTEK, Tucson 

SOFTWARE STATION. Tempe 

ARKANSAS 

QR, JAMES A CAPPS, JR , SpnnoOalS 

CALIFORNIA 

ADVANCE RADIO [R/S Dealar). Grass Vallsy 

ADVANCED COMPUTER PRODUCTS. Sanls Ana 

AMCO ELECTRONIC SUPPLV. Aiusa 

BTIE INDUSTRIES. HayweiO 

BYTE SHOP, Cwtilos 

BYTE SHOP. Cllrus Hslflhls 

B-TTE SHOP. MounlBin Vlsw 

BYTE SHOP PlBCBtlllB 

BYTE SHOP OF SOUTH SAN JOSE, San Joss 

CAPITOL COMPUTER SYSTEMS, Sacramsolo 

COAST ELECTRONICS, Mo'ro Bay 

COMPUTER HOR ZONS. CamarlKo 

COMPUTER MART OF CALIFORNIA. INC . 

Dkaniond Qar 

COMPUTER MERCHANT. San DiBflO 

COMPUTER STORE, San LBBntJro 

COMPUTER V,'ORLD. LewnaaiB 

COMPUTER WORLD. WBSlmmstef 

COMPUTERLAND, El Cerrilo 

COMPUTERLAND. Sar, Diego 

COMPUTERLAND SOUTH BAY Le*nila!e 

DIMENSIONAL SOFP/JARE, San DiegO 

ELECTRONIC SYSTEMS. San Jose 

GRASS VALLEY COMPUTER SYSTEMS, 

Penn VBiisy 

HOeeiTRONICS, Sm jobs 

HOBBY WORLD ELECTRONICS, NontniOgfl 

HOUSE OF BO, ArtBSia 

HUNTINGTON COMPUTING. Corcoffln 

MALIBU MICROCOMPUTING. Mallbu 

MARFAM San Jose 

MICROCOMPUTER WAREHOUSE Sacramenlo 

MN 4 T INDUSTRIES, Lompoc 

DPAMPriECHNICAL BOOKS. LOS Angeles 

OPPORTUNITIES FOR LEARNING. Chalsviortn 

PC COMPUTERS. El Cerrito 

01 COMPUTER INCLawndaie 

RSV SOUND IRIS ObbIod, Fortuna 

RADIO SHACK. San DiBflO 

SILVER SPUR ELECTRONICS, Cnmo 

SOFTWARE PLUS, ei Toro 

STHAWFLOWER ELECTRONICS (RIS Dsalsr), 

Hall Moon Bay 

WABASH APPLE. El Torn 

WENNER BUSINESS SYSTEMS, Lo! AUOS 

COLORADO 

APPARAT. INC, Denwer 

COLORADO COMPUTER SYSTEMS, Woslmmale' 

COMPUTER SMACK, Pufltiio 

COMPUTERLAND-NORTH DENVER, ArvMa 

POOR RICHARDS CALCULATORS, Fort ColliriS 

SOFTWARE GOURMET. Den.er 

CONNECTICUT 

AM COMPUTER PRODUCTS. Soutninfllon 

AMERICAN BUSINESS COMPUTERS. Grown 

BYTE ME COMPUTER SHOP, NBw London 

COMPUTER LAB, Nbw London 

COMPUTER STORE, Winosor Locks 

COMPUTERLAND, Fairliela 

COMPUTERLAND, Hamoan 

COMPUTE RWORKS, INC , Westpon 

DIVERSIFIED ELECTRONICS, New Ha.en 

EAB ENTERPRISES Old G'eenwicli 

INSTRUCTIONAL SYSTEMS COMPUTERS 

MancnsBler 

TECHNOLOGY SYSTEMS. BsinBI 

DELAWARE 

MICRO PRODUCTS, WilmmBloo 

OMNIFAX. VJllminglon 

DISTRICT OF COLUMBIA 

THE PROGRAM STORE. Wasdinglon DC 

FLORIDA 

ADVENTURE INTERNATIONAL, CaSSBIfterry 

AMF MICROCOMPUTER CENTER. Tampa 

ATLANTIC SALES, Miami 

COMPUTER JUNCTION, Fo'l LauderDals 

COMPUTER SHACK, INC. Jacksonville 

COMPUTER STORE, CIsarwalBf 

COMPUTER SYSTEM RESOURCES. Galnaavllle 

COMPUTER WORLDS. Cleaiwalsr 

COMPUTERLAND, Boca Ralon 

COMPUTERLAND, Fort LaudBrdalB 

COMPUTERLAND, jBCXBOnvillS 

COMPUTERLAND, SarasolB 

COMPUTERLAND. Tampa 

COMPUTERLAND Wesl Palm Beach 

HEATHKIT ELECTRONrC CENTER, Hialean 

H I.S COMPUT6RMATI0N, Me^boume 

MICROCOMPUTER SYSTEMS, INC . Tampa 

SOUND IDEAS, GamBSvlMe 

SOUTH EAST MICRO DATA, OrtBoao 



WILLIAMS RADIO 4 T V . Jacksonville 

YOUR BASIC COMPUTER CENTEFl, Fori Pie'ce 

GEORGIA 

ATLANTA COMPUTER MART, Atlanta 

flAILEY S COMPUTER SHOP, Augusta 

DELTA DATA DYNAMICS, Atlanta 

FLEMING DRUG CO Wrens 

MICRO COMPUTER SYSTEMS, Atlanta 

HAWAII 

COMPUTER CENTER, Honolulu 

COMPUTERLAND OF HAWAII, Honolulu 

RADIO SHACK ASSOC STORE, Honolulu 

IDAHO 

DENNIS STONE ENTERPRISES, FruitlanO 

ELECTRONIC SPECIALTIES, BoisB 

H S L DATA SYSTEMS, IdBbo Falls 

ILLINOIS 

ALPINE COMPUTER CENTER, Rocklord 

BYTE SHOP. LaGrange 

CHICAGO MAIN NEWSTANO, EvBnslon 

COMPUTER STATION, GiBnils city 

COMPUTER STORE, RochloiO 

COMPUTERLAND, MunQslsin 

COMPUTERLAND. NilBB 

COMPUTERLAND, Peo<la 

GARCIA AND ASSOCIATES, Cfilcago 

ICOM, Lombard 

MAIN STREET COMPUTER CO , Dscalur 

MIDWEST MICRO COMPUTERS, Lombard 

WALLACE COMPUTERS, Psoria 

INDIANA 

COMPU TECH MICROCOMPUTER SYSTEMS, 

Dunkirk 

COMPUTER CENTER, South Bsnd 

DIGITAL TECHNOLOGY, LafayBlls 

FALL CREEK ELECTRONICS, Pondlelon 

IOWA 

BUSINESS DATA PROCESSING, Des Moinas 

CVBERIA, INC. Ames 

MEMORY BANK, INC , Bellendo't 

KANSAS 

CENTRAL KANSAS COMPUTERS. Heiinolon 

LOUISIANA 

ACME BOOK CO , Baton Rouge 

MAINE 

MAINE COMPUTRONICS Bangoi 

MAINE MICRO SYSTEMS INC , Auburn 

MIDMAINE COMPUTER COMPANY, Auburn 

RADIO SHACK, Soutn Portland 

MARYLAND 

CLAYTON ELECTRONICS. Towson 

COMM CENTER, Lbuibi 

COMPUTERAGE Silver Springs 

COMPUTERS ETC . Towson 

JACK FIVES ELECTRONICS INC , PiKesville 

PROGRAM STORE, Baltimore 

SOLON SOFTWARE. Rookvllle 

MASSACHUSETTS 

COMPUTER CITY CnailsSIOmn 

COMPUTER PACKAGES UNLIMITED. Wast 

Boy I Stan 

COMPUTER VILLAGE, W Spimgtield 

LAND OF ELECTRONICS Ljnn 

LIGHTHOUSE COMPUTER SOFTWARE. RelDtloin 

MARK GORDON COMPUTERS Cambridge 

SMALL BUSINESS SYSTEMS GROUP, Dunstable 

SOUND COMPANY, SpringliBId 

TUFIS RADIO ELECTRONICS, MaafotO 

MICHIGAN 

ALL FOR LEARNING, W Bloomlielfl 

ALTERNATE SOURCE. Lansing 

A.M ELECTRONICS. Ann Arbor 

COMIC KINGDOM, Detroit 

COMPUTER CENTER. Garden City 

COMPUTER CONNECTION Farmmglon Hills 

COMPUTER MART Cla*50n 

COMPUTER ROOM. Kaiamaioo 

COMPUTERLAND, Kant«ooo 

COMPUTERLAND, SONttltielfl 

COMPUTRONIX. Midland 

EIGHT BIT CORNER. Muskegon 

FERRIS RADIO. Hajei Park 

GOLDEN ANVIL Southi Haven 

HOBBY HOUSE. Battle Cieek 

LEVEL IV PRODUCTS, INC , Livonia 

LYCEUM. INC, Warren 

MAIN SYSTEMS. INC., Flint 

MIDMICHIGAN MEMORY. Dimonaale 

NEWMAN COMPUTER EXCHANGE Ann Arb& 

TRICOUNTY ELECTRONICS i SOUND CENTER, 

Fen ton 

WIZARDS ARSENAL. East Lansing 

VE OLDE TEACHERS SHOPPE, Ypsiianti 

MINNESOTA 

CODE ROOM, EOenPisirrs 

DIGITAL DEN, BurnsvlllB 

MINNESOTA SOFTWARE. While Seat Lake 

PERSONAL BUSINESS SYSTEMS, Minneapolis 

ZIM COMPUTERS. BrooKlyn CenlBI 

MISSISSIPPI 

CCOM, Jackson 

DYERS. INC., West Point 

SOFTWARE HOUSE, Jackson 

MISSOURI 

CENTURY NE>:t COMfMTEHS, Columbia 

COMP-UTRS SOFTWARE CENTER, Floiissant 

COMPUTER CENTER, Joplln 

COMPUTERMART,SpnnoliBld 

CRC COMPUTERS. Joplln 

PERSONAL COMPUTER, Carl Junction 

RADIO SHACK, Warsaw 

SOFTWARE SHACK, Bslton 

UNITED COMPUTER STORES. St, Cliirlss 



Instant Software 

Peterborough, N.H. 03458 



MONTANA 

COMPUTER STORE, Billings 

INTERMOUNTAIN COMPUTER, Livingston 

NEBRASKA 

APPLETREE SOFTWARE. Battle Creek 

COMPUTERLAND, Omalia 

COMPUTERS WEST. Omslia 

MIDWEST COMPUTER CO.. INC., Omaha 

SCOTTSBLUFF TYPEWRITER i OFFICE 

PRODUCTS Scotlsblull 

NEVADA 

BYTE SHOP Reno 

CENTURY 23. Las Vegas 

HOME COMPUTERS. Las vagas 

HURLEY ELECTRONICS. Las Vagas 

NEW HAMPSHIRE 

BITSNBYTES COMPUTER CENTER, Concord 

COMPUTER TOWN. SalBm 

COMPUTERLAND Nashua 

PAUL STV Fremont 

PORTSMOUTH COMPUTER CENTER, Poflsmouth 

RADIO SHACK ASSOC STORE. Ksans 

STUROIVANT AND OUNN, Conway 

NEW JERSEY 

ABES TV SALES S SERVICE, Glaasboro 

BARGAIN BROTHERS Weal Trenton 

COMPUTER CORNER OF NJ. Pompton Plains 

COMPUTER ENCOUNTER. Princeton 

COMPUTER FORUM HedDank 

COMPUTER MADNESS, Englislltown 

COMPUTER MART OF NJ, INC . ISBlin 

COMPUTERLAND. Cnerry Hill 

COMPUTERLAND. Paramus 

CROWLEY S Whiletiouse Station 

DAVE S ELECTRONICS, INC., Pennsville 

ELECTRONIC WORLD. Mantufl 

G.S.B ELECTRONICS. INC . Maple Shade 

J * J ELECTRONICS, INC (R/S Dealer). 

HacfcellslDivn 

LASHEN ELECTRONICS, INC , Denvliie 

MIDAS DATA SYSTEMS INC , MBrlton 

OMNIFAX, Cherry Hill 

RADIO SHACK ASSIDC. STORE. Mooroatown 

SILENT PARTNER, Fori LsB 

NEW MEXICO 

AUTEL ELECTRONICS CO . AlbuOUBrquS 

JSW ENTERPRISES. ClovIS 

MITCHELL MUSIC, CailabaD 

THOMAS E CARR JEWELER. Alamogordo 

WARGAMES WEST. AlbuQUBrquS 

NEW YORK 

A WORLD OF COMPUTERS. Port CfirnlW 

ARISTO CRAFT DISTINCTIVE MINIATURES, 

New York 

ASD HOME COMPUTER CENTER, Poughkeepsie 

BERLINER COMPUTER CENTER. Nevr Hyde Park 

C HABiLD OF NEW OORP, Slaten iBlanO 

COMPUTER CORNER, WhitB Plains 

COMPUTER ERA, New York 

COMPUTER FACTORY. Ne* YofK 

COMPUTER RESOURCES, WMiiamaviile 

COMPUTER SHOP, Kingston 

COMPUTER STORE Rochester 

COMPUTER TREE. INC . Endviell 

COMPUTERLAND, Cane Place 

COMPUTERLAND. White Plains 

COMPUTERLAND OF NYC. New York 

DIGIBYTE SYSTEMS, New York 

SO' MICROCOMPUTER SERVICES. Cohoes 

FUTURE VISIONS COMPUTER STORE, Melville 

HOME COMPUTER CENTER, RocOsslsr 

LONG ISLAND COMPUTER GENERAL STORE. 

Lyntirook 

MR COMPUTER, Wappingers Falls 

OMNIFAX. DaWltl 

SOFT RON SYSTEMS. Rensselaer 

UPSTATE COMPUTER SHOP. New Hartlotd 

NORTH CAROLINA 

BYTE SHOP, GreensDofo 

SOUND MILL, Havaiock 

TOS RECORD SHOP. S/lva 

OHIO 

ABACUS II. Toledo 

ALTAI R SYSTEMS, INC., Dsyton 

ASTRO VIDEO ELECTRONICS. INC . Lancaster 

BUS COMPUTER, Msntor 

CINCINNATI COMPUTER STORE, ClnclnnBli 

COMPUTER STORE, ToIbOo 

COMPUTERLAND. Columbus 

COMPUTERLAND. Mayfisld Haigtlts 

COMPUTERLAND, North OlmaleO 

COMPUTERLAND, Warren 

CUSTOM SOFT, INC , Louisville 

H. GABRIEL i CO , Madison 

JOBAR ENTERPRISES, MiddlSliBId 

MICROAGE. Columbus 

MICRO COMPUTER CENTER. Centerville 

MICRO ELECTRONICS INC. Columbus 

MICRO MINI COMPUTER WORLD. ColumDui 

TWENTY-FIRST CENTURY SHOP, CincinnBti 

UNIVERSAL AMATEUR RADIO INC., ReynolOMkirg 

WANNA PLAY, CincinnBti 

OKLAHOMA 

COMPUTER STORE INC Tulsa 

COMPUTER WORLD, Tulsa 

RADIO SHACK ASSOC STORE. Guymon 

SOUNDS. ETC , Wfllonga 

VERN STREET PRODUCTS. SspulpB 

OREGON 

COMPUTER PATHWAYS, Salem 

TRS.80 PRODUCTS LTD . Portland 

PENNSYLVANIA 

ALLIED HOBBIES, Philadelphia 

ARTCO ELECTRONICS. Kingston 

BELL ELECTRONICS Girard 

COMPUTER WORKSHOPPE. Monroeviile 

COMPUTERLAND, GiDsonia 

COMPUTERLAND, WhitShBll 

COMPUTERLAND OF HARHISBURG, 

Machanicsburg 

ERIE COMPUTER Erie 

J & E COMMUNICATIONS. Duncanaviile 

MIGHTY BYTE COMPUTER CENTER, Horsham 

OMNIFAX FBBSIerville 

OMNIFAX Phiiaoeiphia 

PITTSBURGH COMPUTER STORE, PillBburgh 



STEVENS RADIO SHACK DEALER PhoenlKVIIIB 

ROUTE 30 ELECTRONICS, Lalrobe 

TELEVISION PARTS COMPANY INC , New 

Brighton 

WAYNESBURG RADIO. WaynaBburg 

SOUTH CAROLINA 

OMNI ELECTRONICS Ctiarleston 

TENNESSEE 

ACE MINI SYSTEMS, Clarksville 

CHATTANOOGA COMPUTER CENTER. 

Chattanooga 

COMPUTER WORLD, Nashvilla 

COMPUTERLAB, Memphis 

H * H ELECTRONICS, Tullahoma 

WEBBS PHARMACY « ELECTRONICS, Harriman 

TEXAS 

CODEDATA. INC . Arlington 

COMPUSHOP, Beiiaire 

COMPUSHOP(FM1960W, Houston 

COMPUSHOPJN Fwy Houston 

COMPUSHOP. Richardson 

COMPUTER N THINGS. Austin 

COMPUTER CONCEPTS, Beaumont 

COMPUTER HOBBY CENTER, Austin 

COMPUTER PORT, Arlington 

COMPUTER SALES AND SERVICE. Fori Worth 

COMPUTER SOLUTIONS, San Antonio 

COMPUTER TECH ASSOCIATES. El PasO 

COMPUTERLAND OF SW HOUSTON, Houston 

COMPUTERS BY ONEILL Lake Jackson 

COMPUTEX, WeOSler 

GATEWAY ELECTRONICS. Houston 

KA ELECTRONICS. Dallas 

MARYMAC INDUSTRIES IRIS Dealsr), Houslon 

PAN AMERICAN ELECTRONICS (R/S Dsaier), 

Mission 

R.L. COLES ELECTRONICS, San Antonio 

WAGHALTER BOOKS, INC., Houslon 

UTAH 

COMPUTERLAND, Salt Lake City 

CTI, Provo 

QUALITY TECHNOLOGY, SbII Lake City 

VIRGINIA 

COMPUTER SOLUTIONS, Leesburg 

COMPUTER WORKS, INC., HarrisontiurB 

HOME COMPUTER CENTER INC . Virginia B*scr> 

LITTLE SOLDIER. Aleiandna 

WASHINGTON 

AMERICAN MERCANTILE COMPANY. Seattle 

BYTE SHOP. Beiievue 

COMPUTER CONNECTION, Silveidale 

COMPUTERLAND. Beiievue 

COMPUTERLAND. Federal Way 

EMPIRE ELECTRONICS Seattle 

LORDS. Port Angeies 

MAGNOLIA MICRO SYSTEMS Seattle 

PERSONAL COMPUTERS. INC , Spokan* 

UNIVERSITY VILLAGE MUSIC. Seattle 

WESTERN MICROCOMPUTER CENTER, 

Bailingham 

WEST VIRGINIA 

COMPUTER CORNER Morganlown 

COMPUTER STORE. Huntington 

SOUND S ELECTRONIC SPECIALTIES, 

Morganlown 

WISCONSIN 

BYTE SHOP, Milwaukee 

COLORTRON COMPUTER DIVISION, Racine 

COMPUTER WORLD, Applelon 

COMPUTERLAND, Madison 

COMPUTERLAND, Milwaukee 

COMPUTERLAND OF FOX RIVER VALLEY, 

Oshkosh 

MAGIC LANTERN COMPUTER, Madison 

PETTED MICROSYSTEMS. Milwaukee 

RADIO SHACK. Mauslon 

S 4 TV SALES, Monroe 

SOFTWARE CASSETTES, Madison 

WYOMING 

COMPUTER CONCEPTS, Cheyenne 

PUERTO RICO 

MICRO COMPUTER STORE, Capaira Terrace 



AUSTRALIA 

■DeFOREST SOFTWARE, NunawBdlng, Vic. 

CANADA 

■MICRON DISTRIBUTING, Toronto. Onl, 

Compumarl, Ottawa, Onl. 

MIciomatic Systems Inc.. Vanoouvei. B.C. 

Micro Shack of W Canada, Regma, Sask 

Orlhon Holdings Ltd., Edmonton, Alb. 

Total Computer Systems, Ajax, Onl. 

CARIBBEAN ISLANDS. CENTRAL AND SOUTH 

AMERICA 

■WEST INDIES SALES CO. LTD , Hialsah, FLUS* 

FRANCE 

■ DANIEL P LUCET, Allortville 

GREECE 

■CARITATO TECHNICAL, Athens 

HONG KONO 

■ASSOCIATED INDUSTRIAL SUPPLIES, Hong 

Kong 

ITALY 

■BITS & BYTES. Milan 

KOREA 

■SIN HAN TRADING CORP , Seoul 

NETHERLANDS » BELGIUM 

■SOFTWARE IMPORT BRABANT Eindhoven. 

Neth 

NEW ZEALAND 

■VISCOUNT ELECTRONICS. Palmerston North 

NORWAY 

■A/S so R LUND, Vedavagen 

REPUBLIC OF SINGAPORE 

■OG BUSINESS COMPUTER. Singapore 

SOUTH AFRICA 

■BRIAN VICKERS. Sandlon . 

SWEDEN t 

■SENTEC AB, JBrtBllfl 

UNITED KINGDOM 

■CALISTO COMPUTERS. Birmingham, Eng. 

WEST GERMANY 

■MICROSTUFF, FranHutt 

■REINHARO NEOELA. M»rl(dort 



Instant SoIIwbib Dist'iDutor 
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"New programs can be 
constructed using the 
standard Level II BASIC 
editing commands." 

the statement begins with Y and the previ- 
ous match was a yes result, the rest of the 
statement will be executed normally. A 
statement with a Y prefix will be skipped if 
the no flag is set. Study the following exam- 
ple: 



10 A'WHAT TYPE OF COMPUTER DO YOU HAVE 

20 M'THS-aO/RADIO SHACK/LEVEL ll/MODEL 1 

30 YT"80 MICROCOMPUTING IS THE MAGAZINE FOR 

YOU! 

40 NT'SORRY, YOU ARE ON YOUR OWN. 

If the Student answers any of the phrases of 
line 20, the message of line 30 will be print- 
ed. If some other answer is entered, the 
message of line 40 appears. 

A J(ump) causes the computer to jump to 
the statement indicated. The command 10 
J"99 causes the computer to jump immedi- 
ately to line 99. Similarly, 10YJ"99 will jump 
to line 99 if the previous match statement 



PLEASE PRESS ENTER TO SEE AN EXAMPLE PROBLEM 

600 C"THIS IS AM EXAMPLE PROBLEM USING THE PILOT INTERPRETER. 

610 A"FIRST OF ALL, WHAT IS YOUR NAME 

620 T"OK, @, HERE IS YOUR QUESTION. WHAT IS THE BEST 

MAGAZINE FOR THE TRS-80 MICRO-COMPUTER — 

A = BETTER HOMES AND GARDENS 

B = PSYCHOLOGY TODAY 

C = 80 MICROCOMPUTING 
630 T"CONSIDEB THE CHOICES CAREFULLY @ AND TELL ME 
640 ATS YOUR ANSWER A , B , OR C 
650 M"A 

660 YT"ONLY IF YOU ARE USING YOUR COMPUTER AS A FLOWER POTl TRY 
AGAIN 
670 YJ"640 
680 M"B 
690 YT"COHPUTER PROGRAMMING MUST BE DRIVING YOU CRAZYl TRY AGAIN 

700 YJ"640 

710 H"C 

720 YT''YOU ARE ABSOLUTELY CORRECT! GOOD LUCK AND ENJOY USING PI 

LOT. 

730 YE" 

740 T"YOU ARE NOT FOLLOWING THE DIRECTIONS! 

750 J"640 



STEREO AND PERCUSSION! 



• STEREO— SeporofJon by insfrunTent! 
For example, play trumpet and oboe 
through channel A, clorinet and organ 
through channel B You can switch 
instruments from channel to channel 
at any lime! 

• PERCUSSION -Now you can add a 
wide fonge of percussive sounds and 
special effects lo your music! 
Existing Orchestfa-80 files lood and piay 
in stereo automatlcaiivi 

• Opfiorral 5th Voice for use with 
speed-up mods! 



New editing features and commends' 
Plugs into any 16k Model I keytxxDfd or 
expansion interface without voiding 
warranty! 

Includes tape arxj disk versions on 
cassette, 4 sample music tiles, manual. 
arxi fully assembled and tested printed 
circuit txxird! 



Orchestra-85 
$129.95 

plus S2 00 postage and handling 

($5 for overseas airmail) 

CA residents add 6% sales tax 

K/tosteiCard and Visa 

ai c ■«, accepted 



iRCHEgRA; 



.,Brt^^^^ 



sa^r^' 






WRITE FOR INFORMATION ON: 

• Upgrading -Orchestra-80 to Orchestra-85. Switch toStereo! 

• Greatest Hits -Volumes I and II All new music! Ready to load and play! 

• Orchestra-^O""- Mode! in version of Orchestra-85, Available sooni 



Software Affair 

858 Rubis Drive. Sunnyvale. CA94087 
,356 (408)295-9195 
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EAST COAST 

liMEGA Sales Co. 

12 Meeting St. 

Cumberiand. Rl 02864 

1-401-722-1027 

1-800-556-7586 




WEST COAST 

OMEGA Sales Co. 

3533 Old Conejo Rd. #102 

Newbury Park, CA 91320 

1-805-499-3678 
CA. TOLL FREE 1-900-322-1873 

1-800-235-3581 




$PBCIAL OF Wi MONTH 



ATARI 800 32K & EPSON MX-80 PRINTER 
w/ INTERFACE & CABLE 

BOTH FOR $1449 

with ATARI 810 DISK DRIVE 

wtlh LEEDEX/AMDEK COLOR-1 13" MONITOR 

COMPLETE SYSTEM $2,222 




jMx~eo^^^^. 

CALL FOB PRirc ■ 




ANADEX 
$1295 




DIABLO 630 
$2099 

Tractor option 
$245 



NEC 12' 

MONrTOR 



$229 





' $399 

OKIDATA 
MICROLINE-80 



ATARI 800 32K $779 

EPSON MX-aO $479 



WE ACCEPT C.O.D.'S 
NO SURCHARGE FOR 
CREDIT CARD ORDERS 
ALL EQUIPMENT FACTORY 
FRESH W/MFT.WRNTY. 
STOCK SHIPMENTS 
SAME DAY OR NEXT 

NO HIDDEN CHARGESIII 



INTERTEC SUPERBRAIN 64K RAM 

QDSUPERBRAIN 

NEC 5510SPINWRITER 

NEC 5530 SPINWRITER 

OKIDATA MICROLINE-80 

OKIDATA MICROLINE-82 

OKIDATA MICROLINE-83 

APPLE II PLUS48K 

APPLE DISK w/3.3 DOS Controller 

APPLE DISK w/o Controller 

BASE 11 PRINTER 

HAZELTINE 1420 

NORTHSTAR HORIZON II 32K QD 

ANADEX DP-9500 

TELEVIDEO 912C 

TELEVIDEO 920C 

TELEVIDEO 950 

CBM 8032 COMPUTER 

CBM 8050 DISK DRIVE 

CBM 4032 COMPUTER 

CBM 4040 DISK DRIVE 

CBM 4022 

CBM VIC-20 

CBM C2N 

RADIO SHACK II 64K 

RADIO SHACK III 16K 

LEEDEX/AMDEK 100 

LEEDEX/AMDEK 100G 

LEEDEX/AMDEK COLOR-1 IS" Color Monitor 

MICROTEK 16K RAMBOARD for ATARI 

MICROTEK 32K 

ATARI 400 16K 

ATARI 825 PRINTER 

ATARI 850 INTERFACE 

Of both together 
ATARI 810 DISK DRIVE 

(Call for price list of ATARI software) 



$2799 
$3195 
$2595 
$2595 
S 399 
$ 529 
S 799 
SCALL 
SCALL 
SCALL 
S 599 
$ 799 
$2975 
$1295 
$ 669 
$ 729 
$ 959 
$1475 
$1449 
$1090 
$1090 
$ 679 
$ 289 
$ 85 
$3245 
$ 839 
$ 139 
$ 169 
$ 349 
$ 99.95 
S 165 
$ 349 
S 619 
139 
749 



S 

s 

S 449 



PRICES ARE SUBJECT TO CHANGE WITHOUT NOTICE. 



SI EAST COAST / WEST COAST ^ 

Omega sales company 
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"The use of a second set 
of quotation marks is totaily 
unpredictable and is normaliy 
bad programming practice." 



resulted in a yes flag. 

Constructing New Programs 

New programs can be constructed using 
the standard Level II BASIC editing com- 
mands, including Auto, Edit, New and De- 
lete. They can be saved and loaded to cas- 
sette with the CSAVE, CLOAD and CLOAD? 
commands. Any error found in a program 
will be noted with an Error in the Line XX 
message. 

Program Listing 1 is in BASIC and will 
prepare the machine language System tape 
that you will use at the beginning of every 
Pilot programming session. Type the pro- 
gram in as shown and run it. Follow the di- 
rections and prepare your new Pilot inter- 
preter tape. The program also contains 
many double checks to make sure that 
there are no mistakes in your data state- 
ments. If you find a checksum error when 
runningtheprogram, go back and check the 
entries in the line number indicated. 

It might be wise to devote an entire cas- 
sette to Pilot. On one side, keep the Pilot 
tape-maker. You can use this program to 
give others the Pilot interpreter. On the 
other side, you will create your own Pilot 
system tape. CSAVE the BASIC program 
before you actually make the Pilot interpret- 
er. If you have made a mistake the computer 
will return all the way back to the memory 
size question. A backup copy on tape will 
keep you from losing the program in case of 
disaster. 

Once you have prepared the Pilot inter- 
preter program and followed the directions 
for entry, the screen should clear and 
TRS-80 Pilot Interpreter and Radio Shack 
Level II BASIC should be displayed along 
with the Ready prompt. Type in a simple 
one-line Pilot program, such as 10T"WEL- 
COMETO PILOT. 

In BASIC we use the command Run to be- 
gin program execution. In Pilot we use the 
command Name. Type Name and Enter and 
you should see the message above printed. 
Why use the word Name? The TRS-80 recog- 
nizes about 100 different words. Among 
these are Print, For, Next, Edit, List and 
others. The TRS-80 also recognizes Name, 
but unlike the other commands, Name has 
no specific function assigned to it. As a re- 
sult, Pilot can borrow the Name command 
without affecting normal BASIC execution. 

Program Listing 2 when typed in and exe- 
cuted, will provide an introduction to Pilot. 
The program occupies about 8K of memory, 
so 4K owners will need to break the progam 
Into smaller pieces. 



Type the program in exactly as listed. To 
make an attractive display, the down arrow 
(or linefeed) is used at the end of lines. 
When encountered in the program, they ac- 
complish the same thing you see on your 
videodisplay— the printing jumps to the be- 
ginning of the next line. See, for example, 
lines 10, 20 and 30. In addition, there appear 
to be run-on words in line 20. However, 
when printed in wide characters as instruct- 
ed in line 10, the display looks fine. 



Broken Rules 

Several rules are broken in the program, 
but for a good reason. One should not nor- 
mally use a second set of quote marks in a 
Pilot program statement. You will find two 
sets in lines 160, 220 and 230. The use of a 
second set of quotation marks is totally un- 
predictable and is normally bad program- 
ming practice. Yet, in the lines above they 
are absolutely essential to illustrate a point 
and have been thoroughly tested and are 







Program Listing 3. Pilot Interpreter Source Code. 


1000 




ORG 


41E8H 


;SET MEMORY SIZE 


1010 




DEFH 


'32465' 




1020 




DEFB 


00H 




1030 




ORG 


4016H 


; RESET KEYBOARD DRIVER TO 


1040 




DEFW 


7E9BH 


; INITIALIZATION ADDRESS 


1050 




ORG 


7E98H 




1060 




LD 


HL, BEGIN 


; RESET NAME COMMAND TO 


1070 




LD 


{418FH) ,HL 


;PILOT INTERPRETER 


1080 




LD 


HL,03E3H 




1090 




LD 


(4016H) ,HL 


; RESET KEYBOARD DRIVER 


1100 




LD 


HL, TITLE 




1110 




CALL 


28A7H 


;WRITE SIGNON MESSAGE 


1120 




LD 


A,0DH 




1130 




CALL 


032AH 




1140 




XOR 


A 




1150 




LD 


HL,41E7H 




1160 




JP 


00C0H 


;JUMP TO LEVEL II START 


1170 


TITLE 


DEFB 


ICH 




1180 




DEFB 


IFH 




1190 




DEFH 


'TRS-80 PILOT INTERPRETER &' | 


1200 




DEFB 


00H 




1210 




ORG 


7ED4H 




1220 


CLS 


CALL 


01C9H 


;CLEAR SCREEN AND JUMP TO TYPE 


1230 




JR 


TYPE 




1240 


WIDE 


CALL 


01C9H 


;CLEAR SCREEN, SWITCH TO 


1250 




LD 


A,i7H 


,-WIDE LETTERS AND JUMP TO 


1260 




CALL 


032AH 


;TYPE ROUTINE 


1270 




JR 


TYPE 




1280 


ASK 


INC 


HL 




1290 




LD 


A,(HL) 


;CHECK FOR QUOTES 


1300 




CP 


22H 




1310 




JE 


NZ, WRONG 




1320 




PUSH 


HL 




1330 




PUSH 


BC 




1340 




INC 


HL 




1350 




LD 


A,(HL) 


;IF THERE IS A MESSAGE, 


1360 




CP 


00H 


; PRINT IT 


1370 




JR 


Z,ASK2 




1380 




CALL 


28A7H 




1390 


ASK2 


CALL 


1BB3H 


;WAIT FOR USER RESPONSE 


1400 




CP 


01H 




1410 




JR 


Z, STRTl 


;IF BREAK KEY THEN STOP 


1420 




POP 


BC 




1430 




POP 


HL 




1440 




JR 


SKIP 




1450 


BEGIN 


LD 


HL, (40A4H) 


; BEGIN EXECUTION, SET HL AT 


1460 




LD 


C, 'Y' 


;BEGINNING OF TEXT, SET FLAG 


1470 




PUSH 


DE 




1480 


START 


POP 


DE 




1490 




LD 


A, (3340H) 


; CHECK FOR BREAK KEY AND STOP 


1500 




CP 


04H 




1510 




JR 


NZ,STRT2 




1520 


STRTl 


HALT 




Program continues 



134 • 80 Microcomputing. July 1981 




The MX-100. Not just better. Bigger. 

Epson. - 



Our MX-80 was a pretty tough act to follow. I mean, 
how do you top the best-selling printer in the world? 

Frankly, it wasn't easy. But the results of all our 
sleepless nights will knock your socks off. 

The MX-100 is a printer that must be seen to be be- 
lieved. For starters, we built in unmatched correspon- 
dence quality printing, and an ultra-high resolution bit 
image graphics capability. Then we added the ability to 
print up to 233 columns of information on 15" wide 
paper to give you the most incredible spread sheets 
you're ever likely to see. Finally, we topped it all off 
with both a satin-smooth friction feed platen and fully 
adjustable, removable tractors. And the list of standard 
features goes on and on and on. 

Needless to say, the specs on this machine — and 
especially at under $1000 — are practically unbelievable. 
But there's something about the MX-100 that goes far 



beyond just the specs; something about the way it all 

comes together, the attention to detail, the fit, the feei. 

Mere words fail us. But when you see an MX-100, you'll 

know what we mean. 

All in all, the MX-100 is the most remarkable printer 

we've ever built. Which creates rather a large prob- 
lem for those of us at 
Epson. 

How are we going to 
top this? 

Your next printer. 




EPSON 



EPSON AMERICA, INC. 



23844 Hawthorne Boulevard • Torrance, CA 90505 • (213) 378-2220 

See the whole incredible Epson MX Series of printers at your Au 



y'AQA 



^S« L/if o' Atfvorfistn on page 306 
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"Several of the major computer 
manufacturers have announced plans 
to release versions of Pilot 
for their products In mld-1981." 



guaranteed to work. Try to avoid their use in 
your programs. 

The @ symbol in lines 310, 325 and 326 is 
actually a shift-®. This must be done to 
make the @ symbol appear on the video dis- 
play. Try to use only the unshifted @ sym- 
bol for its intended purpose and avoid the 
shifted-® symbol. The normal use of ® is 
shown in lines 620 and 630. 

More experienced machine language 
programmers will be interested in Program 
Listing 3. Any editor/assembler program 
could be used to produce a workable object 
code program from this listing. Of special 
interest are the use of several ROM routines 
to tx>th conserve memory and take advan- 
tage of the efficient coding available. De- 
tails of a few of these commonly used sub- 
routines are outlined t>eiow: 



CALL 26A7H Prints a message on the video screen. HL 
nxjsi point to lifst byte ot string. Slrtnfl 
must end with a zero byt«. AF. BC, DE and 
HL are used. 

CALL 032AH Prints the character coritalned in register 
A on the screen at current cursor localton 
UsesAF. 

CALLOtCSH Clears screen and positions cursor at lo- 
cation 0. 

CALL 1 BB3H Prints a question mark and allows user en- 
try as In BASIC'S INPUT staiament. The 
entry will tw stored starting at 41E8H, A 
contains a if Enter was the terminating 
character, 1 i( the Break key was used, HL 
and BC are used 

CALL 0A9AH Transfers the value stored in HL to men> 
ory location 4121H and 4122H. 

CALLOFBOH Convert value in4l2lHand4122H to ASCII 
string and store at location 41E8H + length 
of siring. 

CALL 1E5AH Converts Siring starting at location HL into 
a numerical value and stores in DE. Uses 
HL. BC, and DE. 

The use of absolute jumps is minimized 
so the code will be easy to relocate. The ini- 
tialization section not only automatically 
sets memory size at a value sufficient to 
protect the routine, but also begins execu- 
tion immediately upon loading. The slash 
and Enter keys are not needed. 

The Pilot language is a fun and interest- 
ing alternative to BASIC. A wealth of infor- 
mation on Pilot is available in past micro- 
computing journals which can be used with 
a minimum of translation for this system. 
Anyone from a first-grader up should t>e 
able to learn and use Pilot after only a short 
introduction. 

Several of the major computer manufac- 
turers have announced plans to release ver- 
sions of Pilot for their products in mid-1981 , 
which will provide the opportunity to see 
what Pilot is all about.! 



1530 


STBT2 


LD 


A,{HL) 




1540 




CP 


00H 




1550 




INC 


HL 




1560 




JR 


NZ,STRT4 




1570 




LD 


A,{HL) 




1580 




CP 


00H 


TWO ZEROES IN A ROW MEAN END 


1590 




JR 


Z,STRT1 




1600 


STRT4 


INC 


HL 




1610 




LD 


E,(HL) 


SAVE LINE NUMBER IN DE 


1620 




INC 


HL 




1630 




LD 


D, (HL) 




1640 




PUSH 


DE 




1650 


BACK 


INC 


HL 


LOAD A WITH CHARACTER AND JUMP 


1660 




LD 


A,(HL) 


TO APPROPRIATE SECTION 


1670 




CP 


'Y' 




1660 




JR 


Z,FLAG 




1690 




CP 


'N' 




1700 




JR 


Z,FLAG 




1710 




CP 


r m 1 




1720 




JR 


Z,TYPE 




1730 




CP 


'A' 




1740 




JR 


Z,ASK 




1750 




CP 


'H' 




1760 




JR 


2, MATCH 




1770 




CP 


'J- 




1780 




JR 


Z,JUMP 




1790 




CP 


'E' 




1800 




JR 


Z,ENDl 




1810 




CP 


'W 




1820 




JR 


2, WIDE 




1830 




CP 


'C 




1840 




JR 


Z,CLS 




1850 


WRONG 


JR 


ERROR 


IF HONE HATCH THEN ERROR 


1860 


FLAG 


CP 


C 


SEE IF CONDITIONAL MATCHES 


1870 




JR 


Z,BACK 


CURRENT FLAG IN C 


1880 


SKIP 


INC 


HL 


NO MATCH SO SKIP COMMAND 


1890 




LD 


A,(HL) 




1900 




CP 


22H 




1910 




JR 


NZ, ERROR 




1920 




PUSH 


HL 




1930 




PUSH 


BC 




1940 




INC 


HL 




1950 


SKIP2 


JR 


START 




1960 


TYPE 


INC 


HL 


TYPE STATEMENT TO VIDEO 


1970 




LD 


A,(HL) 




1980 




CP 


22H 


CHECK FOR QUOTES 


1990 




JR 


NZ, ERROR 




2000 




PUSH 


HL 




2010 




PUSH 


BC 




2020 




INC 


HL 




2030 


TyPE2 


LD 


A,(HL) 




2040 




CP 


00H 




2050 




JR 


Z,TYPE3 




2060 




CP 


40H 


CHECK FOR @ SIGN 


2070 




JR 


Z, BUFFER 




2080 




CALL 


032AH 


OUTPUT CHARACTER TO SCREEN 


2090 




INC 


HL 




2100 




JR 


TYPE 2 




2110 


BUFFER 


PUSH 


HL 


TYPE MOST RECENT 


2120 




LD 


HL,41E8H 


ANSWER TO SCREEN 


2130 




CALL 


28A7H 




2140 




POP 


HL 




2150 




INC 


HL 




2160 




JR 


TYPE2 




2170 


TYPE 3 


LD 


A,0DH 




2180 




CALL 


032AH 




2190 




POP 


BC 




2200 




POP 


HL 




2210 


TYPE4 


JR 


SKIP 




2220 


ERROR 


LD 


HL,EBRMES 


TYPE ERROR MESSAGE AND STOP 


2230 




CALL 


28A7H 




2240 




POP 


HL 


Program continues 
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2250 




CALL 


0A9AH 




2260 




CALL 


0FBDH 




2270 




CALL 


28A7H 




2280 


ENDl 


HALT 






2290 


HATCH 


LD 


C'Y' 


; COMPARE ANSWER TO LIST AND 


2300 




INC 


HL 


;SET APPROPRIATE FLAG 


2310 




LD 


A,(HL) 




2320 




CP 


22H 




2330 




JR 


NZ, ERROR 




2340 




PUSH 


HL 




2350 




JR 


MATCHl 




2360 


JUMP 


INC 


HL 


;JUMP TO LISTED LINE NUMBER 


2370 




LD 


A,<HL) 




2360 




CP 


22H 




2390 




JR 


NZ, ERROR 




2400 




I»C 


HL 




2410 




PUSH 


BC 




2420 




CALL 


iE5AH 


; CONVERT STRING TO NUMBER IN DE 


2430 




LD 


HL,(40A4H) 




2440 


JUHP2 


LD 


A,L 




2450 




OR 


H 




2460 




JR 


Z,JUHP4 


JLINE HOT FOUND SO PRINT ERROR 


2470 




LD 


C,(HL) 




2480 




INC 


HL 




2490 




LD 


B,(HL) 




2500 




PUSH 


BC 


;SAVE NEXT LOCATION 


2510 




INC 


HL 




2520 




LD 


A,(HL) 




2530 




CP 


E 




2540 




JR 


Z,JUMP3 




2550 




POP 


HL 




2560 




JR 


JUHP2 




2570 


JUHP3 


INC 


HL 




2580 




LD 


A,(HL) 




2590 




CP 


D 




2600 




JR 


Z,LINE 


;IF MATCH GOTO LINE 


2610 




POP 


HL 




2620 




JR 


JUMP2 




2630 


LINE 


DEC 


HL 


;RESET HL TO PROPER LOCATION 


2640 




DEC 


HL 




2650 




DEC 


HL 




2660 




POP 


BC 




2670 




POP 


BC 




26 80 




JR 


SKIP2 




26 90 


JUMP4 


POP 


BC 




2700 




JR 


ERROR 




2710 


MATCH 1 


INC 


HL 


; POINT TO TEXT ANSWER 


2720 




LD 


DE,41E8H 


f POINT TO USER'S ANSWER 


2730 


MATCH 2 


LD 


A,(HL) 




2740 




CP 


2FH 


; CHECK FOR SLASH 


2750 




JR 


Z,HATCH3 




2760 




CP 


00H 


; CHECK FOR END OP LINE 


2770 




JR 


Z, MATCH 3 




2780 




EX 


DE,BL 




2790 




LD 


B,(HL) 




2800 




EX 


DE.HL 




2810 




CP 


B 




2820 




JR 


NZ,FAIL 




2830 




INC 


HL 




2840 




INC 


DE 




2850 




JR 


MATCH 2 




2860 


FAIL 


INC 


HL 


;N0 MATCH THIS TIME 


2870 




LD 


A,(HL) 




2880 




CP 


00H 


; CHECK FOR END OF LINE 


2890 




JR 


Z,SETFLG 




2900 




CP 


2FH 


; CHECK FOR SLASH 


2910 




JR 


Z, MATCHl 




2920 




JR 


FAIL 




2930 


SETFLG 


LD 


C, 'N' 


;SET FLAG TO NO 


2940 


HATCH 3 


POP 


HL 




2950 




JR 


TYPE 4 




2960 


ERRHES 


DEFH 


'ERROR IN 


LINE' 


2970 




DEFB 


00H 




2980 




END 







cOt^ CATALOGUE 

" WITH EVERY OI^ER! 

SCRIPMOD 

By TERRY FIVEASH 



Scrip mod Features 

• Allows you to use all those neat thinQs 
your printer does from Scripsit! 

• For use with any smart printer. 

• Does not require special drives for 
your printer. 

• Use with LP IV, DW II, IDS 440, IDS 
460, NEC, DIABLO, QUME, and 
more! 

UNDERLINING, SUPERSCRIPT, 
SUBSCRIP, BOLD TYPE, PITCHES. 

YOU CAN EVEN UNDERLINE SPACESt 



This Program is a must for 

every Scripsit user. 

Scripmod is supplied on disc 

with full documentation. 

$39.95 



Print Central 

A utility tor those with smart printers. 
To send a control code to your printer, 
simply press the clean key and the ap- 
propriate letter key and see instant 
execution. Any code from 1 to 31 may be 
sent. 

MODEL I — $24.95 




THE BLACK BOX 
By K»n Heygs 

Shool rays through block 
tioK, in search of htdden 
stars. Watch out ! 
They're not always 
where they seem. Model 
I or Ml, 16K Level II Mlr>- 
imun. SH.9S 



80 KISMET 
Sy WaaOell Ronton 
Super version of this 
Old game for your 
Model I or Model 111 
THS-eO. Graphics. 16K 
Level II MiniFTHiml^ 

S14.95 



BLACK 




VIDEO SCftEEN FILTER 

Hard acrylic plastic screen 
that's easy lo install— easy 
on your eyes. 

OS 1 -Model I $14,95 

GS 2 -Model II, III $14.95 
GS3-Leedexi00..$t4 95 
Special Size $16.95 



BOX 



THE TEMPLE OF HAH 

ByDanCaa« 
Rescue the fair prin- 
cess from the clutches 
ol the people o) Rah 
before it's too latel 
Super adventure wiih 
wundl For Model I or 
III, 16K Level II mini- 
mun, $14.95 



B^ 



VISA — MASTERCARD 

Add 3% 



H 



Oklahoma Residents add 2% tax. 
C.O.D.'s WELCOME! 

CO 

414 South Oak 
Sapulpa, Okla. 74066 

[918] 224-9588 




fSoe List ol Advertisers on page 306 
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. CANADIANS 

NOW IN STOCK 
ACORN SOFTWARE 

PINBALL 

BASKETBALL 

INVADERS FROM SPACE 

Super action with SOUND 
& Machine Language SPEED 

Each avail for Mod 1 on 
CASS $19.95 DISK $24.95 

SYSTEM SAVERS 

Will copy SYSTEM TAPES 

onto DISK or Cassette 

Mod 1 DISK SYSTEM $19.95 

MEMOREX5V4" DISKETTES 
$5.50 ea 10 for $50.00 

MORE TO COME (& Mod 3) 

SENDFOR FREE INFORMATION 

We accept VISA 

CMD MICRO ^459 
PO BOX 1212 
EDMONTON, ALBERTA 

T5J 2M4 



0SM8K) 



APPLE 



TRS-80t 




PflESCNTS: 



Cempulcrt 

8^ Gambling 

freducis 

Mocosinc' 

PROBABILITY HANDICAPPING 
DEVICE 1 - A BASIC PROGRAM FOR: 
HORSE RACE HANDICAPPING 

This incredible progiam was wnMeri Dy 3 protession^t sollware 
consultam lo TRW Space Sysien^s. This is a comple" pfogram 
carefully Human lactored lor easy use II is a comprefiensive 
horse racing system tor spotting overlays in tdorougliOred sprint 
races ''our computer will accu'aieiy predict tne win pioDaDiliIy 
and odds line tw eacti fiorse Dasefl on your entries from tfte rac- 
ing lonn. The nexi day overtaid horses can be spotled on the 
track loK Doard. The user's manual contams a complete explana- 
tion of overlay Detling plus mucti more useful inlormatwn The ap- 
pendix conUms a detailed lab run ol a 100 consecutive (ace 
sysie-Ti wKout snowing m imiiJng SOS rMurn {St. 50 return- 
ed tor each Si .00 flat wager ) Includes many features sued as 
error correclion. Dutitile sort, line printer oulpul. automatic 
keyboard deDounce, archiving, etc. Tfie manual may Oe ordered 
separately lor perusal tor S7 95 and credit 

CHAUEHGER IP. 2P, or 4P SK VERSIONS Now AwUUil 
PM-1 \i»m't maniul and catHtt* for: 
AppM II |tK), IK^O Liwl II (16K), ChiMngH (IK) 29.95 
TBS^Oer APPLE OlStl M.95 

BRAND NEW FROM SDL: WIN AT THE RACES. This Ihorougnored 
handicapping algoriltirn is based on a cunemiy popular book on 
thoroughbred iTHrilipie regression lecnmgues. Sotti spnnis and 
routes AH ol the tealures ol PHD-1 plus more This program in- 
corporates the Best data entry technique we've ever seen 
32K TRS-80 or APflE CASSEHE 34 95 

32K TRS-eOor APPLE DISK 39.95 

BOOMS: 

Winning MnMRKw I1.9S + .75PM 

BMtingtheHtceiwHhiCaniputir 14.95 + .75PtH 

Make checks payable to Mi tOUrUlfHOirj. B ^193 
tvnvtmmt BM.. Suite F, Woodland HM. CA 913M 

!^B^ CA residents add 6 % sales lax. ^KF 
l^^K PHONE ORDERS: 213-992-0514 ■■— 
■SEND $2.00 TO PUCE YOUR NAME ON OUR MAILING LIST 
f WS-flU is a regisierea trademark ol Tandy Corporation. 









Program Listing 4. 








00000 


TRS- 


30 PILOT 


INTERPRETER | 






00010 














00020 


BY RANDY HAWKINS 








00030 


6214 HIDDEN COVE 








00040 


CORPUS CHRISTI, TEX 








00050 














00060 


THIS 


PROGRAM 


LOADS THE 


PILOT INTERPRETER 






00070 


INTO 


HIGH MEMORY OF A 16K CASSETTE BASED 1 






00060 


SYSTEM ... ABSOLUTE JUMPS ARE KEPT TO A 






00090 


MINIMUM TO MAKE RELOCATION SIMPLEST. 






00095 










41E8 




00100 




ORG 


41E8H 


LOAD BUFFER WITH 


41E8 


33 


00110 




DEFM 


'32465' 


PROPER MEMORY SIZE 


41ED 


00 


00120 




DEFB 


00H 


ZERO HARKS END 


4016 




00130 




ORG 


4016H 


RESET KEYBOARD DCB 


4016 


987E 


00140 




DEFW 


7E98H 


TO INITIALIZATION 


7E98 




00150 




ORG 


7E98H 




7E98 


21FF7E 


00160 




LD 


HL, BEGIN 


; DEFINE 'NAME' 


7E9B 


228F41 


00170 




LD 


(418FH),HL ;COMMAND TO XEQ | 


7E9E 


21E303 


00180 




LD 


HLr03E3H 




7EA1 


221640 


00190 




LD 


(4016H) ,HL ;RESET KEYBOARD | 


7EA4 


21B67E 


00200 




LD 


HL, TITLE 


;DISPLAY TITLE 


7EA1 


CDA728 


00210 




CALL 


28A7H 


;ROM ROUTINE 


7EAA 


3E0D 


00220 




LD 


A,0DH 




7EAC 


CD2A03 


00230 




CALL 


032AH 




7EAF 


AF 


00240 




XOR 


A 


;JUMP INTO ROM 


7EB0 


21E741 


00250 




LD 


HL,41E7H 


; AFTER MEM SIZE 


7EB3 


C3C000 


00260 




JP 


00C0H 


; QUESTION 


7EB6 


IC 


00270 


riTLE 


DEFB 


ICH 




7EB7 


IF 


00280 




DEFB 


IFH 




7EB8 


54 


00290 




DEFM 


'TRS-80 


PILOT INTERPRETER S" 


7ED3 


00 


00300 




DEFB 


00H 




7ED4 




00310 




ORG 


7ED4H 




7ED4 


CDC901 


00320 


::ls 


CALL 


01C9H 


; CLEAR SCREEN 


7ED7 


1879 


00330 




JR 


TYPE 




7ED9 


CDC901 


00340 


HIDE 


CALL 


01C9H 


; CLEAR SCREEN 


7EDC 


3E17 


00350 




LD 


A,17H 


;AND SWITCH TO 


7EDE 


CD2A03 


00360 




CALL 


032AH 


;WIDE LETTERS 


7EE1 


186F 


00370 




JR 


TYPE 




7EE3 


23 


00380 


ASK 


INC 


HL 




7EE4 


7E 


00390 




LD 


A,{HL) 


; CHECK FOR QUOTE 


7EE5 


FE22 


00400 




CP 


22H 




7EE7 


205B 


00410 




JR 


NZ, WRONG 




7EE9 


E5 


00420 




PUSH 


HL 




7EEA 


C5 


00430 




PUSH 


BC 




7EEB 


23 


00440 




INC 


HL 


;IS THERE A MESSAGE 


7EEC 


7E 


00450 




LD 


A,{HL) 


;AFTER THE QUOTE? 


7EED 


FE00 


00460 




CP 





;IF NOT, THEN GO 


7EEF 


2803 


00470 




JR 


Z,ASK2 


; AHEAD TO ASK2 ... 


7EF1 


CDA728 


00480 




CALL 


28A7H 


;TYPE MESSAGE 


7EF4 


CDB31B 


00490 


ASK2 


CALL 


1BB3H 


;THEN USE ROM 


7EF7 


FE01 


00500 




CP 


01H 


; ROUTINE TO ACCEPT 


7EF9 


2812 


00510 




JR 


Z, STRTl 


; ANSWER 


7EFB 


CI 


00520 




POP 


BC 




7EFC 


El 


00530 




POP 


HL 




7EFD 


184A 


00540 




JR 


SKIP 




7EFF 


2AA440 


00550 


BEGIN 


LD 


HL,(40A4H) ;FIND TEXT START | 


7Ffl2 


0E59 


00560 




LD 


C'Y' 


fSET YES/HO FLAG 


7F04 


D5 


00570 




PUSH 


DE 




7F05 


Dl 


00580 


START 


POP 


DE 




7F06 


3A4038 


00590 




LD 


A,(3840H) fCHECK FOR BREAK | 


7F09 


FE04 


00600 




CP 


04H 




7F0B 


2001 


00610 




JR 


NZ,STRT2 




7F0D 


76 


00620 


STRTl 


HALT 




;JUMP TO 'READY' 


7F0E 


7E 


00630 


STRT2 


LD 


A,{HL) 




7P0F 


FE00 


00640 




CP 


00K 


; CHECK END OF 


7F11 


23 


00650 




INC 


HL 


;TEXT ... IF NOT 


7F12 


2005 


00660 




JR 


NZ,STRT4 


;THEN CONTINUE 

Program continues 
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CONVERT YOUR SERIAL PRINTER TO PARALLEL 



NEW MODEL UPI-3 SERIAL PRINTER INTERFACE MAKES IT 
POSSIBLE TO CONNECT AN ASCII SERIAL PRINTER TO THE 
PARALLEL PRINTER PORT ON THE TRS-80. 

Software compatibility problems are totally eliminated because 
the TRS-80 "THINKS" that it has a parallel printer attached. 
NO MACHINE LANGUAGE DRIVER NEEDS TO BE LOADED 
INTO HIGH MEMORY BECAUSE THE DRIVER ROUTINE fOR 
THE UPI-3 IS ALREADY IN THE LEVEL II ROM! SCRIPSIT, PEN- 
CIL, RSM 2, ST80D, NEWDOS, FORTRAN, BASIC etc. all work as 
if a parallel printer was in use. 

The UPI-3 is completely self contained and ready to use. A 34 
conductor edge card connector plugs onto the parallel printer 
port of the model I Expansion Interface or onto the parallel 
printer port on the TRS-80 III. A DB25 socket mates with the 
cable from your serial printer. The UPI-3 converts the parallel 
output of the TRS-80 printer port into serial data in both the 
RS232-C and 20 MA. loop formats. 



SPEEDWAY ELECTRONICS 

1354 AUBURN 

SPEEDWAY, IN 46224 ^275 



Also available from 
YE ODDE SHOPPE 
(317) 925-04% 



VISA MasterCard 

IRS 80 IS a (rademark ol larvdy 




Switch selectable options include: 

• Linefeed after Carriage Return 

• Handshake polarity (RS232-C) 

• Nulls after Carriage Return 

• 7 or 8 Data Bits per word 

• 1 or 2 Stop Bits per Word 

• Parity or No parity 

• ODD or EVEN Parity 

UPI-3 assembled with 90 day warranty 
Kit with all parts, sockets, cabinet, etc. 
UPI-4 for use with Model 1 and R5 Printer 
Interlace Cable 

Kit with alt parts, sockets, cabinet, etc. 
Manual only (may be applied to order) 
Ten day return privilege on assembled units 
Shipping and Handling on all orders 
Specify BAUD rate 50-%00 BAUD 



$139.95 
$ 99.95 

$149.95 
$104.95 
$ 5.00 

$ 4.00 



TWO USER 
MULTI-TASKING 



$89 T S H A R E VI. 3 

A SPLIT PERSONALITY FOR YOUR 
TRS-80 MODEL I 

• Interrupt driven executive patches to parent operating system 
WEWDOS 2.1 or TRSDOS 2.3, 

• Allows two active users to share a single TRS-80. 

• Execute BASIC or MACHINE LANGUAGE (above 7700 Hex). 

• Joint access of disk files. 

• Second user ties to HOST via modem, terminal, or 2nd TRS-80. 

• Options for Expansion Interface, RS-232, TRS232, or HUH 
interface. 

• SIMPLEX MODE for non serial-port users. Requires only a 
printer to act as second "screen". Jobs share the keyboard 
under user controL 

• CONFIGURE UTILITY partitions memory usage and selects I/O. 



TRS-80 tm Radio Shack/Tandy Corp. 
NEWDOS tm Apparat, Inc. 
TRS232 tm Small System Software 
HUH tm California Computer Systems. 







- H 



I 



$49 



DBMS 
MULTI - FEATURE DATA MANAGER 

Up to 20 user defined fields. 

Files extend across multiple diskettes. 

Supports up 10 four drives. 

Automatic single drive disk mount requests. 

Four data types and computational fields. 

Flexible REPORT GENERATOR. 

Fast assembly language sorts. 

MULTI-FIELD sorts and searches. 

Keyed access on any sorted field. 

Indexed relations between files. 



TO ORDER 



203 ARDEN STREET ^2m 
GLENDALE,CA 91203 
(213) 649-0369 



-See List of Advortiseis on page 306 
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PACKER Machine language program ifiai edits all of pari 
ot your Basic program lo run taste- save rremory. or 
ease editing The 5 options include UNPACK--unpacks 
multiple s'aiement lines inio single statements 
mainlaining logic inserts spaces and renumbers lines 
SHORT— deletes unnecessary words, spaces, and REM 
stalemenls PACK— packs lines mto maximum multiple 
statement lines including all branches MOVE— moves 
line or blocks ol lines to any ne* location on program On 
2 cassettes tor 16K 32K & 4eK 

For TRS-80 Mod I or III Level II or Disk Basic . , S29 95 
SYSTEM TAPE DUPLICATOR Copy youi SVSTEM format 
tapes Includes verify toulmes The Model III version 
allows use o( both 500 and 15O0 baud cassettes speeds 
Fot TfiS-80 Model I or III Level N . SI5 95 

CASSETTE LABEL MAKER A mim word processor to print 
cassette labels on a line printer Includes 50 peel - and ■ 
slick labels on tractor teed paper 
For TRM Model I ot ill Level II & Printer S17 95 

PRINT TO LPRINl TO PRINT Edits your Basic program in 
seconds to change all Prints to LPnnts (except Pnntia or 
PtintSl or LPiirts to Prints. Save edited version 

For TR-80 Model I or III Level II S12 95 

FAST SORT ROUTINES tor use with Radio Shacks 
Accounts Receivable inventory Control I and Disk 
Mailing List Systems tor Model I Level II Sorts in 
SECONDS' You'll be amazeb at the time they can save 
Supplied on data flisketle with complete instructions 
FAST SORT lor Accounts Receivable . S19 95 

FAST SORT tor Inventory Control I . S19 95 

FAST SORT for Disk Mailing List ispecily data fliskeile ol 
cassette for l drive sysiemi .... E14 95 

ALL THREE ROuriNES $44 95 

Prices suOiect to change without notice Call or write lor a 
complete catalog Dealer inquiries invited VISA and 
Maslercharge accepted Foreign order m US currency 
only Kansas residents add 3\ sates tax 
On-lme catalog m Wicfula FORUM-BO 316-682-2113 
Of call our 24 hour phone i3l6i 683 4811 or write 
COTTAGE SOFTWARE 
614 N. HARDING 
WICHITA. KANSAS 67208 ^233 
TRS-80 IS a t-aoemaik of Tandy Corporation 



DISK-80 

EXPANSION INTERFACE 

FOR THE 

TR$-80 MODEL I 




• Disk controller (4 drives) 

• Hardware data separator 

• Buffered TRS-bus connector 

• Real-time clock 

• Printer port (optional) 
ASSEMBLED & TESTED 

wilh 16KRAM $329.95 

Centronics Pnnler 

Port add . . $ 50,00 

with 32K RAM add . $ 50.00 

DISK-80 PC board $ 48.00 

Printer/Power Supply 

PC board, ... . $ 16.00 

Complete Kit with 16K 

RAM and Pnnler Porl $275.00 

Tti« DISK,80 EXPANSION INTERFACE is Radio 
Shack hardware and softwar* compalibiB and cartias 
a 90 day warrantee including parts and labor. 
Includes user's manual and power supply 

Call 1-800-645-3479, in N.Y. 1-516-374-6793 
or write: The MicroMmt lie. 

917 Midway 

Woodmere, NY 11598 
Dealer 

inquiries _^ ^^^^ .i,..a,co,p 

invited. 



^310 




7F14 7E 


00670 




LD 


A, (HL) 


;THIRD ZERO IN A 


7F15 FE00 


00680 




CP 


00H 


;ROW MEANS GO TO 


7F17 28F4 


00690 




JR 


Z,STRT1 


;HALT AT STRTl 


7F19 23 


00700 


STRT4 


INC 


HL 




7F1A 5E 


00710 




LD 


E,(HL) 


;SAVE PRESENT LINE 


7F1B 23 


00720 




INC 


HL 


;NUMBER IN DE 


7F1C 56 


00730 




LD 


D,(HL) 


;REGISTER PAIR 


7F1D D5 


00740 




PUSH 


DE 


;AND SAVE IN STACK 


7F1E 23 


00750 


BACK 


INC 


HL 


;LOAD A WITH THE 


7F1F 7E 


00760 




LD 


A,(HL) 


.•COMMAND CHARACTER 


7F20 FE59 


00770 




CP 


■y 


;AND JUMP TO THE 


7F22 2822 


00780 




JR 


Z,FLAG 


; INDICATED SECTION 


7F24 FE4E 


00790 




CP 


'N' 




7F26 281E 


00800 




JR 


Z , FLAG 




7F28 FE54 


00610 




CP 


'T' 




7F2A 2826 


00820 




JR 


ZfTYPE 




7F2C FE41 


00830 




CP 


•A' 




7F2E 28B3 


00840 




JR 


Z,ASK 




7F30 FE4D 


00850 




CP 


•M' 




7F32 285B 


00860 




JR 


Z, MATCH 




7F34 FE4A 


00870 




CP 


'J' 




7F36 2862 


00880 




JR 


Z,JUHP 




7F38 FE45 


00890 




CP 


'E' 




7F3A 2852 


00900 




JR 


Z,ENDl 




7F3C FE57 


00910 




CP 


'W 




7F3E 2899 


00920 




JR 


Z,WIDE 




7F40 FE43 


00930 




CP 


■c 




7F42 2890 


00940 




JR 


Z,CLS 




7F44 1838 


00950 


WRONG 


JR 


ERROR 


; SORRY, NO MATCH 


7F46 B9 


00960 


FLAG 


CP 


C 


; COMPARE TO FLAG 


7F47 28D5 


00970 




JR 


Z,BACK 




7F49 23 


00980 


SKIP 


INC 


HL 


;SKIP FORWARD TO 


7F4A 7E 


00990 




LD 


A,(HL) 


; START OF NEXT 


7F4B FE00 


01000 




CP 





;LINE SINCE FLAGS 


7F4D 20FA 


01010 




JR 


NZfSKIP 


;DID NOT MATCH 


7F4F 23 


01020 




INC 


HL 




7F50 18B3 


01030 


SKIP2 


JR 


START 




7F52 23 


01040 


TYPE 


INC 


HL 




7F53 7E 


01050 




LD 


A,(HL) 


; CHECK FOR QUOTE 


7F54 FE22 


01060 




CP 


22H 


;£, JUMP TO 


7F56 2026 


01070 




JR 


NZ, ERROR 


; ERROR MESS 


7F58 E5 


01080 




PUSH 


HL 




7F59 C5 


01090 




PUSH 


BC 




7F5A 23 


01100 




INC 


HL 




7F5B 7E 


01110 


TyPE2 


LD 


A,(HL) 


;END OF LINE? 


7F5C FE00 


01120 




CP 







7F5E 2815 


01130 




JR 


Z, TYPE 3 




7F60 FE40 


01140 




CP 


40H 


; CHECK FOR @ 


7F62 2806 


01150 




JR 


Z, BUFFER 




7F64 CD2A03 


01160 




CALL 


032AH 


;PRINT CHAR. IN 


7F67 23 


01170 




INC 


HL 


;A REGISTER AND 


7F68 18F1 


01180 




JR 


TYPE 2 


.'CONTINUE ... 


7F6A E5 


01190 


BUFFER 


PUSH 


HL 


; PRINT THE 


7F6B 21E841 


01200 




LD 


HL,41E8H 


; CONTENTS OF 


7F6E CDA728 


01210 




CALL 


28A7H 


;THE ANSWER 


7F71 El 


01220 




POP 


HL 


; BUFFER 


7F72 23 


01230 




INC 


HL 




7F73 18E6 


01240 




JR 


TYPE2 




7F75 3E0D 


01250 


TYPE3 


LD 


A,0DH 


; PRINT A 


7F77 CD2A03 


01260 




CALL 


032AH 


; CARRIAGE 


7F7A CI 


01270 




POP 


BC 


; RETURN 


7F7B El 


01280 




POP 


HL 




7F7C 18CB 


01290 


TYPE 4 


JR 


SKIP 




7F7E 21F27F 


01300 


ERROR 


LD 


HL,ERRMES : IDENTIFY 1 


7F81 CDA728 


01310 




CALL 


28A7H 


;LINE NO. 


7F84 El 


01320 




POP 


HL 


;THAT HAS 


7F85 CD9A0A 


01330 




CALL 


0A9AH 


; ERROR 


7F88 CDBD0F 


01340 




CALL 


0FBDH 




7F8B CDA728 


01350 




CALL 


28A7H 




7F8E 76 


01360 


ENDl 


HALT 




Program continues 
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6 ways to give 
your TRS-80* a 



+ PLUS 



Exhaustive research and professional standards 
bring you the best in business software. 



EASYTRAK"^ 

KEEP YOUR SALES CGRVING UP- 
WARD WITH EASYTRAK "', a powerful, 
all-purpose activity tracking system. Gser- 
specified options enable you to monitor 
sales activity by territory, product line, 
salesman, or by combinations. Can 
monitor inquiries, sales calls and order 
booking. Production activity (by shift, by 
product, by day, by team, 
etc.), spending or in- 
come activity are simple 
to set up with F.ASY- 
TRAK "" . Extensive video 
displays make available 
individual, group or total summaries, rela- 
tive averages, and percentage data all at the 
touch of a button- (Jse of an 80-column 
printer is optional, 

MODEL l/lli $100 t<4^V^^ 

MODEL II *140 




^e^ 




+ ACCOUNTS RECEIVABLE 

PUT MORE CASH IN 
YOUR BANK AC- 
COUNT with -(-Account 
Receivables many col- 
lection/credit features, 
including average pay- 
ment days, aging 
schedule and statements. 
Open-item system records sales activity 
this year and last, optional automatic dis- 
counts and salesman assignment. Cash re- 
ceipts and A.'R adjustments feature exten- 
sive on-line validation. And. yes. ^- Accounts 
Receivable handles the pesky new 9-digit 
zip code. Other optional features include 
service charges to selective customers: 
partial and ' on-account' payments. Posts, 
at your option, to -i-Qeneral Ledger. 

MODEL I/in $250 
MODEL II *300 



+ GENERAL LEDGER 

SUCE OUT MORE PRORT by using 
-^General Ledger to monitor your financial 
status. Features include fuily-flexible finan- 
cial statements, both budget and last year 
comparisons, special report options, 
monthly and quarterly trial balances, man- 
ual and/ or automatic journal entries ail with 
extensive audit trails. You structure the 
chart of accounts with up to 5 digit account 

"'^'^'^^^ MODEL I/Ill *250 

MODEL II $300 




• FIXED ASSETS 

A POWERFUL SET OF TOOLS TO 
CALCULATE and monitor lixed asset ex- 
penditures, book and tax depreciation, in- 
vestment tax credit, etc. Will even forecast 
luture depreciation for you, (Handy at 
budget time!) Code structure enables you 
to classify assets by departments, buildings, 
groups or other categories. Handles seven 
depreciation methods. Can post to • Gen- 
eral Ledger for you. 

MODEL l/m $250 
MODEL II $300 




+ACCOUNTS PAYABLE 

FUNNEL THAT STACK OF BILLS into 
+ Accounts Payable system and create an 
orderly, manageable flow of vendor his- 
tohes, cash requirements forecasts, check 
registers and checks, aging schedules, etc. 
Will accept manual checks, 
reversals, and adjustments. 
Pay by selected vendor, in- 
voice, due date, discount 
dates, and optionally post di- 
rectly to your * General 
Ledger. Supports 5-digit 
vendor numbers. 



MODEL I/Ill 
MODEL II 



$250 
$300 




+ PAYROLL 

KEEP YOUR EMPLOYEES HAPPY and 

smiling with prompt, accurate and profes- 
sional payroll records. Will handle weekly, 
biweekly, semimonthly, monthly payrolls, 
produce checks, check 
registers, labor reports, 
earnings reports. Form 
94rs. W2s, etc. Can 
handle fixed/voluntary 
deductions, hourly/ 
salary employees, 
bonuses, city and state taxes, etc. Easy to 
use and update tax tables. Automatic 
-t- General Ledger posting. 




MODEL l/III 
MODEL II 



$250 
$300 



Dealer inquiries invited 



IRAK > « inflfi^wk of Plu^ Ci"«ejTtH T^'<i I. 



SPECIALI All of the above: MODEL l/lll $1250 

MODEL II S1500 

-fPLUS SOFTWARE comes to you feature -packed 
from on-line validation to machine-language file 
handling. Extensive documentation and thorough 
installation guide accompany each order. Source 
code is included. Model 11 requires 64K. Mode! l/lll 
requires 32K, 2 disks. 



Please send me Ihe fallowing PLUS Software: 



a EASYTRAK' 
a * P/H 



G/L 
F/A 



a ♦ A/R D < A/P 
□ FREE CBtalog 



+ PLUS 



To order, call TOLL-FREE 24 hours 
1 800-528-6050 EXT. 1562 

(In Arizona. 1-800-352-0458 Ext. 1562) 



PLUS COMPUTER TECHNOLOGY I 

POST OFFICE BOX 1152 

ANGLE"^ON TEXAS 7751b '7M>ad9'108 



NC 



AMOUNT <T» residents add 5% wles tax); 5 



Plus Computer 

rSAME _„ 



P0Boxll52 • Angleton,TX775l5 



ADDRESS 

CITY 

STATE 



D Model I 



D M/C 
Bank ■ _. 
Signature 



C VISA Card ' , 



Expiration Date . 



OC5 



-See List of Advertisers on page 306 



80 Microcomputing, July 1981 • 141 



STEPWISE 

MULTIPLE LINEAR REGRESSION 

Fast Compiled Machine LanquagR 
Comprehensive Data Base Manager 

* Transformations 

* Lags 

Designate Any Variable As Dependent 

At Run Time 
Descriptive Statistics 
Correlation Matrix 
ANOVA Table 

Partial Correlation Coetficients Each Step 
Future Releases Are Upward Compatible 
And Include: Factor Analysis. Time Series, 
Linear Programming 

For 2 Disk, 48K TRS-SO®, With Line Printer 
Write For Information On Other System 

Conligurations" 
Price $89.00 - Documentation Only $10,00 
Visa And Master Charge Accepted 



Barstrann Corporation - Dept. A 
P.O. Box 265 Mid City Station 
Dayton. Ohio 45402 



^20^ 



DISASSEMBLED HANDBOOK 
FOR TRS-80 

VOLUME 5--$l8. POSTPAID 

Chapter 1: Writing Disassembler Programs 
Chapier 2: High Speed Disassemblers 
Oiapler 3: Spooling Theory & Pr-ttlitc 
Chapter 4: Porl Encoders & IJeiiiilers 
Chapiet 5: Wniing Imerriipi Programs 
Chapier 6: D' A Conveners & <. oiisirutihon 
Chapier 1: \ D t onveilers & t onstrutlion 
Chapter N High Speed MorseCode I'rogram 
Chapier 1. t oiiim Bulklin Board Svslcms 
Chapier 10: Radio relei>pe From A lo / 
Chapier 11: Sell- Programmed Learning Q/A 
Appendix A: Voluiiies 1-2-3 combined index 
Appendix B: Vols. 1-2 3 Pgms. on Disk 130 

VI3LUME l^$IO. POSTPAID 

81 h printing 

VOLUME 2-SIS. POSTPAID 

5th printing 
-GLRMAN & hRtNC H LANGUAGt EDITIONS- 

RICHCRAFT EI\CIMlERI.\G I. TO. 
Drawer 1065, Wahmeda Industrial Park 
Chautauqua, New York 14722 
phone <7}6i 753-26S4 for COO orders 

tUSfuiKh. udil I4.i0oi'ersca\ uirmuil) i^2I^ 




^-^^ 



»*^^ 




IJ You've Written a 
Topnotch Program- 
We'd Like to Publish It! 

ProgromB needed for BUSINESS/ 

OFFICE AppUcationB: 
WORD PROCESSING 
PATROLL/TAX CALCULATION 
GENERAL LEDGER/AR-AP 
ORDER ENTRY/INVENTORY 

Start collecting your royalty 

checkB Bf>ont Write for our free 

Programmer's Kit today. 
INSTANT SOFTWARE. INC. 
SubmisBionB Dept. ^ 

Peterborotttfh. NH 03458 



7F8F flE59 


B1370 MATCH 


LD 


0,'Y' 


;SET FLAG TO YES 


7F91 23 


01380 


INC 


HL 




7F92 7E 


01390 


LD 


A,(HL) 


;LOOK FOR QUOTES 


7F93 FE22 


01400 


CP 


22H 




7F95 20E7 


01410 


JR 


NZ, ERROR 




7F97 E5 


01420 


PUSH 


HL 




7F98 1830 


01430 


JR 


HATCHl 


;CONT AT MATOHl 


7P9A 23 


01440 JUMP 


INC 


HL 




7F9B 7E 


01450 


LD 


A,(HL) 


;LOOK FOR QUOTES 


7F9C PE22 


01460 


CP 


22H 




7F9E 20DE 


01470 


JR 


NZ, ERROR 1 


7 FAB 23 


01480 


I NO 


HL 




7FA1 05 


01490 


PUSH 


BO 


;PUT TARGET LINE 


7FA2 CD5A1E 


01500 


CALL 


1E5AH 


;NUMBER IN DE 


7FA5 2AA440 


01510 


LD 


HL,(40A4H) 1 


7PA8 7D 


01520 JUHP2 


LD 


A,L 


;HAVE WE REACHED 


7FA9 B4 


01530 


OR 


H 


;END OF TEXT? 


7FAA 281B 


01540 


JR 


Z,JUHP4 




7FAC 4E 


01550 


LD 


0,(HL) 


;NEXT LINE ADDRESS 


7FAD 23 


01560 


INC 


HL 


;IS SAVED IN THE 


7FAE 46 


01570 


LD 


B,(HL) 


;B0 REGISTER PAIR 


7FAF C5 


01580 


PUSH 


BO 




7FB0 23 


01590 


I NO 


HL 




7FB1 7E 


01600 


LD 


A,(HL) 


;IS THIS LINE 


7FB2 BB 


01610 


CP 


E 


;THE SAME AS 


7FB3 2803 


01620 


JR 


Z,JUHP3 


; TARGET NUMBER 


7FB5 El 


01630 


POP 


HL 




7FB6 18F0 


01640 


JR 


JUMP2 




7FB8 23 


01650 JUHP3 


INC 


HL 


;FIRST NUMBER DID 


7FB9 7E 


01660 


LD 


A,{HL) 


.•MATCH — DOES THE 


7FBA BA 


01670 


CP 


D 


; SECOND? 


7FBB 2803 


01680 


JR 


Z,LINE 




7FBD El 


01690 


POP 


HL 




7FBE 18E8 


01700 


JR 


JUHP2 




7FC0 2B 


01710 LINE 


DEO 


HL 


{TRANSFER CONTROL 


7FC1 2B 


01720 


DEO 


HL 


;T0 THIS LINE AFTER 


7FC2 2B 


01730 


DEO 


HL 


.-RESTORING POINTER 


7FC3 01 


01740 


POP 


BO 




7FC4 01 


01750 


POP 


BO 




7FC5 1889 


01760 


JR 


SKIP2 




7FC7 CI 


01770 JUHP4 


POP 


BC 




7F08 18B4 


017 80 


JR 


ERROR 




7FCA 23 


01790 HATOHl 


INO 


HL 


; COMPARE THE ANSWER 


7FCB 11E841 


01800 


LD 


DE,41E8H ;IN THE STANDARD 


7FCE 7E 


01810 HATCH2 


LD 


A,(HL} 


; LEVEL II BUFFER 


7F0F FE2F 


01820 


OP 


2FH 


;WITH THE LIST 


7FD1 2810 


01830 


JR 


Z,HATCH3 ;IN THE PROGRAM 


7FD3 FE00 


01840 


CP 







7FD5 2818 


01850 


JR 


Z, HATCH 3 


7FD7 EB 


01860 


EX 


DE,HL 




7PD8 46 


01870 


LD 


B,(HL) 




7FD9 EB 


01880 


EX 


DE,HL 




7FDA B8 


01890 


CP 


B 




7FD& 2004 


01900 


JR 


NZ,FAIL 




7 FDD 23 


01910 


INC 


HL 




7FDE 13 


01920 


INO 


DE 




7FDP 18ED 


01930 


JR 


MATCH 2 




7FE1 23 


01940 FAIL 


INO 


HL 


;THIS DID NOT HATCH 


7FE2 7E 


01950 


LD 


A,(HL) 




7FE3 FE00 


01960 


CP 





•END OF LINE? 


7PE5 2806 


01970 


JR 


Z,SETFLG 


7FE7 FE2F 


01980 


OP 


2FH 


;0R JUST A SLASH? 


7FE9 28DF 


01990 


JR 


Z,MATCH1 


7FEB 18F4 


02000 


JR 


FAIL 




7FED 0E4E 


02010 SETFLG 


LD 


C'N- 


;SET FLAG TO NO 


7FEF El 


02020 HATCH3 


POP 


HL 




7FF0 188A 


02030 


JR 


TYPE 4 




7FF2 45 


02040 ERRHBS 


DEFH 


• ERROR 


IN LINE' 


7FFF 00 


02050 


DBFB 


00H 




0000 


02060 


END 






00000 TOTAL 


ERRORS 
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NAME THAT SONG 



Name That Song is a fantastic new graphics game from Software Innova- 
tions. The animated graphics, fast action, strategy, super music and sound 
effects combine to make this "The best new graphics and sound game out 
fortheTRS-80." 

You and i^our opponent sit forward in your chairs, intently watching the 
video screen. After givins a brief rundown on the rules, the announcer quiets 
the audience and spins the Wheels of Fortune.. .Round and round they; 30. 
/inaf/v coming (o resf. This lime, its only $100, but next lime, it could be a 
double $1000! Abruptii;, the music begins, and you know that song... You 
press your buzzer, and Name that tune! 

The action is fast and furious as you frantically try to bang your 
button before your opponent does. As you both name songs 
correc(Jy, the score goes higher and higher, but 
each time you seem to win more money when you 
name a song than when your opponent does. 
Finally, you have won the first 
round by a score of three songs 
to two. 

Each round has a different 
point value. The first two rounds 
are worth ten points, and the 
third is worth 20. A tie splits the 
points evenly between the two contestants. 

There is a pause in the action as a commercial comes on. 
After a pause, the monitor clears, and seven numberedlights 
appear- Your opponent chooses one, and a 
cryptic clue is revealed- The song auction has 
begun. You bid on the song: 
"I can Name that Song in 7 notes" 
"I can Name that Song in 6 notes" 
"I can Name that Song in 5 notes" 
And after a long pause, your opponent says: 
"Name that Song!!" 

The audience quiets and the special guest musician, Trumpeter Willie 
Makeit, plays the five notes. Can you name that song? You type a title and 
hesitantly press enter, but the computer emits a loud raspberry. -.The 
audience groans— You had the wrong song in mind... 




The round ends when the seven clues are all revealed. The 
current leader is announced, and the program again pauses 
for a short commercial. The action continues... 

The /arge grap/iic rimer is sef /or 30 seconds, and 

slowly begins ticking away. The songs come quickly, 

one after another, as you frantically attempt to 

hit your buzzer before your opponent so you 

can have a chance to name that familiar tune- 

You find yourself ahead as the clock winds 

down toward zero, and shrewdly slop entering 

titles and let the songs play to their finish to use 

up precious (for your opponent) time. But hold 

every thing — your opponent seems 

to have caught up! 

You anxiously await the next 

song so you can rcguin your 



lead, but it is too late... The 
timer has reached zero and 
the third round ends in a lie. 
This great party game is supplied with over 100 
songs. On the disk are the files "Potluck" with many 
types of music, "Broadway" with show tunes, "Child- 
ren" containing popular nursery songs, and Popscene 
with recent rock songs from popular groups such as 
the Beatles and Billy Joel, 

The song also provides a utility which allows you to 
create your own song files. It is easy to use, and the docu- 
mentation tells you, in plain English, how to enter music even 
if you've never opened a music book in your life! 
For 32k Model I Disk TRS-80s, $19.95. 
Call for Model III Availability. TERMS: Check. 
Money Order, MC or Visa, N.Y. res. add 7% tax. 

SOFTWARE INNOVATIONS .-aao 
320 Melbourne Rd., Great Ncck,N.Y. 11021 
(516) 482-6004 (516)482-8491 (CBBS) 



TRS-80 



COLOR GOmPUTER 




SPACE 
TRILOGY 

Space Invaders 
Meteoroids 
Space War 

• THE BEST GAMES AVAILABLE 

• HIGH RESOLOTION GRAPHICS 

• FAST, MACHINE LMNGaAGE 

• COMPATIBLE w/ EXT. BASIC 

• $21.95 each, $59.95 for all three 



RAMCHARGER 
32K UPGRADE 

EXTEND MEMORY 
FROM 16Kto32K 

100% COMPATIBLE WITH 

EXTENDED BASIC 

NO SOLDERING OR 

MODinCATION 

FTTS INSIDE COMPUTER 

$99.95 




ADVENTURE 

COMBAT THE POWERS OF DARKNESS 
AND EVIL! CAN YOG RECOVER THE 
TREASURE OF THE GOLDEN 
SORCERER BEFORE HIS 
MINIONS OVERCOME YOG. 
A CLASSIC ADVENTURE 
FOR ENDLESS HOURS OF 
FUN AND EXCFTEMENT. 
$19.95 



GTILITIES 

• EDITOR/ ASSEMBLER $34.95 

• SUPER MONITOR 24.95 

• DISASSEMBLER 19.95 

• EPROM PROGRAMMER 74.95 

• MAGIC BOX 24.95 

LOAD MOD l/llt TAPES INTO 
THE COLOR COMPUTER 

DEALER INQUIRIES INVITED 




SPECTRAL 
ASSOCIATES 

141 Harvard Ave. 

Tacoma. Washington 98466 

(206) 475-6483 

WRITE FOR COMPLETE 
CATALOG 

ADD 3% FOR SHIPPING 

VISA OR MASTERCHARGE ACCEPTEDl 



v'Sse List of Advertisers on page 306 
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EPSON 

MX-80 



$4fi9. 



00 



THE 

REAL THING 

Yes this is the EPSON IVlX-80 printer 
you have read so much about... the 
one everyone's buying. Better get 
yours while they are available at this 
terrific price! One of the most advanc- 
ed 80 column dot matrix printers 
available featuring the world's first 
disposable print head. There are lots of 
printers to choose from but. once you 
have compared, you will find it hard 
to pass up the EPSON MX-80. 

FEATURES 

• Bidirectional Printing 

• Logical seeking of shortest lines 

• 80 Characters per second 

• 64 Block Graphic Characters 

• Forms Handling 

• Disposable print head 

• Adjustable Tractor-type pin feed 

• Paper width 4 to 1 inches 

• Inked ribbon cartridge with 3 
million character life 

• Self test mode 

• Full 96 character ASCII with 
decenders 

• Printing Modes: Standard, Double. 
Emphasized and Double 
Emphasized 

• Correspondence Quality 

Add S6 00 ihjpprng (Conl US) Doe; not include caOle. See op- 
posite page For ordering information. 

EXTRAS FOR 
EPSON 

TRS80 Cable (I & lll| $29.95 

APPLE Cable & Interface $96.00 

RS232 Interface 569.95 

Ribbon Cartridge. Black S 13.95 

Interface & Cable (from Mod. I 

Keyboard) $99 95 

ORDER TODAYII 



Save Even More 
EPSON MX-70 

$389.00 

NO FRILLS PRINTING 
AT NO FRILLS PRICE 
FEATURES 

• Unidirectional printing 

• 80 Characters per second 

• Bit-plot graphics 

• Forms handling 

• Disposable print head 

• Adjustable tractor-type pin feed 

• Paper width 4 to 10 inches 

• Inked ribbon cartridge with 3 
million character life 

• Self test mode 

• Full 96 character ASCII 

• Printing modes: normal &. normal 
expanded 

Add S6 CX) shrpprng [Con( US|. Does not incfude catile. See op- 
posite page for ordering information. 



ALL NEW! 
MX-aO F/T 

All the features of the MX-80 
plus friction feed. 

$ 599.00 

LIMITED QUANITIES 



• OPERATING SYSTEMS 

DOSPLUS 3.3. 3.3D (spec. Mod I or III) 

S89.95 

LDOS $135.00 

NEWDOVSO S 135.00 

TRSDOS 2.3 DISK & MANUALS 1 7.95 
DOUBLE ZAP II $44.00 

Add S 1 .25 per pound shipping [S 1 .00 minrmum]. 
*■ DISKk I IESl5 1/4 in , soflsectored, bos of I0| 

Cert, one side, single density S29.95 

Cert, two sides, double density. . . . S39.95 

• OTHER SOFTWARE & BOOKS 

SCRIPSIT (disk) $89 95 

SPECIAL DELIVERY SI 19.95 

XTRA SPECIAL DELIVERY S 189.95 

SUPER UTILITY , S39.9B 

MICROSOFT BASIC DECODED & ^ 

OTHER MYSTERIES 

izD.95 

TRS80 DISK & OTHER MYSTERIES, . S 1 9.95 
MAKE 80 SH.95 

SPECIAL WORD 

PROCESSING 

PACKAGE 

Includes the following: 

• EPSON MX-80 PRINTER 

• CABLE 

• SCRIPTSIT )disk) 

• SPECIAL DELIVERY (disk) 

• freight and insurance. 
SPECIAL 

$725^ 

(Reg $917.00) 

Order today from 

AE^OCCITIP 

Redbfrd Airport, BIdg. 8 

P.O. Box 24829 

Dallas, Texas 75224 -^^^ 



CABLES, SOFTWARE 
& OTHER GOODIES 

• DRIVE CABLES 

3 Drive litM See Opposite Page 

4-Drive 534.95 r-K 

Extender Cables $ 16.95 L^ 



AROCOMP5/23 
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j^lB^^BS^ 



TRS 80 



DISK DRIVES 

40 & 80 TRACK 




as low as 



/ 



NEW LOW PRICES 

Thanks to you our sales volume has 
allowed us to cut costs and we're pass- 
ing the savings along. We offer the best 
disk drive value in the market place. 
Reliability, features and cost tough to 
beat. We deliver.. .and we stand behind 
our products. AEROCOMP is the only 
manufacturer to offer FREE TRIAL! Buy 
Aerocomp drives today. You deserve the 
best, 

BEST FEATURES 

* Fast 5 ms, track-track access time. 

* Operates single or double density, 

* "FLIPPY" feature for lower media cost 
(40-1 S 80-11. 



Head load solenoid. 
Disk ejector. 
Easy entry door. 
NEW EXTERNAL 



CONNECTION 

coutT [0 hook Dp cablel 



DRIVE CABLE 

jno (onger ne^ to '^mnve l^ie 



MODEL III 
INTERNAL 
DRIVE KIT 

Includes the following: 
(I) Disk Controller Board, Double Densi- 
ty, (2) Dual Power Supply (handles two 
drives), |3j Drive Mounting Brackets & 
Shield, (4| all necessary hardware, cables 
and connectors and (5) installation in- 
structions. 

May be used with AROCOMP bare 
drives. DOSPLUS operating system 
available $89,95, 

SPECIAL PRICE 



$399 



Add 53 00 foi sfirpping S h^nilNng 



.95 



$299. 



95 



ORDER TODAYI 

* 40-Track Drive $299,95 

* 80-Track Drive $429,95 

* 40-Track "FLIPPY" Drive, . , , $329,95 

* 80-Track "FLIPPY" Drive. . . . $449,95 

* 40-Track Dual-Head Drive. . 5449,95 

* 80-Track Dual-Head Drive. . S579.95 

AJf above drivei <iFe compicie wiin bHveJ eriLrosure, powF' iupp'y 
Hiidexrerrirfl drive cable coririec[iori IIBVAC 50/60H/ 230 VAC. 
5W60 Hz jVrtNitOle on spetiiil oilier 

* 40-Track Bare Drive $269.95 

* 80-Track Bare Drive $399.95 

* 40-Track "FLIPPY" Bare DriveS299.95 

* BO-Track "FLIPPY" Bare Drive$4 1 9,95 

• SPECIAL PACKAGES* 

STARTER A $339,95 

40-Track Drive. 2-dnve cable. TRSDOS 
2,3 Disk & Manual, Freight & Ins. 

SRARTER B 5369,95 

40-Track "FLIPPY" Drive, cable, TRSDOS 
2.3 Disk & Manual, Freight & Ins. 

COMBO C 5465,00 

40-Track "FLIPPY" Drive, 2-drive cable. 
NEWDOVBO or LDOS, Freight & Ins. 

COMBO D $585,00 

80-Track "FLIPPY" Drive. 2-drive cable, 
NEWDOS/80 or LDOS, Freight & Ins. 

COMBO E $709,00 

Two 40-Track "FLIPPY" Drives, 4-Drive 
cable, TRSDOS 2.3 Disk & Mannual, 
Freight & Ins. 

COMBO F 5999,00 

Two 80-Track "FLIPPY" Drives, 4-drive 
cable, NEWDOS/80 or LDOS. Freight & 
Ins. 

COMBO G S909.00 

Two 40-Track Dual-Head Drives, cable, 
TRSDOS 2.3 Disk & Manual, Freight & 
Ins, 

COMBO H $1299,00 

Two 80-Track Dual-Head Drives, cable, 
NEWDOS/BO orLDOS, Freight & INS, 
DOSPLUS available with any special 
package, 

AOOS 5 00 per drive for snipping 8. hand/rng [Con] US| 

FREE TRIAL OFFER 

Order your AEROCOMP Disk Drive and 
use it with your system for up to 14 
days. If you are not satisfied for ANY 
REASON (except misuse or improper 
handling), return it, packed in the 
original shipping container, for a full re- 
fund, [Special pitcWges will bf pertorjtieq We hSVe 

complete confidence in our products and 
we know you will be satisfiedl ORDER 
TODAVri 

■ TRS80 15 TRADEMARK of TANDY CORP 



WARRANTY 

We offer you a 120 day unconditional 
warrenty on parts and labor against any 
defect in materials and workmanship. In 
the event service, for any reason, 
becomes nescessary. our service depart- 
ment is fast, friendly and cooperative... 

100% TESTED "*" 

AEROCOMP Disk Drives are completely 
assembled at the factory and ready to 
plug in when you receive them. Each 
drive IS 100% bench tested prior to ship- 
ment. We even enclose a copy of the 
test checklist, signed by the test techni- 
cian, with every drive, AEROCOMP 
MEANS RELIABILITY!! 

ORDER NOWII 

To order by mail, specify Model 
Number(S) of Drive, cable, etc. (above), 
enclose check, money order, VISA or 
MASTERCHARGE card number and ex- 
piration date, or reguest C,0,D, ship- 
ment. Texas residents add 5% sales tax. 
Add S 5,00 per drive for shipping & handl- 
ing (Cont. US). Please allow 2 weeks for 
personal checks to clear our bank. No 
personal checks will be accepted on 
C,0,D, shipments-cash, money orders or 
certified checks only. You will receive a 
card showing the exact C,0,D, amount 
before your shipment arrives. Be sure to 
include your name and shipping address. 
You will be notified of the scheduled 
shipping date. Your bank credit card will 
NOT be charged until the day we ship,!! 



WRITE AEROCOMP TODAY 
FOR MORE VALUES III 



CALL TOLL FREE FOR FAST SERVICE 
(800) 824-7888, OPERATOR 24 

FOR VISA/MASTERCHAROE/C.O.D. ORDERS 

Colifornia diol (800) 852-7777, Operator 74. Alosko 
and Hawaii dial (800) S24-79)9, Operator 24. 
TOLL FREE LINES WILL ACCEPT ORDERS ONLYI 

For Applications and Technical information, toll 
(214) 337-4346 or drop us o card. 



Dealers inqiries invited 



Redbird Airport, Bidg. 8 

P.O. Box 24829 

Dallas, TX 75224 >^3B7 arocomw? 



^See List ol Advertisers on page 306 
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TUTORIAL 



Teach yourself a little Pascal. 



Join the Pascal Crusade 



Margaret M. Grothman 
5117 Denton Place 
Madison, Wl 53711 



Radio Shack's Tiny Pascal comes with a 
user's manual which is a model of brev- 
ity. The manual wasn't intended to be an in- 
structional text on Pascal programming: If 
you are a beginner, you will have to learn by 
the discovery method. 

The user's manual defines Tiny Pascal as 
"a complete, self-contained operating sys- 
tem for creating, running, saving and load- 
ing Pascal programs for the TRS-80." The 
minimum system requirement is Level II, 
16K, although a 32K version is provided on 
the other side of the tape. The system con- 
sists of three subsystems loaded together 
and simultaneously present in RAM. These 
are the monitor, the compiler and the editor. 
The Run, Save and Load commands are giv- 
en from the monitor mode. The monitor also 
provides access to the compiler and the edi- 
tor. 

Although Tiny Pascal employs the syntax 
of standard Pascal, it is a limited subset of 
the standard language. Several variable 
types and library functions are not present 
in the tiny version. Even so, Tiny Pascal Is 
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fast, efficient and easier to read than BA- 
SIC. 

Getting Started 

Tiny Pascal is loaded via the system com- 
mand, using Pascal as the file name. After a 
successful load, you will see the name and 
version number followed by the prompt ".", 
You are now in the monitor mode. A sample 
program is always loaded with the system. 

There are 10 monitor commands listed in 
the manual, one of which is R for Run. Since 
you are in the monitor mode now, and there 
is a program present, enter R. The message 
returned is: "P-Code not in memory." 
What's wrong? 

Only the source code is present in mem- 
ory. Pascal is a high-level language that is 
not executed statement by statement, like 
BASIC, The code interpreted by the Pascal 
system is a low-level language called 
P-Code. To compile, enter 0. As compilation 
takes place, the source code appears line 
by line. Finally, a summary line appears, 
containing the number of codes and the 
memory locations of the compiled code. 

Now enter R to run the program. 

There are two remaining editor com- 
mands, R and X. X has the same function as 
in the Level II editor, extending the line to 
add additional characters, or deleting char- 
acters at the end of the line by backspacing, 
R is used for replacing the current line. It is 
not followed by Enter, but by the string 



which is to replace the current line. 

There is no editor command to change 
characters within a line. If an error has been 
made toward the end of a line, the X com- 
mand can be used to make the necessary 
correction. Otherwise, there is no alterna- 
tive to retyping the line (use the R com- 
mand). For this reason, it is a good idea to 
keep lines short and avoid multiple state- 
ment lines. 

Entering a New Program 

To become familiar with the syntax of 
Pascal, let's delete the existing program 
and enter a new one, observing various fea- 
tures as they occur. 

(•SUM AND DIFFERENCE PROGRAM") 
CONST FIRST = 12;SEC0ND = 3; 
VARSUM, DIFF:1NTEGER: 
BEGIN 

SUM; = FIRST + SECOND; 

DIFF: = FIRST-SECQND; 

WRITECTHE SUM OF '.FIRST*,- AND ',SECOND#,' IS ', 

SUM#,13); 

WRITECTHE DIFFERENCE BETWEEN '.FIRST*,' AND ', 

SECOND*,' IS ',DIFF#) 
END. 

Although the Pascal editor Is line orient- 
ed, observe that no line numbers are used. 
For easier reference to the program, how- 
ever, I will refer to the tines by number. 

The first line is a comment and is not exe- 
cuted. Parentheses and asterisks are need- 
ed to enclose remarks. 




The words First and Second are con- 
stants which will be used in the program. In 
Pascal, all identifiers must be named before 
being used, in order to reserve memory lo- 
cations for them. The second line, which be- 
gins with the keyword CONST, is the decla- 
ration statement for the constants. If we 
had written the numbers 12 and 3 directly in- 
to the program, they would be called "liter- 
als" rather than constants. 

The advantage of using the CONST state- 
ment is more apparent in a program which 
uses constants repeatedly. To change the 
value of a constant, simply change the dec- 
laration statement rather than each occur- 
rence of the constant. 

The third line is the declaration line for 
variables to be used In the program. The 
word Integer following the list of names in- 
dicates the data type of the variables. Larg- 
er versions of Pascal support several data 
types, but Tiny Pascal supports only in- 
tegers and integer arrays. (All punctuation 
in the statement is necessary.) 

Letters to the Editor 

To gain access to the editor, enter E from 
the monitor mode. You will see a status re- 
port: "FILE HAS 12 LINES 344 BYTES (498E- 
4AE5) PTR AT LINE 1." This is followed by > 
which is the prompt for an editor command. 
Enter P' and you will see all twelve lines of 
the sample program on the screen. Now en- 
ter O to exit from the editor mode and return 
to the monitor. 

If you try to run the program again, you 
will find that the P-Code Is no longer in 
memory, and the program must be recom- 
piled. This time after you enter C to compile, 
notice the location of the compiled code. 
The source code was located between 498E 
and 4BB2; the object code occupies the 
memory immediately above the source 
code. 

Enter E again. The status report, which is 
displayed as soon as the editor mode Is en- 



"Larger versions of Pascal support 

several data types, but Tiny Pascal 

supports only integers and integer arrays." 



tered, may be called back anytime by using 
the S command. It will be especially useful 
for determining where the pointer (PTR) is 
located. 

Rememberthe command P' that liststhe 
entire file? A P without the * lists only the 
current line; P followed by a one or two-digit 
number results in a list of that number of 
ines beginning with the current line. You 
may move the line pointer with the com- 
mands U for up or N for next. These com- 
mands may be followed by an ' which 
causes the line pointer to move to the first 
line or the last line, respectively. Following 
U or N by a one or two-digit number results 
in the line pointer moving up or down the 
number of lines indicated. 

Using U to indicate up may result in the 
unfortunate error of thinking that its oppo- 
site must be D for down. D actually deletes 
a line, and may be used with the variations 
Dnn, to delete a specified number of lines, 
and D' to delete the entire file. 

To insert new lines, enter I. The new line 
or lines will be inserted immediately after 
the line currently pointed to. The prompt ? is 
used to indicate the insert mode. To exit 
from insert mode, press Enter at the begin- 
ning of a new line. Trie command to delete 
the entire file, D*, automatically puts you in- 
to insert mode. 

Two difficulties may be encountered in 
insert mode: I could find no direct way to in- 
sert a new line above the first line in the file. 
The problem can be solved by Inserting the 
new line after the first line, retyping the 
original first line to follow the new one, and 
deleting the extra line. 

The other problem occurs if you delete an 
entire file and then attempt to load a new 
program from tape. The delete command, 
D" automatically invokes the insert mode. 
The only way to return to the monitor is to 
Enter a program line. This annoyance can 
be avoided altogether; deletion of the ex- 
isting file takes place automatically when a 
new program is loaded. 

Identifier names may consist of any al- 
phanumeric characters, but must begin 
with a letter. Keywords or reserved words, 
such as those used for commands, func- 
tions and operators, cannot be used as 
identifiers. Although only four characters 
are recognized, names may be longer, as in 
BASIC. For example, any words in this pro- 
gram which begin with the letters FIRS or 
SECO will be indistinguishable from the 
constants FIRST and SECOND. 

The actual program steps are in lines five 
through eight, between Begin and End. {The 



period is required following End.) In Pascal, 
line indentation has no significance for the 
compiler. But indentation can help you 
visualize program structure. In Tiny Pascal, 
the right arrow causes a three-space tab for 
convenient indentation. 

Lines five, six, seven and eight each con- 
tain a single Pascal statement. Statements 
are separated from each other by semico- 
lons. Placing a semicolon after the last 
statement before End is optional. Although 
they may cause editing difficulties, multiple 
statement lines are allowed. No line can ex- 
ceed 130 characters. 

Lines five and six are assignment state- 
ments; notice the use of the symbol : = . Un- 
like BASIC, there are two separate symbols 
for equality and assignment in Pascal. They 
are = and : = , and cannot be used Inter- 
changeably. The assignment statement -■ 
copies data rather than moving It. 

The first Write statement (line seven) con- 
sists of seven elements separated by com- 
mas. Strings are enclosed by single quota- 
tion marks. First#, Second#and Sum# in the 
Write statement are instructions to print the 
values as decimal numbers. To output hex- 
adecimal values, affix the character % to 
the variable name. The last instruction, 13, 
is the control code for carriage return/line 
feed. 

Read Input k^ 

The program can be made more versatile 
with the use of READ statements for enter- 
ing different values for First and Second. 
Delete the CONST declaration statement 
and rewrite the VAR declaration to include 
First and Second as variables. Move the 
pointer until it is at the beginning of the 
third line (BEGIN); enter I to insert new lines 
after line three. Enter the following four 
lines, then press Enter again to exit from the 
insert mode: 

WRITE('THE FIRST NUMBER IS '); 

READ<FIRST«); 

WRITE<13;THE SECOND NUMBER IS ■); 

READfSECOND*); 

Return to the monitor (Enter Q) to compile 
the new variation. Instead of typing C to 

compile, try C/-P. This monitor command 
compiles the source code without generat- 
ing P-Code. This is a compiler dry run 
used to check for syntax errors before ac- 
tually compiling the program. A third com- 
piling command, C/-S, is used for long pro- 
grams that require overwriting the source 
code to complete compilation. The C/-P 
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• ACCEL • 

-- vs. -- 

• ZBASIC • 

■- VS. " 

* • BASCOM • 

Ever wonder which is best for 
Readers of THE 



your 

ALTERNATE SOURCE have an 

in-depth comparative analysis of 

these programs in-hand right 

now!! 

^ That's only a small portion of 
the valuable information 
contained in each issue of TAS. 

THE ALTERNATE SOURCE 

is for anyone interested in 
exploring advanced software 
capabilities of the TRS-80 
microcomputer. 

Subscriptions are S12.00 for 
six issues or $18.00 for twelve 
issues from: 

THE ALTERNATE SOURCE 

1806 ADA STREET 

LANSING, MI 48910 

PH.517/485-0334 .^38 



J-g?g3aryc3:ave-iU;x,i^a-t--f! >tae vc - a< r7igr 



Super "Color" Writer 

Finally, Word Processing for your TRS-80' 
Color Computer and Line Printer VII. 

Never sit down with a pen and paper again! Willi 
Super "Color" Writer, you can Write Letters • 
Cheques • Address Labels • Invoices • College 
Essays • Short Stories • And anything else you 
might thinit of. Super "Color" Writer has features 
found in word processors costing much more, 
includes features not found in any word 
processor at any price 

• On screen upper/lower case wittiout 
modification 

• Built in Itey twep wtten key is pressed 

• Full print fonnatting for any printing need 

• Requires 16K color basic or extended isasic 

• Includes compfete documentation $39.95 

16K prime ram upgrade M for all TR&80* 
computers with documentation...guaranteed 
$29.95! 

Game packs for TR&flO* Model III, fUlod^ Ml N, 
and Color Computer are high speed witti ultra 
graphics and sound and require 16K 

Combat Game-Pak $24.95 

A trilogy of exciting real time two player games 
Stellar Battle; Galactic Blockade; 2-1-aCombat 

Adventure Game-Pak $24.95 

Kindle your eternal flame with adventures in high 
fantasy? World Under ttie Cimeeon Moonj 
Dazman Underworld of Doom; Forsaken Gultch. 

VegasGame-Pak $2455 

Why fly to Vegas when you can have it in your 
own living room? One Anned Bandit; Casino 
Craps; Keno; Up The Down River for four players 

Cfilldren's Education Pak $24.95 

Give your children a head start 

Math primer for all ages- Adventures in 

Storyland; Hangman 

When ordering; Please specify type of computer 

Make ctieck or M.O. payable to: 

Nelson Software Systems. Inc. »>480 

P.O- Box 19096, MPLS, MN 55409 612(927-0511 

Dealer inquiries invited 

Minn. Res. inc. 4% Sales tax 

•TRS-eO is a registered trademark ot the Tandy Corp. 



''A good way to learn about 

the idiosyncracies of the Pascal 

syntax is to make some intentional mistakes." 



command should be used to debug ttiese 
programs, since the C/-S command 
destroys the source code. 

Compile and run the revised program. 
You may wish to experiment with different 
types of input. {Such as negative numbers 
or zeroes.) 

As an exercise, add two lines to the pro- 
gram to multiply First and Second together 
and write "The product of 12 and 3 is 36." It 
will be necessary to add a new variable to 
the VAR declaration statement and to add 
an additional Write statement. As in BASIC, 
the multiplication symbol is *. 

Integer Division in Pascai 

Since Tiny Pascal supports only integers 
division presents a special problem. In Pas 
cal division of integers Is indicated by the 
keyword DIV and the quotient is a truncat 
ed, not rounded, Integer. Thus, 15 DIV 4 re 
turns a quotient of 3. The slash symbol 
used In Pascal for division of real numbers, 
cannot be used In Tiny Pascal. However, the 
MOD function will return the remainder of 
integer division. Here Is a short program to 
illustrate how the DIV and the MOD func- 
tions work: 

(•PASCAL INTEGER DIVISION') 

VAR FIRST, SECOND, QUO, REMrlNTEGER; 

BEGIN 

WRITE(THE FIRST NUMBER IS y. 

READ(FIRST#}; 

WRITE(13,THE SECOND NUMBER IS ■); 

READ(SEC0ND#); 

QUO: = FIRST DIV SECOND; 

REM: = FIRST MOD SECOND; 

WRITE(THE QUOTIENT IS ■,QU0#,13); 

WRITECTHE REMAINDER IS ■,REM#) 
END. 

For output in fractional form, replace the 
last two Write statements with: 

WRITE(FIRST#,' DIVIDED BV '.SECONDtt,' EQUALS ', 
QU0#,' AND ',REM#,r,FIRST#t 

Error Codes 

If you have entered the suggested pro- 
grams or experimented In other ways, you 
have most likely been introduced to the er- 
ror codes. The Tiny Pascal manual explains 
the code messages. There are many error 
messages; and they are very specific. In 
practice, the messages don't always 
describe your mistake, and occasionally 
quite obvious syntax errors result in no er- 
ror code at all. But for the most part, they 
will tell you where you went wrong. 

A good way to learn about the idiosyncra- 
cies of the Pascal syntax is to make some 



Intentional mistakes. If the variable declara- 
tion statement is retyped with an extra 
space after each comma, no error results. 
However, omitting spaces Is less success- 
ful than adding extra ones. For example, if 
the space between the words VAR and 
FIRST is omitted, you'll get error number 18. 
If the eighth and ninth lines are retyped as 
follows, no error message is displayed. 

QUO: = FIRSTDIVSECOND; 
REM: = FIRSTMODSECOND; 

However, the omitted spaces result in an 
execution error. FIRSTDIVSECOND and 
FIRSTMODSECOND are read by the compil- 
er as single variables indistinguishable 
from the variable First. 

Although extra spaces around punctua- 
tion are not necessary, they may be added 
as desired for program readability. Use cau- 
tion when deleting spaces to make a pro- 
gram compact. Leave spaces around key- 
words, and use spaces any time ambiguity 
could result without them. 

Omitting Begin results in error 18 (error in 
declaration part). In addition to being a de- 
limiter of program statements, Begin also 
signals the End of the declaration state- 
ment. Omitting End results in error 14 ( ; ex- 
pected). The compiler Is looking for a delim- 
iter to mark the end of the last program 
statement and cannot find it. Many errors 
which have no specific error message call 
error 14. 

In Tiny Pascal, omitted words will not be 
Implied. Although identifier names may be 
abbreviated to the first four letters, key- 
words must be typed In full. 

Punctuation Errors 

Be aware of punctuation, too. Omitting 
the period after a program's final End state- 
ment results in error 1000 ( . missing). End 
statements are also used to mark the end of 
a loop or branch. An internal End state- 
ment Is not followed by a period, but by a 
semicolon or no punctuation at all, de- 
pending on the context (see Table 1). The 
last program statement before an internal 
End statement does not require a semico- 
lon, just as the last program statement be- 
fore the final End does not. 

Omitting # or % after a variable in a Read 
or Write statement does not cause an error 
message— but does cause execution er- 
rors. This kind of error is dangerous; you 
have no indication anything Is wrong, un- 
less the output is clearly unreasonable. 

The moral of the punctuation story Is 
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DUAICASE* 

UPPER/lowercase, full time from power-up; 
NO software; Standard typewriter keyboard 
operation (shift to UPPERCASE); Control charac- 
ters can be displayed; 128 Total character set 
plus full graphics. 

SWITCHABLE'^ 



No switches. No driver. Operates from key- 
board. Totally disables "PATCH" functions. 

KEYBOARD DEBOUNCE* 

Extra keyboard debounce, full time from 
power-up; NO software. If dirty keys are a prob- 
lem, this is for you. 

BLOCK CURSOR* 



Replaces the underline style cursor directly. 
Easier to locate on a full screen. No distracting 
blinking. 

SHORT CASSEHE LEADER* 



For tape based systems. Does NOT change 
baud rate. Only shortens recorded leader. Saves 
four seconds of waiting time. Great for data files! 
No conflict with high baud rate cassette systems. 

ELECTRONIC SHIFT-LOCK* 



No extra keys or switches. Simply tap either 
shift key, UPPERCASE lock, normal shift unlocks. 

TRS-80 is a Trademark of Tandy Corp. ORDER INFORMATION 






"THE PATCH" is not only a lowercase modi- 
fication, but a complete system offering many 
of the enhancements you would like available on 
your TRS-80. How is this possible? "THE PATCH" 
is a "smart chip" which monitors the same ad- 
dress lines as the ROM in your TRS-80 Model I 
Level II. "THE PATCH" recognizes certain ad- 
dresses, turns off the III ROM, then substitutes 
its' own byte of data. This "Patching" is what 
allows ALL these enhancements with NO soft- 
ware overhead, thus NO software conflict. In 
fact "THE PATCH" is the ONLY lowercase modifi- 
cation that is compatible with both Basic and ma- 
chine language programs AND the ONLY all 
hardware lowercase modification. 

You install "THE PATCH", no need to send 
your TRS-80 away so there's no hidden installa- 
tion cost. Detailed instructions guide even the 
most inexperienced owner to complete installa- 
tion in about 30 minutes. Works with the two or 
three chip ROM set. "THE PATCH" unit plugs into 
the ROM sockets (does not replace existing ROM). 
Lowercase does require installation of the extra 
video RAM (supplied with "THE PATCH"). 

"THE PATCH" is compatible with any word 
processor, any DOS and also other languages 
which use ROM sub-routines. "THE PATCH" is 
never obsolete. As new features become avail- 
able they can be installed in your "PATCH". 

"THE PATCH" is covered with a one year 
limited warranty on materials and workmanship. 
(Does void Radio Shack's 90 day warranty). Ask 
for details ... we can install for a small fee. 



CALL NOW 
(208) 883-0611 



CECOAT, INC.. 62 

p. O. Box 8963 
Moscow, ID 83843 

"THE PATCH" is a trademark of CECDAT, INC. 



Name 

Cifv State - ZIP 

Signature 

□ Check, Money Order, Bank Draft 
n VISA, AWSTERCHARGE, Purchase Orders {add 3%) 
Card/PO No 

Expiration Date - Today's Date 

You must check one: 

n "MEM SIZE" □ "MEMORY SIZE" 

Price valid through August 15, 1981 



"THE PATCH 2" Switchable @ $94,97 ea, 

OPTIONS: (please check) 

n "Electronic Shift-Lock" Add $30.00 
n "Short Cassette leader" Add $10.00 
□ "Block Cursor" No Charge 

n "Debounce" No Charge 

Ship, & Hand. @ 2.50 ea. 

COD ADD 5% . . . . 

ID Sales Tax 3% (Id Res) 

TOTAL ORDER .... 



-See List of Advertisers on page 306 
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"Since Pascal is executed so much 
faster than Level il BASIC, a larger 
number of loops must be used to 
achieve the desired delay." 



this: Do not depend on error messages. If 
you are unsure of the correct punctuation, 
refer to the syntax diagrams in the Tiny 
Pascal manual. 

Truth or Consequences 

A Boolean statement (named after 
George Boole, the 19th century English 
mathematician) is a statement to be tested 
for truth. In Pascal, a true statement returns 
a one and a false statement returns a zero. 
Enter, compile and run the following pro- 
gram: • 



("BOOLEAN EXPRESSIONS AND RELATIONAL 

OPERATORS') 

VAR TRUE,FALSE:INTEGER; 

BEGIN 

TRUE: = 4 = 4; 

FALSE: = 4 = 5; 

WRITECA TRUE EXPRESSION HAS THE VALUE OF '. 

TRUE#,13); 

WfllTECA FALSE EXPRESSION HAS THE VALUE OF ', 

FALSER 
END. 



lnthefourthandfifthlines,4 = 4and4 = 5 
are Boolean statements. These lines Il- 
lustrate the difference between the as- 
signment symbol, :,: = , and the equality 
symbol, = . The third statement, for exam- 
ple, could be interpreted as: If 4 equals 4, 
then assign a value of 1 to the variable: 
True. 

There are five other relational operators 
which may be used within a Boolean state- 
ment. All six operators are illustrated in the 
following sample statements: 

X: = Y + 6>Z + 2 

XXi = Y+7'Y<T0TAL 
FALSE: = RIGHT = WRONG + WRONG 
TEST: = BALONEYOSTEAK 
WEEK: = FRIDAY> = MONDAY 
NEW: = MIN< = MAX 
IF THEN ELSE 

This construction is similar to Its Level II 
BASIC counterpart. Try the following pro- 
gram: 

(•COMBINATION LOCK') 
VAR COMBNUM:INTEGER; 
BEGIN 

WRITECENTER THE FOUR DIGIT COMBINATION THAT 

WILL OPEN THE DOOR'); 

READ(COMBNUM#); 

IF COMBNUM = 2468 THEN WRITE(COME IN, THE 

DOORISOPENn 

ELSE WRITE(*OUMMY, YOU ENTERED THE WRONG 

COMBINATIONn 
END. 

The argument of the IF statement is a 



Boolean statement which is evaluated by 
Pascal as a one or a zero. The lines contain- 
ing If, Then and Else together are a single 
Pascal statement. A semicolon after the 
IF. . .THEN line results in the ubiquitous er- 
ror 14. If the instructions following the 
IF... THEN statement require multiple 
statements, the following form is used: 

IF COMBNUM = 2468 THEN 

BEGIN 

WRITE CCOME IN, THE DOOR IS OPENO; 

.. .(other statements to t>e executed follow). . ,; 
END 
ELSE 
BEGIN 

WRITE ('VOU DUMMY, YOU ENTERED THE WRONG 

COMBINATION!"); 

...(other statements to be executed follow). . .; 
END 
END 

Begin and End (with no period following 
End) must be used to bracket the com- 
pound statements. Are you starting to see 
the importance of indenting program lines? 
The lines between each set of Begin and 
End statements, and those between each 
set of If and Else statements, should be in- 
dented. In a construction such as this one, 
proper indenting reveals the program logic 
and structure In a way that is seldom 
achieved in a BASIC program. 

Else may be omitted in the single line 
form but not in the compound form. If Else 
is omitted, execution will fall through to the 
next line after the Then instruction. The 
word Then may not be omitted in either 
form. 

Logical Operators 

In addition to the relational operators, 
Pascal allows the use of the logical opera- 
tors AND, OR and NOT. These may be used 
in IF. . .THEN statements and other con- 
structions requiring Boolean statements. 
They are exact counterparts of the logical 
operators used in Level II BASIC. The 
following contain true statements and 
would all result in execution of the Write 
statements: 



BEGIN 

IF(2 = 2)AND(3 = 3)THEN WRITECBOTH STATEMENTS 
ARE TRUE.T 
END. 

BEGIN 

IF(2 = 2)OR(3 = 3)THENWRITE('ONEORBOTHOF 
THESE STATEMENTS ARE TRUE.') 
END. 

BEGIN 



IF(2 = 2)OR(3 = 4)THEN WRITECONE OR BOTH OF 
THESE STATEMENTS ARE TRUE.') 
END. 



BEGIN 

IF N0T(2 = 3)THEN WRITE('THE STATEMENT WITHIN 

PARENTHESES IS NOT TRUE.') 
END. 



Tiny Pascal does not require parentheses 
in the IF. . .THEN statements, but they are 
often necessary when togical operators are 
used because of the hierarchy of opera- 
tions. Operations of the same level are per- 
formed from left to right, then operations of 
the next lower level are performed from left 
to right, etc. (n Pascal, NOT is the highest 
level operator; ", AND, DIV and MOD share 
the next level; OR, -i- and - are the next 
lower order; and the relational operators are 
last. In the statements above, parentheses 
are needed to force evaluation of the equali- 
ty of the expressions before the logical op- 
erations take place. 

Loops: FOR-DO 

The Pascal FOR-DO loop resembles the 
BASIC FOR-NEXT loop. The loop may be 
written as a single statement or combined 
statements. A one-line FOR-DO loop with 
no instruction following DO may be used to 
delay program execution: 

FOR I: = 1 TO 30000 DO; 

The index variable, I, must be declared in 
the VAR statement before it may be used. 
Since Pascal is executed so much faster 
than Level II BASIC, a larger number of 
loops must be used to achieve the desired 
delay. The above loop took 27 seconds to 
execute. 

The FOR-DO construction also allows 
compound statements as illustrated In the 
following program: 



(-FACTORIAL PROGRAM') 
VAR FACTOR,NUMBER,COUNT:INTEGER; 
BEGIN 
FACT0R: = 1; 

WRITECENTER A NUMBER y. 
READ(NUMBER#); 
F0RC0UNT: = 1 TO NUMBER DO 
BEGIN 

WRITECTHINKING..,M3); 
FACTOR: = COUNT. FACTOR 
END; 
WRITE(NUMBER#,' FACTORIAL EQUALS '.FACTORfl 
END. 

The TRS-80 integer range of -32767 to 
32767 seriously limits the usefulness of this 
program, as you will find if you try to enter 
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"The FOR-DO loop is used 

when repetition is not dependent upon 

a certain condition. If it is, 

Pascal offer two l<inds of loops. . . " 



any number larger than seven. 

Note the semicolon after the End state- 
ment. The last statement before the loop 
End does not require a semicolon, nor does 
the last statement before the final End. 

The index variable in a FOR-DO loop may 
be decremented using DOWNTO. (In- 
crements or decrements of more than one, 
however, are not allowed.) Replace the 
seventh line with: 

FOR COUNT: ^ NUMBER DOWNTO 2 DO 

Conditional Looping 

The FOR-DO loop is used when repeti- 
tion is not dependent upon a certain condi- 
tion. If it is, Pascal offers two kinds of loops, 
REPEAT UNTIL and WHILE DO. The differ- 
ence between them is subtle, and in many 
cases either could be used. In the REPEAT 
UNTIL construction, the condition is tested 
after the statements in the loop are ex- 
ecuted. In WHILE DO construction, the con- 
dition is tested first: If the condition is not 
present, execution of the instructions 
within the loop is avoided. Two program ex- 
amples follow, one using REPEAT UNTIL, 
and the other using WHILE DO. The first 
converts a decimal number to its binary 
equivalent. 

CDECIMAl. TO BINARY-) 
VAP NUMBFR, BINARY, OUOTIE NT: INTEGER; 
BEGIN 
WRrECENTcR A NUMBER '); 
flEA[XNUyBFR#); 

WR|-t(13,THE BINARY REPRESENT a: ION OF ', 
NUMBERS; IS '); 
REPEAT 
QUOTIENT: = NUMBER V 2: 
BINARY ^ NUMBER MOD 2. 
NUMBER -QUOTIENT; 
WRITt03,BiNARY#) 
UNTIL QUOTIENT-0; 

WRrE(13,'READ BINARY NUMBER FROM BOT'^GM 
■-O ■'OP'! 
END. 

Repeat and Until form the boundaries of 
this loop, ratherthan Begin and End. Until is 
followed by a Boolean statement and ex- 
ecution of the loop continues until the 
statement is tested and found to be true. 

In the WHILE-DO construction, the Bool- 
ean statement to be tested is placed be- 
tween WHILE and DO. Begin and End (with 
a semicolon) are used as boundary 
statements. A program segment, used to 
compute a statistical formula containing 
the variable Y in the denominator, follows. 
Any time Y has the value of zero, execution 
of the formula statements is avoided and a 
substitute instruction is executed. The 



WHILE-DO loop avoids a divlston-by-zero 

error. 



WHILE YOO DO 
BEGIN 
ABSFX = (MI-MX)'PD;VSX'^; 
WRITF(ABSFX#1, 
END; 
ELSE 
BEGN 
ABS"X: = 0, 
WRITE(ABSFX = 0'| 
LND, 
. . .con'.hje wi'.h res', o! prograTi, . . 

The Case for Multiple Branching 

Pascal's Case statement is equivalent to 
BASIC'S ON . . . GOTO. It has a variable (in- 
teger or expression) called the selector, 
which points to the statement to be ex- 
ecuted. The example below shows a menu 
selection application of Case: 

(•MENU SELECTOR*) 
VAH CHOICEINTEGER; 
BEGIN 
WRITECEN''E,R THE NUMBER OR THE AC"'lvrY YOU 
HAVE SFLECTED.'); 
READlCHOICE#), 
CASE CHOICE OF 
1:BEG N 
. . . staieme.ils lo be executed (or choice riumber 
1. ..; 
. . end each one bu'. Ihe last with a semcolon . . 
END: 
2BFGIN 
. . -Statements to be executed tcr choice number 
2., ,' 

. . .are you getting the idea now? . . 
END; 

3WRrECY0U HAVE CHOSEN TO END THE 
"HOGRAM ■) 
END: 
END. 

The Case statement is matched by an 
End statement punctuated by a semicolon. 
Each branch has a constant, called a case 
label, which corresponds to a possible inte- 
ger value of the Case selector variable. The 
branch statements may be single or multi- 
ple: If multiple, they are bounded by Begin 
and End (semicolon required). 

It is possible to use more than one num- 
ber for a single branch: 



CASF CHOICE OF 

1,2,5 

3: 

4,6: 
END, 

If a branch does not exist for a given val- 
ue of the selector, execution passes to the 
statement after Case End. Tiny Pascal al- 
lows an Else statement to be used with 



COMPILERS 

ACCELZ: Ccmuiler lor "^RS-SO Di:h BAS'C Compiles 
seiectea SdCsetto/aO macfi.ne cooe Tai tou' va-iaEie types, 
corpse: 'K "i.r-lirreco"iDC';entcoolrolsiiilerpretSftosl'eani 
line all oltie slale-ierl'i aip tiiic'ions TeclTique i"iriiinises 
coCeeiparS'Or a 'f j.jI I'lipaiurq ;n)ge EoeeOups to( Uue aoubie 
cptimisciion Si> aiagncsi'C 'messages loca'/Giouai opt'ons 
increase compatiflility *■!'• sjDiect progtams Uuiput saue to 
Disk, lapes Picfessicna's rote ^o 'oyail'SS ori the osrived 
code It siikenavinga lOOfiti/c^och S8B.95 

ACCEL: Con-piie- lo' TRS 80 l.evei i. flflSiC Same luge 
SPee<iv:0^ as ACCE.;' du' m iNTtGSR va-iaole -ype only Bjr- 
|i''ie :onooneii' ,jit ?^6 byieb loea !o' gfdahi:^ games in 
16K OeieopeainBiitainpy Souttie'nSo'twj-p 44.95 

TSAVE: Wiles ccnp'ie'uiitpiifo SYSTEM tape 19.95 

SOFTWARE CPU" 

Supflf STEP" Aiii"ialea ;80 "rogranming Mooe.s Disis- 
serppie' Single step/'RfiCE lofles wilii inleiigent RAM 

Wirdow. -J user seleclatile W naows STgle ana cuirulative 
irsVjct'Oi (lines in ffiicoseccnps 'Reference Space, much 
more SigPooK'et a Z8U So'lware 0^1. ifiK i svsl :l TftS 80 
^BUG'eqjiiea No BLO S19.95 

Super TLEGS: Meocaiesreu:; Suoe^i^rRo $9,95 

EMU 02: An;Tialeab-iO?''rngiamm.ngMa(1e.s Disas'iemCies 
10 6W? mnemonics Srg e-^iep/TRACE moaes ()M2 ccur 
;e'par;s to #e «J, dfl, #1- ri'-.a #G conmands. tas: Cross-nie'- 
preler heyDodra scan port witt' p-'-is"Liclions DB tB cont'o: 
pagirgin'jKiuaiiaaressspace. iiore B.gQookiei&SVNeRH^K 
tafO a65C? Soi'i\areCPU 
15K level 11 IRS 80 IBjIiregu.reo \d El. ■■ «4.95 

COLOR COMPUTER 

COCOBUG' 6809 Debugging i-or.lo' for TRS-80 Ci>0' Com- 
pu'er Liii'ire modify memoiy'Ci, registers oiace hreaK- 
po:nls. ejeciile iir.g.e irsltuclions o^ enl.fe machine language 
programs in real time lncluties&B09 Releience cartj uiis n 
■IK . . 119 95 

MASTERCARD/VISA 

'ncl ./b postage, CA add 6% 
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A STATISTICAL 

ANALYSIS PACKAGE 

BETTER THAN 

SPSS OR SAS? 

StatPac is better. And it's de- 
signed specifically for the Model 
lorlllTRS80. 

All phases of research analysis can be 
processed including: 

• frequency analysis 

• crosstabs S chi-square 
" correlation & linear 

regression 

• multiple linear regression 

• descriptive statistics 

• t-test 

• analysis of variance 

• management reports 

The complete 3-disk program is $185 
An extensive steo-by-step user's man- 
ual is included or may be purchased 
separately for $30 and applied to pur- 
chase of disi^s. MasterCard and VISA 
accepted. 

For more information and a free 
16-page brochure write or call: 

612/866-9022 
Watonick Associates 
5624 Girard Ave. So. *"''' 
Minneapolis, MN 55419 



^See List ot Advertisers on page 306 
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"One last warning. . . if you 

have loaded the P-code of a program 

from tape, do not try to use the edit mode." 



Case. This is useful if special instructions 
are needed when the selector variable has a 
value that does not correspond to the branch 
numbers. 

Ttie foltowing program is a variation of 
the Menu Selector Program. The menu is of- 
fered repeatedly until option three is chos- 
en. If the user inputs a value for Choice 
other than 1, 2 or 3, the message "Stick to 
the menu!" will be printed, followed by a re- 
turn to the menu. 

Tal<e special care when entering this pro- 
gram; the Case statement is particularly fin- 
icky atiout semicolons. 



(■MENU SELECTOR 11-) 

VARCHOICE.I:INTEGER; 
BEGIN 
l: = 1; 
REPEAT 

WRITE{13,'ENTER THE NUMBER OF THE ACTIVITY 
YOU WANT.'); 

WRITE(13.'1-ACT1V1TY FOR BEGINNERS'); 
VI/RITE(13,'2— ACTIVITY FOR VIRTUOSOS'); 
WfllTE(13,'3— I DO NOT WANT ANY ACTIVITY', 13); 
flEAD(CHOICE#); 
CASE CHOICE OF 
1:BEGIN 

WRITE(13.'Y0U HAVE CHOSEN ^•)■. 
WRITE(13,'THIS IS A GOOD CHOICE FOR 
BEGINNERS.') 
END; 

2:WR1TE('Y0U HAVE PICKED A TOUGH ONE. GOOD 
LUCKI'): 
3:BEQIN 
WRITECYOU HAVE CHOSEN TO END THE 



PROGRAM.'); 

I: = 
END 
ELSE 

WHITE('STICK TO THE MENUI') 
END 
UNTIL 1 = 
END. 

Saving and Loading 

You may save both source file and P-code 
for a program written in Tiny Pascal. The 
commands are "WS filename" and "WP 
filename", to save source and object files, 
respectively. Loading is done with the com- 
mands "LS filename" and "LP filename". 
File names may not exceed six characters 
in length. All commands to save and load 
are given from the monitor mode. 

There are three warnings in the Tiny Pas- 



cal manual about loading and saving pro- 
grams. When loading a program, you must 
enter the file name exactly as It was saved 
on tape. Warning number two is that there 
is no way to read the names of f i les on tape: 
If you forgot the file name you cannot re- 
trieve the program. 

The third warning in the user's manual is 
to use care not to get the source file and the 
object code mixed up when loading from 
tape. If you try to load the P-code, for exam- 
ple, with the command "LS filename", you 
will have to reload the entire system. 

One last warning, this one my own. If you 
have loaded the P-code of a program from 
tape, do not try to use the edit mode. Leav- 
ing the monitor will result in the loss of your 
program, and it will have to be reloaded 
from tape.B 



Construction Statement Deilmiters 


Entire Pfogram BEGIN 


END. 


IF THEN ELSE BEGIN 


END 


FOR DO BEGIN 


END: 


REPEAT UNTIL REPEAT 


UNTIL...; 


WHILE DO BEGIN 


END; 


CASE CASE... 


END 


CASE BRANCHES BEGIN 


END;' 


'Omit semicolon at end of last brancti t>efore Else or End. 


Table 1. Summary of Multiple Statement Delimiters 
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^\»gf^ ^f You 'we WHtten an 

^^/^ Outstanding Program-- 

We'd Like to Publish W 

We're looking for EDUCATION 

Programs: 

SPECIAL EDUCATION/AID 

TO THE HANDICAPPED 

MULTI-MEDIA COMPUTER INSTRUCTION 

TEACHER-AUTHORING LANGUAGES 

MANAGEMENT TRAINING 

SIMULATIONS 

Earn money while helping others. 

Write for our free Programmer's 

Kit today! 
INSTANT SOFTWARE. INC. 
Submissions Dept. ^2 

Peterborough, NH 03458 



^^^ CHEAP CHIPS , . . ARE NO BARGAIN mam 

I BUYING ADD-ON MEMORY? 
I GET THE BEST!!! 

I M emory faiiures cost you time and money. Japanese 1 6k 

I RAM chips have a one-to-ten in-semce tailure ratio to U.S. 

^ ctiipE-from a study by R. Anderson. Computer Div., 

^ Hewlett-Packard, reported in Tht Economtsl. 4-26-80. 

5 We otter 4116 cfiips by Fujitsu. NEC, Hitachi, Toshiba 

y and Mitsubishi ... tor most popular computers and 
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S 411B DYKAMK RAMS THE BEST 
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Your best 

Model III 

peripheral buy 

is a modem. 



OK, you've (atniliarized yourself with 
your new TRS-80 Model III, and you're 
ready to expand. 

You've got plenty of peripherals to 
choose from. 

Disk drives, voice boxes, printers, 
joy sticks— the list is almost endless. 
And all may help you get more enjoy- 
ment out of the info you put in. 

But there's the catch. Your Model III 
still relies solely on you for input. With- 
out you to write increasingly complex 
programs — or pay cold cash to buy 
them— it's blind, deaf and dumb. 

The real expansion will begin only 
when you give it ready access to the 
larger world of data communications. 
The world of free-access "bulletin 
board" resources. The world of elec- 
tronic mail, instant news and financial 
reports and games from vast, afford- 
atjle services like Source and Compu- 
Serve. The world of thousands of 
computer people just like you, in 
homes and businesses around the 
block and across the country. 

It's a world you can tap through your 
telephone ... but only if you're prop- 
erly equipped. 

You need a modem. And not just 
any modem. 

You need LYNX. 




The new LYNX. It's the latest innovation from the 
people who made data communications affordable 
for TRS-80 Model I and Apple II users. It's the best 
first step you can take in expanding. It makes your 
Model 111 a whole new animal. 

STILL AVAILABLE— LYNX for TRS-80 Model I. 
Price; $279,95. 



Your best 

Model III 

modem buy 

is LYNX. 



The new LYNX is the ideal modem for 
your Model III. That's because it's the 
key element of a total direct-connect 
telephone communications package. 

This package — including serial and 
computer bus interfaces, cables and 
terminal software — is available to you 
for a remarkable SINGLE PRICE: 
$299.95. 

Compared to other modems, LYNX 
is superior. It doesn't make you buy 
adapter cables or circuit boards sepa- 
rately to bring it on line. It provides a 
full one-year factory warranty, instead 
of the "normal " 90 days. 

It includes performance features- 
like auto dial/answer, programma- 
ble I/O porting, variable word length, 
parity and stop bits — that are either 
optional at extra cost or unavailable 
with other modems. It requires no tools 
to install. 

It can be used with any TRS-80 
communications programs; it's not re- 
stricted to its own special software. 
A full range of easy-to-find ST-80 
cassette and disk software au- 
thored by Lance Mioklus is available 
nationwide. 

And best of all, when you compare 
the LYNX price with the total cost of 
bringing any other modem on line, it 
could save you OVER $100. 




DLYrvnco 
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123 LOCUST STREET LANCASTER, PENNSYLVANIA 17602 
Phone 717/291-1116 
TRS-80 IS a Irademark o( the Radio Shack Diuision of Tandy Corporation. 

Call one of these LYNX handlers today— TOLL FREE: 



ADVENTURE INTERNATIONAL 
Longwood, FL 
800/327-7172 

THE PROGRAM STORE 
Washington, DC 
800/424-2738 



ADVANCED COMPUTER PRODUCTS 

Irvine, CA 

800/854-8241 

STEVENS RADIO SHACK 
Phoenixville, PA 
800/345-6279 



TSE HARDSIDE 
Milford, NH 
800/258-1790 

SIMUTEK 
Tucson, AZ 
800/528-1149 

FCC Registration Mumber: A909KE-69488-DM-N 




APPLICATION 



Modify Tiny Pascal 

For Disk 




two tasks must be accomplished. The com- 
piler must first be moved up to load above 
the DOS system requirements (I selected 
X'7000' as my load point). Secondly, the 
compiler must be modified to start at 
X'9800' and move text down to the appropri- 
ate buffer at X'73F0' {Fig. 1). It must then 
search out the end of text file (Remember 
that X'FF' byte?) and set the pointers re- 
quired by the compiler system. See Fig. 2 
for pointers that must be set. 



X-4060' I resorvod RAM for 

I Inlarpreter & monitor 



Lt. John B. Harrell 
30 KeKlico Court West 
Charleston, SC 29408 



Radio Shack has released a tape-based 
Tiny Pascal compiler for both 16K and 
32K + system users. I intend to show users 
of 32K+ disk-based systems how to make 
this compiler run from the disk using disk 
input and output of source files. The article 
also shows that compiled code can be 
stored and loaded from the disk. 

The Tiny Pascal system is a complete, 
self-contained operating system, consist- 
ing of a monitor, interpreter, compiler and 
editor. The monitor operates the entire sys- 
tem, and, additionally, saves and loads 
source and object programs to the cassette 
recorder. Output from the compiler is a 
compressed three-byte P-code. Normally, 



all these subsystems reside in memory si- 
multaneously, but you do have the option of 
overwriting the compiler or editor for extra 
space. I have never found this necessary on 
my 32K system. 

The text editor is adequate for creation of 
source programs, but has severe limita- 
tions on the amount of text editing that you 
can perform. You can insert, delete or re- 
place entire lines. To overcome this restric- 
tion, I have modified the compiler to look for 
an ASCII text file that has been previously 
loaded into RAM storage, starting at ad- 
dress X"9800' to the end of memory. This is 
done by terminating the text file with an 
X'FF' byte as an end-of-file mark. (This is 
consistent with the end-of-fite mark used by 
the compiler, but it would be easy to use 
Electric Pencil to create a file and then 
change the Pencil X'OO' EOF to X'FF'.) 

Modifying Tiny Pascal 

To modify the compiler to run from disk. 



syst«m control block 



X'41O0' I entry points table 

X'4l80' 

X'41A0' I l/Oroutines 

X'41E0' I Interpreter and 

I runtimeroullnes 



X'473A' I monitor 
I 

X'4990' 



I run time stack for 

I aditorofcofnpllar 
I <3-1/4K) 

X'5690' I editor P-code 

X'SEAO 

X'SFCO' I compiler P-code 

I 

X73F0' I 

I user memory for 

I source and P-code 



compiler table 



Fig. 1. Memory Map for the 32K+ Tiny 
Pascal System 
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"The Tiny Pascal system is a 

complete, self-contained operating 

system, consisting of a monitor/interpreter, 

compiler and editor." 



To make the modification, type in Pro- 
gram Listing 1 using the Editor/Assembler, 
assemble it and write a system tape. You 
have now created the patch to the Tiny Pas- 
cal system, and alt you must do to run it 
from the disk is load the Tiny Pascal system 
tape, 32K version (PAS32K), under normal 
Level M load procedures. To enter Level II, 
you must use the DOS BASIC2, or push re- 
set while holding down the Break key. Then 
load the patch tape, execute it, and follow 
the instructions on the video screen. When 
it exits to the DOS reboot, dump the modi- 
fied compiler system to disk using the ad- 
dress parameters displayed on the video. 

Program Listings 2 and 3 are used to load 
a source file to memory and execute the 
compiler, and to save source files to the 
disk. 

Listing 1 modifies the Tiny Pascal system 
in two parts. First, by moving the system 
from its resident area on loading (X'4D90' to 
X'73C6') to the area of RAM starting at ad- 
dress X7000' and ending at X'9636'. And 
then it links the high RAM source code 
block move to the initialization phase of the 
compiler. 

Lines 9-12 clear the screen and issue the 
prompt. Pressing any key will finish the 
patch. Lines 13-16 move Tiny Pascal to its 
new resident area. Lines 17-18 patch the 
source code block move into the compiler 
initialization phase. Lines 20-22 display the 
"done" message, wait for any key to be 
pressed and then reboot so the code can be 
loaded to the disk. 

The rest of the patch code is ORGed to 
load in X'9637' following the moved com- 
piler code. The initial phase of this code is 
identical to the power-up reset on the ROM 
chip, and is necessary because the compil- 
er expects to be run in a Level II environ- 
ment and not under the TRSDOS initializa- 
tion of RAM areas X'4000' to X'40C0'. (This 
is lines 27-43 in the patch program). Lines 
47-50 move the compiler from its disk load 
address to its normal load point at X'4D90'. 

To clear the way for the source code to be 



ADDRESS FUNCTION 

4180 Starling address of source code 

4182 Ending address ot source code 

4184 Starting address of P-code 

4186 Ending address ot P-code 

418C Also contains starting address of source 

code 

4196 Address of program currently in execution 

All addresses are In hexadecimal 

Fig. 2. Addresses Used to Patch the Tiny 
Pascal System 
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00013 


PftSMOD 


LD 


SPtS 




B003 


CDC901 


00014 




CALL 


CLS 


iCLEAR SCREEN 


^006 


219D96 


O0O15 




LD 


HL.MSl 




E009 


CDA72a 


0D016 




CALL 


OUTSTR 


;START PROMPT 


BBOC 


CD4900 


00017 




CALL 


INKEY 




EOOF 


21C673 


OODIS 




LD 


HLr73C6H 


J END OF 32K PASCAL SYS 


eoiz 


113696 


00019 




LD 


DEf9636H 


! WHERE IT WILL END 


eoi5 


013726 


00020 




LD 


BCf2637H 


(BYTE COUNT 


B018 


EDE8 


00021 




LDDR 




iMoy:: it out of dds 
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LD 
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SPATCH ADDR IN PAS32K 
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LD 
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CALL 


OUTSTS 


;END and DONE 
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CALL 
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iPATCH ADDRESS 
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PATCH 
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PATCHl 


LD 
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LD 
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IRE-WRITE LEVEL-II 


9644 


30 


0003Q 




DEC 


A 


tUECTOR AREA 


9645 


3D 


00039 




DEC 


A 


iJUST LIKE ON A 


9646 


20F1 


000'40 




JR 


NZfPATCHI 


iPOMER-UP RESET 


9643 


0627 


00011 




LD 


BfZ7H 




964A 


12 


00012 


PATCH2 


LD 


(DE)tA 


fZERO 39 BYTES 


P64E 


13 


00013 




INC 


DE 




964C 


lOFC 


00014 




DJNZ 


PATCH2 


\ ^ 


P64E 


118040 


00015 




LD 


DE.4080H 




96S1 


21F718 


00016 




LD 


HL.18F7H 




9654 


012700 


00017 




LD 


6C.27H 




9657 


EDGD 


00018 
00019 
00050 

OOOSl 


' 


LDIR 
END OF 


POWER-UP ROUTINE 




9659 


210070 


00052 
00053 
00054 
00DS5 




LD 
LD 
LD 
LDIR 






965C 
965F 
9662 


11904D 
013726 
EDtO 




HL,7000H 
DE.4D90H 
BC,2637H 








00056 








SMOUE PAS32K BACK 






00057 
00058 


' 


MOU^ NEXT BLOCK TO HIGH 


CORE 


9664 


217296 


0OO59 




LD 


HL. START 




9667 
966A 
966D 


11D5BF 
012B0a 
EDBO 


00060 
00061 
00062 




LD 
LD 
LDIR 


DE.OCOOOH-END+START-1 
BC.END-START+l 






00063 














00064 


! 


EXECUTE CGHPILER 








00065 










966F 


C3904D 


00066 
00067 




JP 


4D90H 








00068 


; 


COMPILER WILL LIN^ TO THE ROUTINE IN HIGH 1 






00069 

0007D 
00071 


' 


MEMORY 


TO MOUE SOURCE PROGRAM DOWN TO BUFFER 


9672 


210096 


START 


LD 


HL.9800H 


iSTART OF BASIC BUFFER 


9675 


11F073 


00072 




LD 


DE.73F0H 


(START or PASCAL BUFFER 


967S 


010028 


00073 




L.D 


EC, 280 0-1 


JEiUr-TER LENGTH 


9676 


c;df;o 


fl0f74 




1 OTft 




Program continues 
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"Normally, all these subsystems 
reside. . . simultaneously, but you 
do have the option of overwriting. . 
I have never found this necessary." 

placed in its proper buffer, a smalt segment 
of code in lines 54-57 moves the source 
code loader to high memory where it will be 
out of the way. The last step is to execute 
the c&mpiler, which will, in turn, move the 
system segments around and execute the 
source code loader prior to displaying the 
user prompt. 

The last part of the patch program is the 
segment from line 66 to line 81 . This portion 
of code moves the source code file from its 
load address {X'9800') to the respective buf- 
fer address (X73F0'— Fig. 1) using a block 
move. Pointers, are set to the starting ad- 
dress of the source code, and a block com- 
pare is executed to find the X'FF' end of file 
byte in the source code. On exit from the 
block compare, register HL contains the 
end of source code + 1, the start of the 
compiled P-code. Pointers are set for this 
and for the end of source code, and the 
compiler is executed. Reference Fig. 2 for 
pointers to set. 



"/ have found Tiny 

Pascal. . . an exciting, , 

powerful language" 



The following changes to Listing 1 will 
enhance the operation of a48K system and 
aliow larger files to be used. Change the 
byte count in line 68 from X'28CK)' to X'6800'. 
Change the byte count in line 87 to read 
0FFO5H vice 0BFD5H for the label MOVEIT. 
Change the address part of line 55 from 
OCO00H-. . . too-.... 

Loading and Saving Source Files 

Program Listings 2 and 3 are the 
mechanism through which source files are 
loaded and saved using disks. Enter both 
programs and save them under appropriate 
names. Pascal programs can now be load- 
ed and saved. 

Listing 2 loads a Pascal file from disk and 
calls Tiny Pascal. Line 1 protects memory 
above X'9800' and clears string space for 
the disk file to be loaded to a string array. 
You are requested to enter a f tlespec for ihe 
Pascal source file, if no file name is entered, 
the buffer is immediately terminated by the 
X'FF' end-of-flie byte, and the compiler is 
called. 

If the file is successfully opened, it is 
read line by line into a string array, terminat- 



967 D 


3EFF 




0BO75 






LD 


A>OFFH (TERMINATOR CHftR 


9i7F 


2ir073 


00076 






UD 


HI .73F0H 


9682 


010028 


O0O77 






LD 


BC.2S0CH 


9685 


22B041 


Ofla78 






LD 


<1iaOH).HL iPRCGRAM START 


96B8 


Z2BC11 


00079 






LD 


<118CH],HL ;3AME 


9686 


EDBl 




OGoeo 






CPIR 


tFlND TEftMINftTDR 


96B0 


£2811! 


00081 






LD 


*1181H>rHL iSTAftT OF P-CODE 


9690 


228611 


oonsa 






LD 


C1ie6H)fML ;END of f'-CODE 


9693 


229611 


oooas 






LD 


C1196H).Ht, tADDft OF CURRENT F'GM 


9696 


2E 






00Q81 






DEC 


HL Jf'OIHT TO END OF SOURCE 


9697 


228211 


0DOS5 






LD 


<1ie2H>.HL lEND OF SOURCE 


969A 


C33A17 


00086 






JP 


173AH iEXECUTE TINV PAECftL 


96PC 








00087 


END 


EQU 


*-l 










oooae 










iJlC9 








00OS9 


CL3 


EOU 


B1C9H iCLEAR SCREEN 


B019 








00090 


INKEt 


EOU 


D019H {HAIT FOR KEV 


28A7 








00091 


OltTSTR EOU 


28A7H JOUTPUT STRING 


BFD3 








0DO92 


MOVEI 


r EOU 


0BFD5H iSOUftCE MOWER 










00093 










969D 


DO 






0091 


MSI 


DEFB 


13 


969e 


OD 






00095 






DEFt 


13 


969F 


19 






0GO9S 






DEFM 


'IF VOU HAVE LOADED TINY PASCAL <PAS32K>' 




16 


20 


59 


IF 55 


20 


18 


11 






56 


IS 


20 


1C IF 


11 


11 


15 






11 


20 


51 


19 IE 


59 


20 


SO 






11 


53 


13 


11 1C 


20 


3C 


SO 






11 


53 


33 


32 IE 


3E 








9AC6 


OD 






OG097 






DEFE 


13 


94C7 


56 






00098 






DEFM 


■VERSION, PRESS ANY KEY — - 




15 


52 


33 


19 IF 


IE 


2C 


2Q 






SO 


52 


15 


S3 53 


20 


11 


IE 






59 


20 


IB 


15 59 


2D 


2D 


2D 




96E:0 


00 






0OO99 






DEre 


13 


96E1 


IF 






ooiac 






DEFM 


'OTHERWISE, MIT RESET AND LOAD IT' 




SI 


IB 


15 


52 57 


19 


53 


15 






2C 


20 


IS 


19 51 


20 


52 


15 






53 


15 


51 


20 11 


IE 


11 


20 






1C 


IF 


11 


11 ao 


19 


51 






97Q1 


00 






floiei 






DEFB 





9782 


ODQD 




Q01C2 


HS2 


DEFW 


ODGOH 


9701 


19 






80103 






DE'M 


'I HAVE FINISHED THE MODIFICATION.' 




2B 


IB 


11 


S6 15 


2C 


■16 


19 






IE 


19 


53 


18 IS 


41 


2D 


51 






18 


45 


20 


ID IF 


11 


19 


16 






19 


13 


11 


51 "V 


IF 


IF 


2r 




9725 


BO 






0010" 






DEFE 


13 


9726 


50 






(lOlOS 






DEFM 


'PRESS ANY KEV TO RE-EiOOT DOS AND USE' 




52 


15 


53 


53 20 


11 


IE 


59 






20 


ie 


15 


59 20 


51 


IE 


20 






52 


15 


2D 


12 IF 


IF 


SI 


20 






11 


IF 


S3 


20 11 


IE 


11 


20 






55 


sa 


■15 












971A 


OD 






001D6 






DEFB 


13 


974B 


51 






0D107 






DEFM 


•THE DOS <DUMP> COMMAND TO PUT IT ON DISK ' 




18 


15 


20 


11 IF 


S3 


20 


3C 






11 


55 


ID 


50 3E 


20 


13 


IF 






ID 


ID 


11 


IE 11 


20 


51 


IF 






20 


50 


55 


51 20 


19 


51 


20 






IF 


IE 


20 


11 19 


53 


IB 






9773 


no 






60108 






DEFE. 


13 


977'^ 


55 






00109 






DEFM 


■UNDER THE NAME OF <PAS32K/ChO> WITH' 




IE 


11 


15 


52 20 


51 


IB 


15 






20 


IE 


11 


10 15 


20 


IF 


16 






20 


3C 


50 


11 53 


33 


32 


IB 






2F 


13 


ID 


11 3E 


20 


57 


19 






51 


18 














9797 


BO 






OOliO 






DEFE 


13 


9798 


51 






OOiil 






DEFM 


■THE FOLLOWING PARAMETERS FOR THE DUMP' 




18 


15 


20 


16 IE 


1C 


1C 


1^ 






37 


19 


IE 


17 20 


50 


11 


52 






11 


ID 


15 


51 IS 


52 


53 


20 






16 


IF 


52 


20 54 


18 


15 


20 






11 


55 


ID 


50 










97 BD 


OD 






00112 






DEFB 


13 


97ee 


53 






00113 






DEFM 


'START»7000H> END=969CH. TftA=9637H ' 




51 


11 


52 


51 3D 


37 


30 


30 






30 


IB 


2C 


20 15 


IE 


11 


3D 






39 


36 


39 


13 18 


2C 


20 


51 






52 


11 


3D 


39 36 


33 


37 


18 




97DF 


DO 






00111 
OOilS 






DEFB 





BOOO 








00116 






END 


PASMOD 


OOODO TQTftL ERRORS 
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Games from BIG FIVE will turn your computer into a 

TRS-80 HOIVIE ARCADE 



SUPER 
NOVA® 




GALAXY 
INVASION® 




ATTACK 
FORCE® 



COSMIC 
FIGHTER® 




METEOR 
MISSION II® 





NEW 
JOYSTICKS! 



If you and your TRS-80 have longed for a fast-paced arcade-type game that is 
truly a cha'lerige, ttien SUPER NOVA is what you've been waiting for. h this 
two piayer machine -lariguage ga.ne. large astercids float ominously around the 
screen. Suddenly your ship appears and you mjst destioy the asteroids before 
they destrcy you! (But watch out because big asteroids break apart into little 
ones.) The controls that your ship will respond to are thrust, rotate, hyperspace, 
and fire. All right! You've done it! You've cleared away all the asteroids! But what 
is that sauce' with the laser doing^ Quick! You must destroy hir^ fast because that 
gjy's accurate' As reviewed m May 1981 Byte magazine 

The sound of the klaxon is calling yoii! Cruel and crafty invadeis have beer 
spotted in battle formation warping toward Earth at an incredible speed. Suddenly, 
youf ship materializes just below the huge flock of invaders. Quickly and skillfuily 
you shift right and left as yoj carefully fire your lasers at them. But watch out! A 
few are breaking out of the ccnvoy and flying straight at ycu' As the whine of their 
engines gets lender, you place your finger on the fire button knowing all too well 
that this shot must connect — or your mission will be permanently over! With 
souid effects! 

Your TRS'80 screen has been transformed into a maze-like playfield for this 
game. As your ship appears on the bottom of the screen, eight alien ramships 
appear on the top. Ail o' Ihem are traveling at Hank speed directly at you! Quickly 
and boldly you move toward them and fire missiles to destroy them. But ttie more 
aliens you destroy, the faster the remaining ones become. If you get too good you 
must endure the wrath of the keeper of the mazefield the menacing 'Ragship". 
You must destroy him fast because, as you will find out, that guy's accurate! With 
sound effects! 

With thousands of stars whizzing by you, your SPACE DESTROYER ship 
comes out of hyperspace directly under a convoy of aliens. Almost effortlessly, 
you skillfully destroy every last one But before you can congratulate yourself, 
another set appears. These seem tc be slightly more intelligent than the first set. 
Quickly you eliminate all of them, too. But your fuel supply is rapidly diminishing. 
You must still destroy two more sets before you can dock with your space station. 
All right! The space station is now on your scanners^ Qh no! 'ntruders have 
overtaken the station! You must skillfully fire your neutron lasers to eliminate the 
intruders from the station before your engines run out of fuel and explode! Witiv 
sound! 

As you look down on your space viewer you can see the stranded astronauts 
that are crying out for you to rescue them. But first you must maneuver your 
shuttle down through the asteroids b meteors before you can reach them. Great! 
You've got one! But now can you get back to the space station to save your fellow 
shipmate or will you crash and kill both of you? You can fire your lasers tc destroy 
the asterokJs, but watch out, because there could be an alien FLAGSHIP Ijrking 
behind! Includes sound effects! 

For S39 95 it's now possible to have the famous ATARI joystick interfaced 
with your Model 1. All of our tapes are now completely compatible with the 
joystick. Packaged wUh complete instructions, you can even use it with your own 
programs! If your old tapes do nol say "Joystick Version" on them and you wish 
to exchange them for new Joystick versions, enclose S2 and your old tape. (Call 
or write for i.ifo on Med 3 joysticks. 




^OFTMASSE 



P.O. Box 9078-185 ' Van Nuys.CA 9J409- (213)782 6861 ^357 



Prices per game: Level 2, 16K Cassette Mod 1/Mod 3— S15.95 
Level 2, 32K Disxette Mod 1/Mod 3— S19.35 
10% discount for 2 'tents, '6% tor 3 or more (excluiles upgrades). 
Please add SI 50 per order for postage b >iandling. CaM. residents add 6% sales tax. 
Outside USA please add S3 00 per order for postage & handling. 
We accept checks, rroney orders, and MCA'isa orders |S2.00 extra far COD). 



All games "1980 by Bill Hcgue & Jeff Konyu 

Programs are written in machine language for high quality g'aphics. 

Disk versions are self-booting and compatible with Mod 1 an(i Mod 3 disk systems. 

High scores are automatically saved after each game on disk versions, 

TRS-80 IS a trademark of Tandy Corp 

Dealers AJI games now available in hill color packaging, please k;quire 



The lowest price 

Epson MX 80 FT $599 

Epson MX 80 $469 

Okidata Microline 83 $949 

Model III drives and controllers 

16K RAM NEC 2Q0 as Prime $19 set of 8 

We will supply any computer, software, or 
peripheral or related product at the lowest 
possible price. Call 24 hours a day, 7 days a 
week or drop us a line. We will meet or beat 
anyone's (trice. 

We Appreciate Your Business! 

April Lorenzen 

Route Two, Box Forty-Four 
Canton, Kansas 67428 
(316) 628-4935 
Quantity discounts available ^73 



^ MODEL III \ 

TAPE EDITOR/ASSEMBLER 

Run Radio Sfiack s Tape Editor/Assembler 
(EDTASM) for Model I on the Model III using our 
A5PTCH, Simply load EDTASM, then loac ASPTCH 
and run (single load possible). All EDTASM leatures 
supported plus: 

■ Full Model I source tape compatibility, 

■ Assemble directly to memory or to tape, 

■ Execute your object and return to EDTASM. 

■ Change cassette speed wtiile in EDTASM, 

■ Verify source tape after "W" command. 

■ Display and edit memory. 

■ Reqpver from reset without tape re-load. 

Requires TRS-80" Model 111 16K and up. Also 
available Model I ASPTCH (specify) and other Model 
III softViBre products. 

Send check or money orderfor $17.95 for ASPTCH 
tape and detailed instructions to: 

BYTE MISER SOFTWARE 

720 W. Haven Blvd. 
Rocky Mt.. NX. 27801 .^ 455 

y *TRS-80 is a trademark of TANDY corp, > 



AUDIO ALARM DEVICE 
TRS-80 MODEL I/Ill 

External Device that plugs 

directly Into Cassette Port. 

Ideal tor Business Applications: 

• Operator error notification tone 

• Complements numeric keypad input 

Specifications: 

•2'/4"Wx3V4"Lx1V4''D 

• 36" coble with cassette port plug 

• 1 pouncJ 

• Beep lasts 2 seconcts 

• Botterv powered— 9 volt 

• Only 1 line basic program 

• Install in seconds 

Inexpensively Priced 
$34.95 Audio Alarm Device 
$ 1-75 Postage & Handling 

S36.70 Total Price 

(Ohio Residents Add S2.10 Sales Tax] 
MAKE CHECK -OR- MONEY ORDER PAYABLE TO: 
RSI 

231 Green Street, Daylon, Ohio 45d02 
1513I461-4850 ,^67 



''The text editor is 
adequate for creation of source 
programs, but tias severe limitations 
on the amount of text editing 
that you can perform/' 



1 POKE SH-fOBlfSHPFtPaKE SH^OEZf &H97 :CLEAR9900 I CLS 

2 DEFINT A-Z:AD=SH98nO:DIM AS(500) 

3 PRINT TAE:(l^)'*x TINY * PASCAL »* FILE LOADER ■ :PRINT 
t LINEINPUT' ENTER FILESPEC FOR SOURCE FILEt "IFSU 

5 IF FS4=" THEN 19 

6 ON ERROR GOTO 22 

7 OPEN 'I",lfFSt:DN ERROR GOTO 

8 PRINT-LOADING «** TSt' *«« fRCt* DISK 

9 print;ln=o 

10 LINEINPUT^Jl, L4 

11 IF LEFT* CL*,1)<>CHR4 (255) THEN LN=LN+1 : A*(LN)^Lt :GOTO 10 

12 CLOSE 

13 FOR 1=1 TO LN 
I'i PRINT AtCI) 

15 FOR J=l TO LEN(A*<in 

14 POKE AD.ASC(MID*<A*(I>tJ,l)) 

17 AD=AD+i:NEXT:PGKE ADf 13 : AD-AD+1 
IB NEXT 

19 POKE AD.25f--tPD:<£ AD+1.255 

20 CLEAR 50 

21 CMD'PAS32K' 

22 CHO'E" :RESLIME 4 

Program Listing 2 



1 POKE SH'^OElTSHEFtPOKE SH40B2»&H73 t CLEAR 500 :CLS :DEFINT 


A-Z 


2 PRINT TAE!<1A)"!«* TINY « PASCAL *« FILE SAVER' 




3 PRINT 




^ LINE INPUT-ENTER FILESPEC FOR PASCAL FILEt ■;FS* 




5 IF FSt=" THEN t 




6 ON ERROR GOTO 15 




7 OPEN'O' »1.FS»:0N ERROR GOTO 




8 AD=SH73F0 




9 A»=" 




10 J=PEEK(AD):i'^ J=255 THEN I'f 




11 AD=AD+i:iF J=1S THEN 13 




12 A4=At+CHR*(J) :G0T0 10 




13 print*i,a*:print a*:gdto 9 




l'^ print*!, CHRSC 255 );CHRt( 255 >: CLOSE :POKE«H'10B1,8HFF: 




POKESH'tOB2,&HeF!CLEAR5Q:END 




15 CMD'EMRESUME -t 




Program Listing 3 





Brealiout Program 

Footnote to IF MEM lines following PROC PADDLE; these lines should read as 

follows: 

IF MEM (KEYBD) = 32 THEN (* USE^TO MOVE PADDLE LEFT') 

IF MEM (KEYBD) = 64 THEN (' USE^TO MOVE PADDLE RIGHTS 

CONST CURSOR=%t020; yiDEO=Z3C00t KEYBD=X3840 ' 

yAR AfEr SPEED. XPOS,YPOS»PPOSrXDIRfYDIR.SCQRE,SpyAR:iNTEGER; 

K, STOP » BEST, NB, I, FLAG ►TEhPfNEp: integer; 
FUNG RAND(N); 

VAR temp:±nteger; 

BEGIN 

TEMP:=(A+B) and %007F} A!=B; B:=T£MPf 

rand: = <<n>ktemp) div i28)-*-i end; 

PRQC PTC ( LINE tPOS); 

yAR tempiinteger; 

BEGIN MEHW(CURSOR) :=yiDE0+6'(«LINE+P0S ENDf 

Program continues 
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ing on the X'FF' byte. After closing the file, 
it is listed to the video and copied byte by 
byte into the buffer beginning at X'9800'. 
When this is finished, the compiler is called. 

NEWDOS users may use Program List- 
ings 2 and 3 as is. TRSDOS users wili have 
to substitute <CMD"I","PAS32K"> in line 
21for<CMD"PAS32K">. 

To save a Pascai source file, press reset 
when you have completed all operations re- 
quiring Tiny Pascal. After reboot, run the 
BASIC fiie saver. The text buffer is stili in- 
tact in RAM beginning at X'73F0', and mem- 
ory size will be set automatically to protect 
the area above X'73EF'. Enter a filespec to 
begin copying the file to disk and video. The 
disk file is ended by X'FFFFOD', and mem- 
ory size is returned to full memory. 
A Demonstration Pascal Program 

Breakout (Program Listing 4) is an arcade 
game w/ritten in Tiny Pascal, and based to- 
tally on a program written in MMSFORTH 
by A. Shaeffer, published in Byte magazine, 
August, 1980, in an article by A. Richard and 
Jill Miller. This game is perfectly structured 
for Pascal and is a good example of the rela- 
tive speed difference between Pascal and 
BASIC. 

Pascal is a one-pass compiler requiring 
all variables, procedures, etc. to be defined 
prior to their use. The program, therefore, is 
a top-down design, bottom-up structure. A 
study of the MMSFORTH version shows 
quite a few primitives defined that are use- 
ful for the TRS-80. 

The rules of Breakout are simple: Select 
thespeedyou want and the number of balls. 
As the ball hits more blocks in the wall, it 
moves higher and higher up the screen, 
gathering speed. The paddle is controlled 
by the right and left arrow keys. 

If you are fortunate enough to chip away 
the entire wall, the screen will fill again, let- 
ting you play all of your balls. If you have 
sound hooked to your cassette port, you 
will hear a beep every time the ball collides 
with any white object on the screen. Hitting 
the ball with various portions of the paddle 
causes varying amounts of backspin to be 
put on the ball. Losing the ball will get you a 
raspberry over the audio amplifier. 

The Game In Detail 

The first function, RAND, returns a ran- 
dom number which is in the range of 1 to N. 
The method used is a Fibonacci series gen- 
erator. This generator is seeded to start 
from the same initial value each time, and 
could be changed to randomize itself. In 
this particular function, N should be limited 



'Hitting the ball. . . causes varying 

amounts of baci<spin. . . losing 

ttie ball will get you a raspberry 

over the audio amplifier." 



PROC LINEfNUMBER); 
BEGIN PTCCNUMBER.O)} 



WRITEOO) 



end; 



PROC BDP! 

UAR i:integer; 

BEGIN 

FOR i;=l TO 10 DO BEGIN OUTP (255, 1 > ; 0UTPC255»2> END END! 

PROC FILLfSTARTf COUNT, CHAR)! 

yAR i:integer; 

BEGIN FOR i:= START TO START+COUNT-1 DO MEM(I):=CHAR ENDJ 

PROC PCLR! 

BEGIN FILL(16320+PPOS,8,32) ENDt 

PROC pset; 

BEGIN FILL(16320+PPOS,S.176) ENDS 

FUNC HIN(A,B) t 

BEGIN IF A>B THEN MIN:=B ELSE MIN:=A END! 

FUNC MAX(A,E:) ; 

BEGIN IF A>E: THEN MAX:=A ELSE MAXl^B END; 

PROC PADDLE? 
BEGIN 

IF MEM<KEYBD)=32 THEN (« USE ■]" TO MOVE PADDLE LEFT «) 

BEGIN PCLRi PP0S:=MAX(2»PP0S-l)f PSET END! 
IF MEM(KEYED)=6'1 THEN (« USE '•■^• TO MOVE PADDLE RIGHT k) 
BEGIN PCLR ; PP0S:=MIN(5'(,PP0S-H)! PSET END Elffii 



PROC DSET(X»Y) t 
BEGIN PLOKX+X.Yrl) t 



PROC DCLR(XrY) ! 
BEGIN PLOT(X+X»Y.O); 



PL0T<X+X+1,Y,1) ENDJ 



PLOT(X+X+1.Y,0) ENDJ 



FUNC DTESTCX.Y); 
BEGIN 

IF POINT(X+XfY) AND POINT (X+X+1 rY ) THEN DTEST:=1 

ELSE DTEST:=0 ENDJ 
PROC XCHKJ 
BEGIN 

IF XPDS<2 THEN 

BEGIN xdir:=~xdir; xposi=2J BOP end; 

IF XPDS>61 THEN 

BEGIN X0IR;=-XDIR! XP0S:=61 ; BDP END END; 



PROC YCHKS 
BEGIN 

IF YPQS<5 THEN 

BEGIN ydir;=ij ypqs:=5; spyAR:=i; 

IF YP0S<33 THEN SPWAR :=MIN( SPVAR .■^ ) ! 
IF YP0S<]9 THEN SPVAR :=MIN( SPUAR.3 ) J 
IF YP0S<15 THE^ SpyARl=MIN (SPUAR- 2) END! 



BOP 



ENDJ 



PROC PCHKJ 

VAR TEMPtlNTEGERi 
BEGIN 

FLAGt^'OJ 

IF YP0S>=17 THEN BEGIN 

YPos;=46J temp:=xpos-ppos; 



IF (TEMP>=0) AND <TEMP<B) THEN BEGIN 






ydir:=-i; bop; 








CASE TEMP OF 








O: XDIRt=-2J 


■1; xdirj=i; 






i: xDiRi^-i; 


51 xdir;=ij 






2: XDIRt=-lJ 


4: xdir:=ij 






3: XDIR!=-i; 


7: xdir:=2 end 


end 




ELSE flag:=i end 


end; 






PROC INITJ 








UAR I ; integer; 






Program contin 
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". . .it is. . .a nice experimental 
compiler system. Even the casual 
experimenter can get his feet 
wet in this language." 



to a value less than 128 for best results. 

Procedures PTC and LINE are screen- 
control procedures. PTC sets the screen 
cursor to the value corresponding to the 
line number and character position it re- 
ceives as parameters. LINE has one param- 
eter— the line number. The cursor is set to 
the line number and that line is cleared. 

BOP is the sound generator. Calling BOP 
causes the two low order bits of the cas- 
sette port to toggle, generating sound. A 
single call to BOP is used when the ball hits 
something, and a multiple call produces the 
raspberry noise when a ball is lost. 

FILL is used to fill a block of screen RAM 
with a number from the selected character 
code. This procedure is used by PSET and 
PCLR to turn the paddle on the screen on 
and off. 

PADDLE scans keyboard memory- 
mapped row X'3840' to determine whether 
the right and left arrow keys are being 
pressed. When a key is depressed, ttie pad- 
die is cleared (PCLR), the paddle position is 
incremented or decremented while check- 
ing for screen limits, and the paddle is then 
set (PSET). 

DSET, DCLR and DTEST are used to per- 
form double-width graphics using the built- 
in functions of PLOT and POINT. A double 
graphic point defined by (X,Y) is set at the 
TRS-80 screen coordinates of (2-X,Y) and 
(2*X-)-1,Y), 

XCHK, YCHK, and PCHK check the ball 
to see if it remained on-screen. XCHK re- 
verses the X-direction and causes a BOP. 
YCHK checks the ball position and sets its 
speed according to its height inside the 
wall. If the ball hits the top screen border, it 
is reflected down at maximum speed with a 
BOP. PCHK checks to see if the ball should 
have or did hit the paddle. A flag is set to 
signify loss of the ball. If the ball hits the 
paddle, you get a BOP and the CASE state- 
ment is used to select the correct backspin. 

CLR clears one block, adds up your 
score, gives it a BOP, and reflects the ball, 
CHKBALL incrementsthe ball position and 
checks to see if the ball has hit anything. 
BALL uses CHKBALL to move the ball after 
clearing it, and resets the ball if it was not 
lost. CHKGAME checks if the wall is entire- 
ly gone. (The modulus of the score with 1800 
will equal zero when the wall is gone.) 

I have found Tiny Pascal to be an excit- 
ing, exceptionally powerful language. I real- 
ize much of the language isn't included in 
this very limited subset, but it is still a nice 
experimental compiler system. The price 
allows even the casual experimenter to "get 
his feet wet" in this language. ■ 



BEGIN 

WRITE(28.31tl5>i <« CLEAR SCREEN. HOME CURSOR *) 
PTC(3»22); WRITE('< BREAKOUT >■>! 
LINE<10); WRITECSPEED (1-10» 1 IS FASTEST) ')} 
READCSPEEO*); SPEED := M1N<MAX (SPEED. 10) f 1 ) f 
LINE(12); WRITE C 'NUMBER OF BALLS (1-50) ■>} 
REAOCNB*) ; NB:=HIN(50.MAX(1.NB)); 
WRITE<28.31.15)f 

FOR i: = TO 63 DO BEGIN DSET(I.3)i DSET(I.'I) ENDf 
FOR i;=3 TO t7 DO BEGIN 

DSET(O.I)f DSET(lrl); DSET<62.I)t DSET (63.1) ENDS 
FILL( 15616.320, 191 >f SCORE :=0! LINE ( ) ; 
WRITE( 'BREAKOUT SCORE: BEST: '); 

WRITEtBEST*); PTC(0.5'^)J WRITE (' BALL: ' ) END! 

PROC CLR} 

VAR I,TEMP:iNTEGERi 

BEGIN 

TEMPi=((XP0S-2) AND 124)+2f 

FOR i:=TEMP TO TEMP+3 DO DCLRd. YPOS ) f 

SCORE ;= SCORE +■ ABS( YP0S--27) 5 

PTC(0T3'^)f WRITE(SCORE»); BOPJ 

YDIR := -YDIR END! 

PROC CHKBALL J 
BEGIN 

YPOS := YPOS + YDiRf xpos := xpos + xdir; 

XCHKf YCHK! PCHK; 

IF DTEST(XPQS.YPDS) THEN CLR ENDJ 

PROC ball; 

BEGIN 

DCLR(XP05,YPD5)f CHKBALLJ 

IF NOT FLAG THEN OSET ( XPOS, YPOS) ENDJ 

PROC CHKGAME ; (« CHECKS THE STATUS OF THE WALL AND GIVES 

YOU A SURPRISE IF ALL GONE *) 
BEGIN IF (SCORE MOD ISOO^O THEN FILL( 15616.320 , 191 ) END: 

PROC DELAY- 

VAR ItlNTEGER! 

BEGIN FOR i:= TO SPVARxSPEED DO ( « NOTHING X) END; 



begin (* main routine of 'breakdut' «) 

stop:=o; best:=c; 

a:=55; B:=89i (« seed random number generator «> 

REPEAT 

ppos:=28; spvar:=c; init; pset; 

FOR N&P:=^1 to NE DD begin (* PLAY THE GAME *) 
FOR K:=1 TO (200 DIV SPEED) DO BEGIN DELAY; 
PTC(0.61>; WRITE (NBPt); 

SPVAR:=5S (xSLOW IT WAY DOWN UNTIL BLOCK IS HIT*) 
IF RAND(2>=1 THEN XDIR:=1 ELSE XDIRt=-lf 

ydir:=i; ypos:=29j 

XP0S:=RAND(58)+2; 
REPEAT 

3 DO PADDLE i 



PADDLE end; 



TO 



FOR k:=i 
ball; 

CHKGAME ; 

delay 
'until flag; 

FOR Kt==i TO 12 DO BOP 

end (x of this game. test for more *)t 
best := max(best.score) j 
ptc(8.i8>; write(- run game again? '); 
repeat kt=inkey until (k='y') or (k='n')! 
if k='y' then stop:=0 else st0p:=1 
until stop 

end (x of breakout *). 
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TEXAS COMPUTER SYSTEMS 



Offers Lowest Prices on 



Color Computer 

4K Level I $329 

16K Level I $439 

16K Extended Basic $489 



IV/t/i TCS Memory: 

16K Level I $369 

16K Extended Basic $449 



Expansion Interfaces 

Zero K Interface $254 W/fh TCS Memory: 

16K interface $359 16K Interlace $318 

32K Inteilace $469 32K Interface $388 



Pocket Computer & 

Interface $ Caii toil free 



C*'l lis tOI mur 5MC *I4 n««()! iM («l 1 COO) it Utjr 



Epson MX-80 
$Call 

SOFTWARE 

MACPLUS S4g.9S 

Ar Ec tcr & Macro AssemDier 
'or Mooei 111 

rte sjDD'y patcnes 'a- tie Vaco Asssticib' !o 
tana ;!j' V DDB'at veoftieVKe'i Oj"'e«8C'iO' 
I"; .aes virtual y a i ih« 'ea'j'ss c' Sacu SiacK s 
SC ^S ■" d'us tiesB 'ea'i-'es are:! gryy o' 
g-ap-' :s aitc !aD 'O' Bn:s- -5 Asseni:,, la-iji-age 

■-5|--Cti3"5 nOeCOi:') cl conrjnOs 'or |yS!'' Ca- 
;.;n ce^itflrifg niarj n :o-t-3i change C'n! ryoes 
w!" ■ :eii e:: Asc ^c'uCec on ihe aisk a'e 
fORM/CMD - "■ lis 'o'~awa coces 0' yOu' o;C'.- 
~e''l ;c you' SDec "'cai ons on /our irr.a'T ar ojmc 

jn-rB- 

MODtFT/CMD - A j'i"ty aIic jI'ows asssn-cy 
aiguage i^os'S" f^K ''calis- I'oti oatchss ce' -■ 
BC - ar ASC I 3a::i ''B 

MAC/BAS - A Has c j-ofl-a'^' co-iam.'^g se«e-a' 
'j!' iiBs re a c r !"! o-sDaraito" J' saij-:e "es 
■^r-.osfl SBs:' oas acove i''Z seve*^ oi'-ar corpieie 
s'os'a'^s r*a«e :~is an excfliB": taus Piease 
S3eC''y Voce :■ i syslsr 

Mola: vo'j "-uS! "aye or c-'ccasB ma Moae 
M'C'Oso': Va:'0 AssflrrE e- Pac-ags ;Ca: 
• to-JZO?' '-0^ ''ac ShacH ! yOu ao" I a reaa, 
■^aveti'S'ie"' wea'8 0''e'iigi!a;asc9C'a sa'BOnce 
in cor^D nation «itn ttiB sotiwa'B cackage aesc- Dec 

aDOvB Call 'or r'ornaltO" and 0^' ifiw sa^B D'ICB 

ZAPIIIS19.95 

A s„De" zas lO' l^fi f/oOB 'i giving lui' sector ano 
;rack access :c any oart 0! tne TRSDOS CiSKeites 
J^rras Cy Iracts 0' sectors Ihrougtiout I^e disk 
A'^lo-nat'Caiiy goes !0 directOfy seclors Of any disk 
with 1L.SI one neyst'Dke nslant comoafing o( Itie 
sai-.e sectors on oilte'eni oisks f^„ii nenjs lists, 
ana dBscriDtisns ot coTinanas are avaiiaDlB al any 
poni j^st orBss c ear and a 1 cornna.ios aid treir 
desc'Dtions are i'Sleo Copy at5« sBCtWS mwi'y 
sectors lOOflie oetween he" and ascn input ot 
ch.aractB's as you r^od'ty 

'his disK also memoes COPYIT/CMO a jIi .:< 
aiograni a. lowing tie pij'cnase' '0 rraks nice '.han 
two Dack-uo cODies ot SCfi.PTSiT or ViS.CAlC tor 
annate i.se (iOOQ msuiance 'or your valuaOle 3ro- 
grars 

Spec a ■eat„-e K e CocL-neniation 'ncuaes a 
c jn-p ete -^anot '"Blocs' on Ota.! System F'les on the 
Mode^i TPSnoSC'sketies Vanouspaiciesa'som- 

CluOedtOgel'iao'errorsinTfiSDOS' 'an01 ?such 
asllie'"ySteriOuS FOf setloOcncoDingj'ti'es This 
isa -"j?: Cv-r"a5ea: J19 95 

MACPLUS-2 S39.95 

A Macro AssetTiDler Ultltly Kit 

i-ve c'cg'aiis 'o' one id* P'ice 
nUN/CMD A •^acro corrr^ano processor 
SCREEN/CMO - Sa«e video sceen , mages tc 
a s ' 

nELOCATf/CMO - Allows flynafnic relocation 0' 
P'oq'an 

PICMAC/CMD C-eaies a screen o'lnlofmationtha; 
car 2e convened to ai asserr'Ciy language n-oflu e 
a"c ;he'' used :o prihi I'le scee" 
PICBAS/CMO ■ Does the sa-iie Ojt conve'ts tp a 
6AS C P'ogram UodU'S C'eates sceens menjs 
p'OTOts 9'apncs last i! s i.*egeting SCRi'^TEiT 
lo' hji' once w 1h olh.e' itBTis ana patches Iiirown t 
tree 



Le:ie' aja'.ty -nairu sifiiiar to Lme pT-i;e' IV & 
Centronics o'inter Out has 'uH sotlwa'e control ol 
40 80 66 or "32 co'urflns SO CDs DnU'ectionai 
factor teea dlStMsaDleDrlnt^eaO 1300 less tnan 
r>eB'est corflDe'itive D'inter Lists 1645 Oj- o' ce 
inclu0.scao.e EPSON fflX-SO 

PRINTER DISKETTE 

A coTipietB diskette wtti 6 como eie tnes 'o- i.se 
wuh yourEoso" MK-30 P' ntsr 
•eaCy !0 use 

M/CMO - Ssnj a I P't-ie EpSP- P'i-le- cor'-r^a-cs 
tot"? p'inte' pirecv, "n-ii DOS cas aa-t otan auto 
cpct'ng sysiem Se: ,p :"e d' nte' I'ct DOS to the 
tvPBSty'B you «arl :*-'i"- 'u' :*-i p'og'a"" 

BIQLETT/BA8- Procjce .arge grap-i; ette-son 
ycprinie-aroscee- Duh^pme et'e-stoc -te';' 
IP d sk Ai p«s 3 c.'te'enl 5 ;e ette's tc f^e p'^-re- 
°'ogra'"'S'^en_d"ve'i "ocaya soco-st'j:; a'ge 
■etle-t lies 'pr VEPGtmg I'-io yo'.- casi: S'pgrar 

EPSON/SUB ■ '^'e'ge :-"5 s~a ■ -"od. e ntc any 
Baste F'Og'ar"^ anc :"Bh issue any ot the pr. -Iter c(W- 
'"anasA thaj'etie'co-^r^ahp A tti.ette'S'ep-ese"- 

(■ng the :i,'p0Se Ot tne corrnaic Vou nsBC npt 'e'e' 

Dae ant; 'orf to ooCi^'ner'tat on E«t-BTe , easy tc 
uSe a"d ■"la'Bs JS'ng t^B pntier TuC eas e' 'm-' 
evB' DE'ca 

jm PATCH ■ 'his catches NEWDOS 2 1 a'-c 
NEWOOS 8C sp thai the .k: '.-pho- wr p-mt tne 
TBSSOgrap-csw. 'efeD'-ter'erra.hsintiestan- 
da-C "-Ode -at'e-tna- tie *RSaG mode 'tiisaiows 
31 o"he 'ea'j-esd' the pnn'.e' to De i-sefl Oi:t you :a'' 
pj-ip. t-e sfsB" to It's p'lnre' a! any ii-^e iviif ai 
g'aph'cs 

0EM0/6AS A s,.3e' 'i.tC'.j p-ogra"- iviln hun- 
O'Baso'RlVsa-c h.-cedsC srea" p'OTiptsinat 
teac" ypc nov. ea?/ ' 'S t5 ;'ea'e Ti'acles with you' 
Epson MX80 p'.'ire- 

ARTICLt ■ A :0T[]e;e a'ticie aDOut tie Epson 
Mia: w.l^ a.' sorts ot tips concepts etc iO'gett.."g 
"■e ~cst Put 0' yoj' p'inter fhe iitormation 'o-- 
cea'ihQ j^heo^ 'ng to'ms .sarijsrtO' many otyOi, 

0EF8TATE/SUB A se'^es ot one wo'O pnnte' 
comma''a5 Iha' :a" Pe r'^e'ged nto any Basic Pro- 
grams T"ia' a ipv. :)■ c.iS diitpmatic 'unctions to oc- 
cur print I'ties A t" 5-dphic borders a'ounfl tne-i 
wilh p-ie word Center any leit With one rorrTsna 
etc 

Special Price' All seven of ttie above 
modules on one diskette or on tape (less 
JKL) for your Model ' or ill tor only 
S29.9S 

Or taKeaSlOOiscounli^youDuyliis 
item with a Durctiase ot tne Epson 
MX-80 



9^\ 



The DOS D 


Sk l\b(d'Y 


0* Programs 


1 ■v\r. It ■ cc^-imi Id. St"m58il 


*(W^^ i ■ '^S'JO^ 


n>wml->MM 


*'»f!Oi> "*inTt«nc 


IKBgr** Pu'^ iofyx 


aiiMji 'v ut> vH 

HluuiaT r^'•ltM "im* w«»> » 

Jithvnvi Uuw ■»• 't ''tndH vfi 0i» 


3 '..r :X aiKtnti""-- 


a"*"" I'"" '" 




nam «■ 11": « 


AltQ D'OvKMl iV ^ 


■uFd pii ,ia & :r-^DWi« 


Wooe 1 or 1 


Disk S39.I5 tor a'l b o'og'ars 



SpBc'v t^ode 0' . . vM v\ 



Printers 

Daisy Wheel 11 
$1695 
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TEXAS COMPUTER SYSTEMS 



otters Lowest Prices on 



COMPUTERS 




Model II 64K 
$3349 

An e)ice«entta~ip(.terW'yQjrtx.5jnes5 heeds Easy eiMtwaD"' 
ify 4 canoatJMity Sotwma'coeratO'traii'iriQnBeded Ailaccess 
ones avaitaC* Cisk expansions pnete's software at our kJw 
discayni Duces Oijrlastnaiasaif ^htserjvceMrassufemcsl 
0«tri«n« wiffun sewr oa^-s ater Myment ts -ecefieo 

Free wftfi pufthasB: 

■ M> :* 1C dcuwe Sensiry 
d-s«enes A i69 vaiu« 



SUGART DISK EXPANSION for the MODEL II 

Lses the saTB.-ei.ac ec-^.e .nits tcund ntieVoce 'C=L tsett Anions -a'che; cnves (or reiiapifi 
ose'aliors FastaccBSS !..me ijrcer CP/IW cr TBSOOS 'ui y corr.pataDifl with ai ens'i'^g so'tware 
Ready itshtsstiOA disk act'vity Si ve^/Diacpairi matches tvipdei n The Destc-nesava' ade'or less 

1 Drive. Single Cabinet $M9 2 Drives. Triple Cabinet S1424 
1 Drive, Triple Cabinet $949 3 Drives. Triple Cabinet S1899 
Extra Drives $475 



CORVUS HARD DISKS for the TRS-80 SCall 



MICROSOFT 

BASIC-BD - E<tehCBd P. so Basic ong va'iaO-e 
ra'hes cha hihg. iiariaDie^engthreco'ds (("JSlcor"- 
Daia:e. ■hte'C'e'aiive yerjipn S2B4 w/manual. 
S30 manual only 

BASIC COMPILER - Sarre Bas:; la'^guage as 
BASiC-8-' except cor^pues Basic Droj'an .nto a 
directly enecutaC'e. 'eiocatatite machtfie laiguage 
'ne OpB'atesStP 'Ct tnes 'aste' than regu'a' Basic 
ircudes Mac'P-BO AssefOD'er Spec'y Cf/ cr 
TRSDQS S325 w/manua<. S30 tnanual onty 



FORTRAN-SO - SuOPOftS AMSl 56 PtjS ~:3ry ti- 
tensipns .r-cijoing VACPO-SO Has library "ith 
hiar^age' 'eocatajie otiiect ccmpiier and iirnmg 

oader StDO w/manual. S30 manual only. 

COBOl-SO 'JersittJitygivesLeve 'ANSIandmost 
g' Le«e 2 A.'0wscp~pieteseQLert!3. reai.vearc 
indeiec li e S',3pp'' nith. va-iaDB 'iie names 

STRING LtJS'RAG COMPJTE MRviMG/UMU 
EXTEND CALL COPV SEASCH 3 Oimens'oral ar- 
rays cpnooufdandaBDreuated ccnciiions nested 
IF Interactive scree.", nandliig eiisns.nnj Co^- 
pataDie assemier i.n*ing loacer and re.ocatat'e 

p'a'y manager SS7S w/manual. 530 manjal 
only. 



Special-With TCS Memory 
ir Model III 48K 2 Disks 

Uses p'oven MP. d'lves moOitieO to' thpcy operatton and 
Percom conlrolter Lirnted 9C day warranty Can for 
details 



$1895 



Model III 16K $849 With TCS Memory: 
Model III 32K $979 Model 111 32K $909 

Model III 48K $1089 Mode! Ml 48K $969 

Model 111 32K 2 Disk RS232 $2100 
Model III 48K 2 Disk RS232 $2230 
Model III 32K1 Disk $1729 

Model 111 48K 1 Disk $1849 




'Paymeit Money D^dei Casiier sCieck Ce'tilied 
Check Persona' cl>ec»is take 3 wks WISA MC 
add 3V. 



■ Pnces suDiect to change any '.rne 

■ No tax out-of-state TeiansaddS'A 
• Det'uery suDiect to availaOiiily 

■ Sfiipcing eitra auofed dy phone 



TEXAS COMPUTER SYSTEMS .. 

Box 951, Brady Texas 7B825 

For last, etficieni service, we can air Ireight from Dallas 
to maior a/p near you Call for information. 

Toll Free Number 800-351-1473 

Texas Residents 915-597-0673 



GENERAL 



Pros and cons of this unconventional, stack oriented language. 



A First Look at FORTH 



John Krutch 
P.O. Box 761 
Crescent City, CA 95531 

ORTH is an interesting and highly un- 
conventional computer language that 
seems to be gaining a great deal of use. Its 
creator, Charles H. Moore, initially used it to 
control telescope equipment at Kitt Peak 
National Observatory in Arizona. Moore 
wfent on to found FORTH, Inc., which devel- 
ops application programs and puts the lan- 
guage in new computers. FORTH has been 
used on the 6800, 6809, 8080, Z-80, 1802, 
6502, and other microcomputers. 

System Structure 

A FORTH system includes a compiler 
and an interpreter. The compiler translates 
FORTH source code into intermediate 
code, which is a series of subroutine calls. 
The interpreter executes the intermediate 
code. 

The subroutines of the intermediate code 
form a "dictionary" that occupies a major 
pQr*i * »*.„ criD-pH system. Each diction- 
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ft 

LOW MEMORY 
HIGH MEMORY 







ary entry, or subroutine, is named by a word. 
FORTH programming builds sequences of 
words. The following are examples of words 
supplied with the system; 



1 

DUP 

;CO0E 

CONSTANT 

FORTH's nicest feature is that it allows 
you to create new words for new functions. 
New words are defined from predefined 
words. Once defined, a new word is added 
to the dictionary, and treated like a system- 
supplied word. New words are available for 
immediate execution or can be used to 
define other words. 

FORTH also supports structured pro- 
gramming. In fact, for every control struc- 
ture in Pascal, FORTH contains an equiva- 
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lent structure. For example, there is an 
If. . Else. . .Then structure which is very 
similar to Pascal's If. . .Then. . .Else. The 
Ncase. . . Casend construct is close to Pas- 
cal's Case. . .Of. Do. . .Loop is equivalent 
to Pascal's For. . .To. . .Do. While. . .Per- 
form. . .Rend (Begin. . .While. . .Repeat or 
Begin. . .If .. .While in some versions of 
FORTH) Is equivalent to Pascal's While. . . 
Do. And Begin. . .End is equivalent to the 
Pascal Repeat. . .Until. There is no GOTO 
in the language, nor does there seem to be a 
need for one. 

The Stack 

Programming in FORTH depends on a 
last-in, first-out stack, called the "parame- 
ter stack." Any number given to the system 
is placed on top of the parameter stack. The 
stack grows toward low memory. 

If you type: 3 <enter>, where enter indi- 
cates a carriage return, 3 will be put on top 
of the stack. This process is illustrated in 
Fig.1. 

If you now type: 7 <enter>, 7 is placed on 
top of the stack (Fig. 2). 
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^ Fig. 1 
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Fig. 2 



Fig. 3 



The FORTH word, + , takes the top two 
numbers on the stack, adds them together, 
and replaces them with the new value. If 
younowtype: + <enter>, lOisatthetopof 
the stack, while 7 and 3 disappear (see Fig. 
3). 

At this point if you enter: <enter>, the top 
item of the stack is printed on the video. The 
stack is now empty. 

Typing in items one at a time, follow/ed by 
a carriage return, is not the only way to ex- 
ecute FORTH words. Entering the following 
sequence all at once would have the same 
effects: 3 7 + . 

Let's examine more FORTH words. 
ECHO takes the number off the top of the 
stack and prints the ASCII character it 
represents; it performs exactly the same 
operation as the BAStC statement Print 
CHR$. If you enter: 65 ECHO, FORTH re- 
turns A, since 65 is the ASCII code for A. If 
you type: 48 56 90 ECHO ECHO ECHO 
<enter>, then Z-80 is printed. 

Move copies a block of memory from one 
location to another. You specify how many 
bytes are to be copied, where the copying is 
to begin, and which block of memory loca- 
tions will receive the copied bytes. The ad- 
dress where copying begins must be in the 
third-from-top position of the stack. The ad- 
dress of the first memory location to receive 
the copied bytes must be second from top. 
The number of bytes to be copied must be 
on top of the stack. 

The TRS-80's memory-mapped video pro- 
vides a way to watch Move working. If there 
is something besides empty space on the 
top line of the display, then: 15360 15808 
Move <enter> will cause the entire top line 
of the display to be copied to a line near the 
middle of the display. (15360 is the top line's 
beginning address in video memory; 15808 



"FORTH is an interesting 

and highly conventional 

computer language that seems 

to be gaining a great deal of use." 



is the middle line's beginning address in 
video memory; 64 is the number of bytes in 
one line and also the number of bytes to be 
moved.) 

Decimal to Hex 

FORTH switches easily from decimal to 
hexadecimal to octal arithmetic. The sys- 
tem starts up in decimal; the word Hex 
switches it to hexadecimal, and Decimal re- 
turns the system to base 10. Here's an ex- 
ample: 

HEX 21 3C00 400 FILL DECIMAL <enlef> 

Hex puts the system in hexadecimal 
mode. The numbers 21,3C00, and 400 are 
put on the stack with 400 on top. Fill takes 
the third-from-top number (which must be 
one byte) and fills memory locations begin- 
ning with the second-fro m-top address with 
this byte. The number of locations filled is 
determined by the number on the top of the 
stack. The third-from-top number is hexa- 
decimal 21, which is an ASCII exclamation 
point. The second-from-top number is hexa- 
decimal 3C00, which is the first location of 
the video RAM. The top-of-stack number is 
hexadecimal 400 (decimal 1024). The word 
Fill causes the screen to fill with exclama- 
tion points. Decimal puts the system back 
in decimal mode. 

Want a different radix, say, base 2? It's 
simple. The current radix is stored in the 
variable Base. The FORTH word C! (pro- 
nounced C-store) can be used to store a 
new radix in Base. 

Suppose you want to see what the 
decimal number 1745 looks like in binary. 
Type: 1745 2 BASE C! . <enter>. 1745 is 
put on the stack, and 2 is put on top of it. 
Base puts the address of variable Base on 
the stack. C! puts the second-from-top 
number into the variable whose address is 

REVERSE 




GET CHARACTERS 



POPANDPRINT I <> 





CR -I KEY DUP ECHO 13 = 

Fig. 4 



DUP ECHO -I 



on the top of the stack; Variable Base now 
contains the radix 2. C! also removes from 
the stack both the address and the number 
that was put into the variable at that ad- 
dress, so 1745 is now on the top of the 
stack. The word "." prints the top-of-stack 
number. Since the system is now operating 
in base 2, the binary equivalent of 1745 is 
printed: 11011010001. The system will re- 
main in base 2 until you type: DECIMAL 
<enter>. 

New Words 

To define a new word, use a colon to be- 
gin the definition and a semicolon to end it. 
For instance, to define the word Square, 
which takes the top-of-stack number and 
returns its square, you could do this; 

: SQUARE DUP " . ; <enter>. 

Square is the name of the new word. DUP 
causes the top-of-stack item to be duplicat- 
ed; • multiplies the two top stack items to- 
gether and places the result on top of the 
stack. The period prints the top-of-stack 
item on the display. The line is compiled in- 
stantly when you press the carriage return, 
which means that the word Square and its 
definition are placed in the dictionary and 
may be used like any other FORTH word. 

If you enter 14 Square, the number 14 will 
be put on top of the stack, and the newly-de- 
fined word Square takes over and 196 is re- 
turned. Square always requires the number 
which will be squared to be on the top of the 
stack. 

Creating a Source Program 

In FORTH, a source program is stored as 
a series of contiguous screens or blocks. 
Each block is 1024 bytes (1 K) long. This for- 
mat is perfectly suited to the TRS-80 Models 
I and Ml, whose display can hold exactly 
1024 bytes of character information, 16 
rows by 64 columns. A FORTH block fills 
the TRS-80 display. 

The Program Listing Is a FORTH program 
which occupies one block. Line is a com- 
ment line; anything within parentheses is 
ignored by the compiler. The program in- 
puts a string from the keyboard; when enter 
is pressed, the string is printed on the 
screen backward. 

Two procedures, GetCharacters and Pop- 
andPrint, are called by the main program 
and result in backward strings. GetCharac- 
ters marks the bottom of the stack by put- 
ting a negative number on it, then inputs 
whatever characters are typed and puts 
their ASCII codes on the stack. PopandPrint 
pops each code off the stack and prints it, 
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SPECIAL 

INTRDDUCTDRy 

OFFER 
THE ODCUIVIENTER 

FRDiV) 
PSONUT 5DFTWARE 



iHE DOCUtCNTER ii i unique proqru that Hill turn your Hodil I/III into a fantiitic progriMing aid. YOU 
cm ROM havt your TRA8H-80 display or print a floHchart and branch lap of any BASIC levil II AND Dlik Basic 
profrii using THE DOCUHENTER. This poittrful proqrii Has uny uses including) flonchirting your prograas 
Ind progrsH of others; an aid to learning progratainq; aid to error detKtion) etc. If docutentation is a 
problci for you, SOLVE IT. BUY THE DOCUNENTER. tit BET THE PROBRAH BUSS OUT OF YOUR TRASH t t t 



SPECIAL 30-DAY INTRODUCTORY OFFER- S»nd ♦19.95 <*29.95 for Oimk) 
-t-tl.OS -for pomtsga «nd handling toi 

PeONUT SOFTMAREp Inc. ^459 Plvas* mpscify Modal I or III 
P. 0. Box 490 and l&K, 32K« or 4Bk Mamory 

^ Lilburn, 6A 30247 Dafault Valuvs «r« MODEL I, i6K 



i 



For Information Call (404> 469-0056 



MORE STRAISHT TALK ABOUT DISK DRIVES 



■ DON'T BE CONFUSED BY ALL THE BRAND MAKES YOU SEE IN THE HflR<ET PLACE, THERE ARE VERY FEN RANUFACTURERS OF THE BASIC 
DRIVE CHASSIS, ALL THE OTHER HAHES ARE THOSE OF THE ASSEflBLERS OR THE RETAILERS. 

■ AS HflNUFACTURED, THE DRIVE NIIL NOT RUN ON A TRS-801, IT HOST BE MODIFIED BY THE flSSERBLER. 

■ THE QUALITY OF THE DRIVE DELIVERED TO YOU IS DEPENDENT ON BOTH THE MANUFACTURER AND THE ASSEMBLER, THE BEST CAN TURN 
TO JUNK IF THE ASSEMBLY IS IMPROPERLY DONE. 

■ THE PCNER SUPPLY AND CASE ARE VERY IMPORTANT COMPONENTS OF THE COMPLETE DRIVE, THE CASE MUST ALLQN PROPER COOLING 
AIR FLON, AND THE POKER SUPPLY MUST MAINTAIN TNO CONSTANT VOLTAGES. 

■ you MUST DEPEND ON THE COMPANY SELLING YOU THE DRIVE TO SERVICE IT AT REASONABLE COST NHEN IT FAILS YOU, THE 
MANUFACTURER IS NOT EQUIPPED TO DO THIS! 

■ THE BEST MEASURE OF QUALITY IN A DRIVE IS IT'S SPECIFICATIONS, NILL IT HANDLE DOUBLE DENSITY, NHAT IS THE TRACK TO 
TRACK ACCESS TIME, THE ANSNERS TO THESE TNO BUESTIONS INDICATE THE PRECISION OF IT'S COMPONENTS. 

■ KHAT KIND OF DRIVE SHOULD YOU BUY ? LEVEL IV HAS CHOSEN TO DISTRIBUTE EXCLUSIVELY, THE MPI LINE, ALL MODELS OF HPI 
ARE DOUBLE DENSITY RATED AND REBUIRE ONLY A FIVE MILLI-SECOND TRACK TO TRACK ACCESS TIME. 

■ HHAT DO ALL THE MODEL NUMBERS MEAN? 

B-5U 40 TRACKS SINGLE HEAD SINGLE SIDE B-52= 40/40 TRACKS DOUBLE HEAD DOUBLE SIDE 
8-91= 80 TRACKS SINGLE HEAD SINGLE SIDE B-92= 80/80 TRACKS DOUBLE HEAD DOUBLE SIDE 
(DOUBLE HEADS)-READ BOTH SIDES OF DISK (DUALS)-TNO DRIVES IN ONE CASE IRAN)-NQ PONER SUPPLY OR CASE 

■ KHERE SHOULD YOU BUY YOUR DRIVE, LEVEL IV IS ONE OF THE OLDEST AND LARGEST DISTRIBUTORS OF TRS-801 EQUIPMENT, LOOK 
AT THE ADS IN YOUR OLD MAGAZINES, MANY OF THE ADVERTISERS ARE NO LONGER IN BUSINESS, LEVEL IV HAS BEEN A LEADER 
SINCE THE BEGINNING, HE STAND BEHIND OUR PRODUCTS, AND NE'LL BE HERE NHEN YOU NEED HELP. 

■ NHERE DO THE NATIONALLY KNONN AUTHORS BUY THEIR DRIVES ? LEVEL IV CAN SHOH COPIES OF SALES. RECEIPTS FOR DRIVES TO 
MOST OF THEM, LEVEL IV ALSO PROVIDES SERVICE FOR THEIR DRIVES AND COMPUTER SYSTEMS IN OUR FULLY EBUIPPED TECH CENTER. 

■ CALL FOR OUR LON PRICES ON NEH AND USED DRIVES, AND REMEMBER, NE ALSO TAKE TRADES! 

LEVEL IV PRODUCTS INC. 32461 SCHOOLCRAFT, LIVONIA, MI 48150 
PHONES: MI (313) 525-6200 OTHERS 800-521-3305 (TOLL FREE) 

^M I a tradeaark of the RADIO SHACK DIV. of TANDY CORP. 
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stopping when the end-of-stack marker 
(-1) is reached. 

Since we're dealing with a LIFO (Last In, 
First Out) stack, the character codes are 
printed in reverse order from that in which 
they were typed. This is the reason for back- 
ward strings. The word Reverse causes Get- 
Characters and PopandPrint to be continu- 
ally executed. 

Once the block has been loaded and 
compiled, all you need do is type Reverse to 
begin execution. Reverse is defined in 
terms of GetCharacters and PopandPrint, 
which in turn are defined in terms of other 
words (see Fig. 4). 

FORTH, Pro and Con 

FORTH has a number of things going for 
it. Each implementation of FORTH is close- 
ly tailored to the hardware on which it's im- 
plemented. Programmers have nearly as 
much control over the computer as they 
would with assembly language. FORTH's 
modular, block-by-block programming style 
makes debugging easy, since each word 
can be tested and debugged as it is written. 
Because FORTH is implemented by a tech- 
nique called "threaded code," it runs 10-20 
times faster than an equivalent interpreted 
BASIC program. 

Though basic FORTH is fairly large (mine 
occupies more than 10K), when you finish 
writing and compiling your program you 
can strip away portions you don't need, 
leaving perhaps IK In memory at run-time. 

On the other hand, there are disadvan- 
tages. Almost every individual operation in 
FORTH requires some sort of stack manipu- 
lation: A number is put on top of the stack, 
taken off the top, duplicated, swapped with 
the number above or below it, etc. This ex- 
tensive manipulation of the stack leads to 
what is perhaps FORTH's greatest defect. 

FORTH source programs (which are usu- 
ally much longer and more involved than 
the Program Listing included here) are hard 
to read, and can be hard to write. There are 
so many stack manipulations during the 
course of a FORTH program that it's a dif- 
ficult and puzzling task to keep track of 
them all. 

There are more versions of FORTH for the 
TRS-80 available than any other language 
except BASIC. I use the system supplied by 
Miller Microcomputer Services of Natick, 
MA. Their FORTH is complete and well 
thought out, contains many extensions, 
and comes with an interactive 8080 assem- 
bler, among other useful Items. Both tape 
and disk-based versions are available. 



"Though basic FORTH is 

fairly large. . . when you finish 

writing and compiling. . . you can 

strip away portions you don't need." 



Sirius Systems, Programma Internation- 
al, and the Software Farm are some of the 
other suppliers of FORTH for the TRS-80. 1 



want to leave you with one final warning: 
Good FORTH tutorial manuals are almost 
nonexistent at the present time.B 



( REVERSE: ACCEPTS STRING FROM KEYBOARD AND INVERTS IT ) 
1 

2 : GETCHARACTERS OR - 1 

3 BEGIN 

4 KEY DUP OUP ECHO 13 = 

5 END ; 
6 

7 : POPANDPRINT 

8 BEGIN 

9 DUP ECHO -1 = 
10 END ; 

11 

12 : REVERSE 

13 BEGIN 

14 GETCHARACTERS POPANDPRINT 1 1 <> 

15 END; 



Program Listing 



PPI-80 

PARALLEL I/O 
FOR THE TRS-80 

3 socketed parallel ports with -i-5 and 
ground at each socket. Switch selectable 
address decoding handshaking and kluge 
area. For a complete description see article 
September 1 980. 
Bare board & assembly manual . . $ 26,00 

Kit of parts $ 94.00 

Assembled and tested $127.00 

ACCESSORIES^ 

8 channel A/D assembled & tested . . $45.00 

Music synthesizer board for the AY3-8910 

(3 voices) & software $35.00 

EPROM Programmer EP-2A-79 by Optimal 

Technology $169.00 

OTHER 

Power supply circuit board ±5, ±12 pro- 
vides a total of 3 amps $1 5.00 

Lower case modification — 

Kit of alt parts $19.95 

To order, send payment plus $2.00 shipping 
and handling 

Quant System! ^271 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

8,0. residents add 4% sales tax 
Overseas orders add $7 for shipping 



Need o solution for 
floppy D*sk or ^ 
R/UJ Hcod prot 




Floppy Disk Lube 

Just THR€€ drops con: 

• Prolong useFul dish life. 

• Increose head life. 

• fllloiu initiolizotion of "problem" 
disks. 

• Save 'unbootoble' dislis. 

• Reduce 'glltching' problems. 

• Cut nuisance problems. 



FLOPPV DISK Luee - Vi oz. 

LUITH flPPUCflTOfl. 



$4.00 



FIdd SI .50 shipping and handling. Ohio 
residents odd S'/i% sales tax 



DOSUJfiRe'NC. 



.'See List of Advertisers on page 306 
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Ever wanted to do 

things to your TRS-80 that Radio Shack 
said couldn't be done? How about upperAower 
case, reverse video, high-resolution graphics, a 
high-speed clock, audible keystrokes, an extra 
keyboard, and a real-time clock? Still not enough? 
How about using an 8-track as a mass storage device, 
making music, controlling a synthesiser, monitoring 
your data bus, and individual reverse characters? All 
these hardware modifications, plus lots more, are in 
The Custom TRS-80 and Other Mysteries, 
by Dennis Bathory Kitsz - the latest book 
from IJG Computer Services. 




section. 

In this you learn how 

to make BASIC programs auto-execute, 
reset the memory size, patch into the interpreter, 
test memory with machine-language, pack program 
lines with machine code, and generate sound effects. 
The Custom TRS-80 and Other Mysteries is more 
than 300 pages of practical information, and tested 
software, for $29.95. Order your copy now, and start 
turning your TRS-80 into a five-hundred-dollar 
^^ . supercomputer! Pick one up at your local IJG 
^^— dealer or use the coupon on the opposite page. 



TRS-Mli IsH irddrmurk ofTiindv 



^37 



'.. this is not only a worthwhile book 
but a great book. My advice Is to get it 
and USE it!' - William Barden Jr. 




OTHra 



132 pages 
$22.50 



Now available at 
selected DALTON 
bookstores 




312 pages 
$29.95 



Get them at your local IJG dealer! 



'It has twelve thousand one-liners 
in it, and every one is great!' 
- Dennis Kitsz. 



TRS-80 Disk and Other Mysteries is the 
definitive fixit book for disk users. Writen 
by Harvard Pennington it has rtiore than 
130 pages of easy to read, entertaining and 
immensely useful information - find out 
how to recover disk files, the layout of 
information on the disk, memory maps, 
problem solutions . . . the list goes on! 

Many readers have saved day? of work 
by recovering files that had been unread- 
able. Now in its fourth updated printing, 
TRS-80 Disk and Other Mysteries has 
been getting rave reviews in several mag- 
azines. Yours for only $22.50 (plus $1.50 
shipping, CA residents please '^dd $1.35 
sales tax). 

Microsoft BASIC Decoded and Other 
Mysteries is the complete guide to your 
Level II ROMs. With over seven thousand 
lines of comments and 6 additiqnal chap- 
ters packed with information, this is easily 
the biggest, and best, book about the Level 
II ROMs available. 

Exploit the full power of Microsoft 
BASIC, with the aid of more than 300 
pages of tested examples, understandable 
explanations and detailed conynents. Now 
available in a revised second printing, only 
$29.95 {plus $2.00 shipping, CA residents 
add $1.80 sales tax). 




IJG Computer Services, 
1260 West Foothill Blvd., 
Upland, CA 91786 



^37 



Please send me a copy of TRS-80 Disk 
and Other Mysteries for $22.50 plus $1.50 
shipping, n 

Please send me a copy of Microsoft BA- 
SIC Decoded and Other Mysteries for 
$29.95 plus $2.00 shipping, n 
Please send me a copy of The Custom 
TRS-80 and Other Mysteries for $29.95 
plus $2.00 shipping. D 
OK, send me all three IJG books for 
$82.40 plus $5.00 shipping. D 
Overseas add $8.00 per book airmail. 

Name 

Address j 

City 

State Zip 

Charge my: '. 

D MasterCard Interbank Code 

D Visa Expiration Date 

Card No 



Phone orders (714) 946-5805 



D Check enclosed for 

D Ship COD ($2.00 extra) 
Signature 



TKS-MII ih a trademark ofTnndy. MicrosofI is trademark ofMkrosofl. 



^Sae List of Advertisars on page 306 
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REVIEW 



A useful tool for learning Pascal 



Tiny Pascal from Supersoft 



'Tiny' Pascal 
Supersoft 
Champaign, iL 
$40 

Curtis H. Kyle 
10821 Lamkins St. 
Sun Valley, CA 91352 



One day while I was thumb- 
ing through a magazine, I 
saw an ad for a 'Tiny' Pascal. I'd 
been Interested in Pascal for 
some time. All the compilers I'd 
seen required a disk drive, or 
two, and at least 32K of memory. 
This Pascal required 16K, a cas- 
sette-equipped machine, and I 
sent for it. 

The first thing I wanted to do, 
of course, was load the tape. I 
was disappointed to discover the 
program was only recorded once. 
Fortunately, the tape loaded. 

The manual is not a primer on 
Pascal, so I bought one of the 
references recommended and 
began learning this new lan- 
guage. The syntax is simple, and 
before long I had written my first 
program. When I decided to list 
the program on my printer, 1 got 
my second big disappointment. 
There was no provision for print- 
ing lists, or outputting to a line 
printer under program control. I 
decided to write some programs 
that would provide these cap- 
abilities. (Program Listings 1 
and 2.) 

The system consists of four 
major parts: monitor, editor, 
compiler, and run time interpre- 
ter. 



The monitor is in charge of 
overall system control. From the 
monitor you can enter the editor 
to create or modify source code, 
compile source code, and run 
the compiled program. Provi- 
sions are made for saving and 
loading source code or P-code 
using the cassette recorder. 

The editor is adequate but 
doesn't compare with the Level 
II BASIC editor. Provisions are 
made for listing part or all of a 
program. Lines may be inserted 
or deleted and additional 
characters appended to the end 
of a line. Correcting an error 
within a line requires retyping it 
completely. 

The compiler generates an in- 
termediate code called P-code. 
The P-code is then executed by 
an interpreter at run time. 



This leaves the programmer 
with about 4V2K of memory for 
source and P-code. Normally the 
source code is entered and 
when it's compiled, the P-code 
immediately follows the source 
code in memory. 

However, for large programs 
there are some options avail- 
able. The programmer may 
choose to have the P-code re- 
place the source code as it is 
compiled, mailing it possible to 
have a full 4VzK of source code. 
Also, if additional memory is re- 
quired at run time for arrays and 
such, the operator may over- 
write the compiler and editor. 
For systems with at least 32K of 
RAM, there is another version of 
the program on the tape which 
allows much larger programs to 
be written. 



•) 

{' LIST ■) 

CONST PNTR = 14312; 

VAR MP, TS, TA: INTEGER; 

BEGIN 

MP: = %498E; ('SET UP MEMORY POINTER ■) 
MEM(PNTR}: = 10; (* CR/LF TO PRINTER ') 
REPEAT (■ REPEAT UNTIL FIRST PERIOD ENCOUNTERED ') 
TS: = MEM(MP); (* FETCH MEMORY CHARACTER *) 
MP: = MP + 1(* INCREMENT MEMORY POINTER") 
UNTIL TS = 46; 

REPEAT (- REPEAT UNTIL PERIOD ENCOUNTERED ■) 
TS: = MEM(MP); {" FETCH MEMORY CHARACTER ') 
REPEAT UNTIL MEM(PNTRK128; 

(- WAIT IF PRINTER BUSY ') 
IF TS = 9 THEN FOR TA; = 1 TO 3 DO MEM(PNTR): = 32; 

(• INSERT TAB-) 
MEM(PNTR): = TS; MP: = MP + 1 

(• OUTPUT TO PRINTER AND INCREMENT MEMORY POINTER *) 
UNTIL TS = 46; 

MEM(PNTR): = 10 (* OUTPUT CR/LF TO CLEAR PRINT BUFFER *) 
END. 



Program Listing 1 



What it Can Do 

'Tiny' Pascal only supports in- 
teger variables. Lack of real 
(floating point) and character 
(string) variables limits its use- 
fulness. All major control struc- 
tures of Pascal are supported, 
including Begin. . .End, Re- 
peat .. .Until, While. ..Do, 
(f...Then.. .Else, For.. .Do, 
Case, Procedures, and Func- 
tions. Statements provide Read, 
Write, and integer arithmetic in 
decimal or hexidecimal, includ- 
ing one-dimensional arrays. Ad- 
ditional intrinsic functions in- 
clude memory access (the 
equivalent of PEEK and POKE), 
machine language calls, I/O port 
access, absolute value, square, 
INKEY, graphics control similar 
to BASIC, and block memory 
moves. Game programmers will 
be sorry to hear there is no ran- 
dom number generator. 

The listings are examples of 
'Tiny' Pascal programs and pro- 
vide some needed utilities. Pro- 
gram Listing 1 allows a program 
to be printed on the line printer. 
This program should be inserted 
before the program you want 
printed out. The compiler will 
only compile the List program 
and when executed, only the 
second program will be printed. 
Comments, of course, may be 
eliminated. They are enclosed 
by (* *). Using this technique, a 
program about 4K in length may 
be printed. 

Program Listing 2 is a general 
purpose screen print routine. 
The parameters passed to it are 
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the first tine to be printed (1 to 
16) and the number of lines to be 
printed. The main program list- 
ed is a test program for the 
screen print procedure. The 
printer output when full screen 



is selected is shown in Fig. 1. 

While Level II BASIC is still 
more practical for any applica- 
tion, 'Tiny' Pascal offers a 
"shoestring" approach to learn- 
ing this structured language.B 
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Figure 1 



(* SCREEN PRINT *) 

VAR STLN, NMLN, SADD, CHAR, CCNT: INTEGER; 

PROC SPNT(STLN, NMLN); 

CONST PNTR = 14312; 

VAR FADD. LADO, CADD, TS: INTEGER; 

BEGIN 

FADD; = STLN. 64 + 15296; LADD: = NMLN.64 + FADD- 1; 

(• COMPUTE FIRST AND LAST SCREEN ADDRESS *) 
MEM(PNTR): = 10; (' OUTPUT CR/LF TO PRINTER ') 
FOR CADD: = FADD TO LADD DO C SET UP LOOP *) 
BEGIN 

TS: = MEM(CADD); (• FETCH CURRENT SCREEN ADDRESS CHAR •) 

IF CADD MOD 64 = THEN MEM(PNTR): = 10; 
(■ CR/LFIFENDOFLINE-J 

REPEAT UNTIL MEM(PNTRK128: C CHECK FOR BUSY ') 

MEM(PNTR): = TS (* OUTPUT CHARACTER TO PRINTER *) 
END; 

BEGIN (■ MAIN PROGRAM TO TEST SCREEN PRINT PROCEDURE ■) 
WRITE(28,31); (* CLEAR SCREEN ') 
WRITECFIRST LINE'); READ(STLN#); WR1TE(10,13); 

{• INPUT FIRST SCREEN LINE TO PRINT ') 
WRITECNUMBER OF LINES'); READ{NMLN#); WRITE(28.31): 

(- INPUT NUMBER OF LINES TO PRINT •) 
CHAR: = 49; C ASCII OF CHARACTER TO SCREEN ') 
SADD: = 15360; (" FIRST SCREEN ADDRESS *) 
REPEAT (■ REPEAT UNTIL SCREEN FULL ') 
FOR CCNT; = 1 TO 64 DO 
BEGIN 
MEM(SADD): = CHAR; 
SADD: = SADD + 1 
END; 

CHAR: = CHAR + 1 
UNTIL SADD> = 16383; 

SPNT(STLN,NMLN) (" CALL SCREEN PRINT PROCEDURE *) 
END. 



Program Listing 2 



TRS-80" Compatible 
"carbonless" ^ 
Continuous Statements 



small 
quantities, 
low prices, 
fast delivery 

Order as few as 500 
Statements imprinted with 
your firm name and address. 

Only $0795 

NEBS 9062 Statements are 
software compatible with 
the TRS-80, Model 1, Level 
II, Accounts Receivable 
package #26-1555. 



TRS-80 Is a Trade Maik of the RaOlo Shack 
Co., Subsidiary ot ifiB Tandy Corp. 



vow nW NAME HERE 




SPEED COLLECTIONS 
Product 772 DU-O-VUE* Envelope 
(S^'xe^") eliminates 
envelope addressing. 



Product 9062 — Size 6''x B'A" detached. Prices include your firm 
name, address and phone in top section, plus your name only in 
lower section. Printed in black ink. Available in single (white) or 
duplicate (white, canary) continuous sets. 





SINGLE 


DUPLICATE 


Product 772 


QUANTITY 


Product 


Product 


DU-O-VUE* 




9062-1 


9062-2 


Envelopes 


10,000 


$192.00 


$355.00 


$138.00 


6.000 


128.00 


228.00 


92.00 


4,000 


99.00 


169.00 


64.50 


2,000 


59.00 


99.00 


36.25 


1,000 


38.75 


61.00 


20.75 


500 


27.95 


39.95 


12.25 



ORDER TODAY! MONEY-BACK GUARANTEE. 
FAST SERVICE BY MAIL or PHONE TOLL FREE H- 800-225-9550 
(Mass. residents 1 -(- 800-922-8560). It is our policy to ship wlttiin 
6 working days following our receipt of your order. 



Please ship: 



Date_ 



.19. 



CODE 460 






.9062-1 STATEMENTS (Single) 

9062-2 STATEMENTS (Duplicate) 

.772 DU-OVUE® Envelopes 

.Infomiation on continuous checks and other 
computer forms. . 



HEADING TO BE PRINTED ON FORMS: (Please type or print) 



CITY and STATE 



AUTHORIZED SIGNATURE 



It you wish us to BILL and SHIP dllferanlly from above please Indicate. 

L^ Jft 



-J 



• See List ot Advertisers on page 306 



'8 HbffisStreet, Gmton,Mass. 0)450 

A Olviskxi ot New England Business Semce, Inc 
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You've Got 

TOTAL ACCESS 



© 



( spedaiizino in ntsso ■> 



Rose 



© 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



I've cot 

* Disk Drives 

TA400 1 40-T 1 S289 

TA800{80-T) §419 

TA400 Flippy S319 

TA800 Flippy §439 

All With silver case and 
power supply 

* CABLES 

2-Drlve §23.95 

4-Drlve §33.95 

Extender Cable $14.95 

* BARE DRIVES 

TA400B S259 

TA800B S389 

TA400B Flippy S289 

TA800B Flippy 5409 

* MODEL III DRIVE KIT 

Ino^des DO disk controller, two- 
drive power supply, mounting 
towers, all connectors, cables & 
hardware and Instructions. 
DO K yourself & save. $395 

* OPERATING SYSTEMS 

TRSD05 2.3 Disk & Mannual. . . $17.95 

LOOS $129.95 

NEWDOS/80 $129.95 

DOSPLUS 3.3, 3.3D $89.95 

* IRON 

Disk Drive Power Supply, 

Single $37 

Disk Drive case (sliver) 

and Base. $19 

Memorex Diskettes ( bx of 10 > 

^•| «« 

|i90 day warranty on drtves. Add $5.00 freigiit per 
5 Olve In cont US. UPS COO charge $1.40. inere Is 
> Iso a 1 5 day free trial on TA dtlws. If not com- 
' pMteiy saosfled I'll refund vour money (less snip- 
ping ). I'll take exception to Improper use or 
miaianoeting. 

* USERS GROUPS 

When your club makes a group buy, 
be sure to call me for a price. 
Rose 

TRS80 * COMPUTERS 
•COMPUTERS 

26-1061 Mod III, LI, 4K. $595 

26-1062 Mod III, III, 16K. $850 

26-1063 Mod III, 32K/2 DISk/RS232 

S2150 

26-4002 Mod II, 64K. $3300 

26-3001 Color computer, 4K. . . $330 
26-3002 Color computer, 16K. . $510 
26-3501 Pocket computer. .... $212 

* DISK EXPANSION, MOD H 

26-4160 one Disk. $977 

264162 Three Disk. $1998 

LOBO drive units also available. 



• PERIPHERALS 

26-1140 0K Exp. interface $255 

26-1141 16K Exp. interface $305 

26-1142 32K Exp. Interface $355 

26-1172 D.C. Modem II $155 

26-1 206 CTR-80 Recorder $51 

26-3503 P.C. interface $42 

* PRINTERS 

26-1165 Line Printer V $1581 

26-1166 Line Printer Vi $986 

26-1158 Daisy Wheel ii $1694* 

* LIMITED AVAILABILITY 



The complete line of Radio Shack 
computer products Is available 
through TA with full RS warranty, 
call me for price and delivery. Just 
because you don't see It don't mean 
we ain't got Itl 
Rose 



* SOFTWARE 

WE have Adventure, Big 5, Med 
Systems, SBSC, Snapp, Radio Shack 
and much more. Call or write. Do iti 

• PRINTERS 

EPSON MX-80 $479 

EPSON MX-80 F/T $589 

EPSON MX-100 Call 

STARTWRITER $1799 

45 CPS Daisy Wheel by C. itoh 
Parallel cables fOr any of the 
above $29.95 



ROSES 

SPECIAL 

OF THE MONTH 




MX-70 




Parallel cables $29.95 

You'll hate yourself If you 
don't buy a dozeni 



REAL TIME 

CLOCK 

CALENDER 

T-Tlmer© .... $89.95 

Clock continues to run no matter 
what mode you are In or when 
system Is down with battery back- 
up*. Not affected by disk I/O. Plugs 
Into screen printer port-has 
extender. 

sec, min, hr; day of week; 
Date, mo, yr. 
Mod. I only. 



ORDER NOW! 
TOLL FREE 
800-527-3582 



write or call Rose toll free at 
l-800-527-3582(Texas residents call 
214-234^1770). Please use the toll 
free lines for orders and literature 
requests only. Technical help or ser- 
vice use the Texas line. You can pay 
by VISA or mastercard, you can 
send Check or money order (allow a 
couple of weeks for personal checks 
to Clear) or order COD (we ship COD's 
cash, certified check or money 
order only). Rose will take American 
money in Just about any form. Add 
freight (UPS where possible) on all 
orders under $1000. if you buy 
$1000 or more Rose eats the freight! 
Texas residents cough up 5% sales 
tax. Allow 2-4 weeks fOr delivery. 
Order today - 1 need the moneyi 



TOTAL ACCESS 

P.O. BOX 3002 
RICHARDSON, TX 75080 

214-234-1770 ^e 

* TRS80 & Radio Shack are trademarks of 

Tandy Corp. 

© Copyright 1981 total access 

TOACC/23 
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INTERFACE 



This one has a de facto seal of approval from Ft. Worth. 



The Last CLOAD Fix 



Walter L. Stanley 

P.O. Box 15033 

Las Cruces, NM 88001 



The critical volume setting re- 
quired for an error-free 
CLOAD has been of concern to 
most TRS-80 owners from the 
time they first installed Level II 
ROMs. As reported in the Radio 
Shack Microcomputer Newslet- 
ter. (May, 1979), they have devel- 
oped a fix which they will install 
free of charge in all TRS-80s, 
provided the seal is unbroken. 
Harold Smith reported in the 
first issue o\ 80 Microcomputing 
(80 Input) that the fix, which is 
onal V2" X IVi" circuit board, is 
effective and well worth having 
installed. Other sources have 
likewise praised the modifica- 
tion as almost completely cur- 
ing the CLOAD problem of vol- 
ume sensitivity, 

Alas, there is a substantial mi- 
nority of TRS-80 owners who 
long ago opted to get inside the 
computer and change things 
around to improve and under- 
stand their machine. We did this 
with full knowledge that we gave 
up the option, forever, of having 
Radio Shack work on our 
TRS-80S. What are we to do to 
Improve CLOAD? 

We can plunk down $30 to $50 
for an outboard cassette inter- 
face device to clean up the cas- 
sette signal, or we can continue 



to experience that sinking feel- 
ing when a C replaces the aster- 
isk at the end of a five-minute 
program load- 

I was delighted to have the 
opportunity to see inside a 
TRS-80 which has the CLOAD fix 
installed. (I understand that the 
modification is labelled the X2X 
mod by Radio Shack). Naturally, 
I documented it by tracing wires 
and foil cuts, and then spent a 
number of hours trying to 
understand it. I'd like to share 



what I found with you, Since 
Radio Shack installs this mod at 
no charge, and I don't believe 
they would object to an owner 
building and installing it him- 
self. The circuit can be built for 
less than $3 and an hour of time. 
Fig, 1 is a combined circuit di- 
agram and logic function dia- 
gram. Referring to the schemat- 
ic in the TRS-80 Microcomputer 
Technical Reference Handbook 
IS helpful, but not essential. The 
original cassette input circuit 




OUTSIG'>- 



Z4a-i; ( iJi-Bi 



CHAIN SB'KH 



-<!*) 9 



takes the recorder signal (CAS- 
SIN) through all four sections of 
a 3900 Norton amplifier (Z4 in 
the technical manual) where it is 
filtered, amplified, inverted, 
squared up, and desensitized to 
noise. The output of the final 
section of 24 will be called 
CASSIN' since it is inverted, (To 
follow Radio Shacks notation, 
all active low signals are fol- 
lowed by an asterisk,) CASSIN' 
is normally high, andgaes low in 

response to any signal from the 

i- 




Fig. 1. This is the schematic for the CLOAD fix, with its location in the TRS-80 electronics. The dotted 
lines enclose all new components, which mount on a single 1 '/? inch x 1 '/? inch piece of pert board. 
The blue overprinting shows the grouping of gates functionally. An asterisk after a signal's label 

denotes active low logic. 
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recorder, be it a clock pulse, a 
data pulse, or noise that isn't 
filtered out. The recording for- 
mat consists of clock pulses at 
two millisecond intervals and 
data windows halfway between 
clock pulses. A pulse will actual- 
ly be present during this window 
if the data bit Is a 1 , but no pulse 
will o(k;ur if the data bit is a 0. It 
is possible, therefore, to see a 
legitimate pulse on the 
CASSIN* line as often as every 
millisecond. 

What happens during a 
CLOAD is this: The cassette re- 
corder is turned on by output- 
ting data to port 255io- Any out- 
put instruction to port 255 caus- 
es a signal line called OUTSIG* 
to go from high to low for the 
duration of the instruction (a 
matter of microseconds). 
Among'other things, OUTSIG* 
is connected to pin 13 of Z24, an 
input to one of two NAND gates 
configured as an R-S flip flop. 
Pin 13 is the reset input of this 
flip flop, and since a negative 
going pulse causes the activity, 



we call that input R*. 

With the recorder now run- 
ning, eventually a pulse on CAS- 
SIN* will reach pin 9 of Z24 
which Is the set input (labelled 
S") of that fiip-flop. This pulse 
causes the Q output, pin 8 of 
Z24, to go high. The cassette In- 
put software immediately de- 
tects this high and executes an 
output instruction to port 255. 
This brings OUTSIG* low which 
resets the flip-flop and returns Q 
to a low state. The software is, 
meanwhile, in a carefully timed 
delay routine, and shortly after 
one millisecond has passed, it 
again tests whether Q is high or 
low. If it is high, another output 
instruction causes OUTSIG* to 
go low and resets the fiip-flop. If 
Q is low, the software waits pa- 
tiently for the appropriate time 
to test Q again. 

The only flaw in the system is 
that any pulse that gets through 
the four sections of Z4 will set 
the flip-flop, which will stay set 
until the software tests its state. 
A noise pulse will always be 



seen as a 1 data bit, hence, the 
volume setting is critical. If it is 
too low, valid data pulses are 
missed; too high, too much 
noise is seen as data. And yet, 
there is only a tiny time interval 
during which it is possible for a 
valid pulse to be on the tape. 

The solution exhibited by 
most of the outboard cassette 
improvers I have seen is to pro- 
vide a noise-free signal to the 
cassette input of the computer. 
Essentially, this is done by a 
more sophisticated pulse shap- 
ing circuit than Radio Shack 
uses (Z4) which has the effect of 
presenting a digital rather than 
an analog signal to the com- 
puter. For those of you who do a 
tot of tape duplication, I heartily 
recommend that approach. For 
those of us not into tape dupli- 
cation, it seems to be an ap- 
proach that transforms a cheap 
tape recorder into an expensive 
one. 

An alternate answer is to 
make Z24 insensitive to noise 
for most of the inter-pulse time; 



that Is, to turn off the S" input to 
Z24. This could be done with 
software by delaying the output 
instruction to port 255, thus de- 
laying the reset of Z24 until just 
before the next valid pulse is ex- 
pected. In fact the new Level II 
two-chip ROM set does just that. 
Unfortunately, a 32K PROM is 
very expensive, and that is what 
contains the cassette load soft- 
ware. The Radio Shack CLOAD 
modification provides a cheap 
hardware alternative to an ex- 
pensive reprogramming of the 
ROM software. Note from Fig. 1 
that the direct path between pin 
10 of Z4 and the S* input {pin 9) 
of Z24 is cut. Instead, the output 
from Z4 is routine to Z24 via a 
gated buffer made from two sec- 
tions of a CD4001 quad NOR 
gate. 

The buffer works as follows: 
So long as the input labelled 
GATE* is low, CASSIN* at pin 1 
will be inverted at pin 3. The sec- 
ond NOR gate is merely an in- 
verter, so the output signal final- 
ly presented to S* of Z24 is in- 





B00K 



-80^'" ROM 



you ever do Assembly language program- 
ming, or you just want to know more about 
your TRS-80 ROM, "THE BOOK"s are for you. 

*TRS-aO Is a trademartt of Tancfy Corp. 

Each volume is priced at: $14.95 + $1.50 
S&H = $16.45 ($17.05 in VA) Overseas add 
$2.50 for air shipment 

j Insiders Software Consultants, Inc. 
P.O. Box 2441, Dept. SUM2 
Springfield, VA 22152 

D Please send me Volume I of THE BOOK 

D Please send me Volume II of THE BOOK 



Volume I; The most comprehensive 
bool< yet on the math routines in 
Level II ROM, Models I & III. In- 
cludes a fully commented listing 
from 0708H to 1607H and an in- 
credibly complete map of the ROM 
and reserved areas of RAM. 



.^305 



NAME 



ADDRESS 

CITY, STATE. 



_ZIPC0DE. 



[" Check payable lo Insiders Software Consultants, Inc. 

"" MASTER CHARGE MC Bank Code 

■ VISA Exp. Date _,_ Card Number ^_ 

Signature „ ^^___ 



Dealer Inquiries Invited 




Volume II: Everything you want to 
know about the video, keyboard, 
cassette, and printer driver 
routines. Learn how to write your 
own! Remarkably detailed listings 
illustrate well-commented source 
code. Complement Volume I, now. 
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deed CASSIN*. But if GATE* is 
made high, then pin 3 of the 
NOR gate will be low regardless 
of the state of CASSIN', and 
Z24 sees only a high. The bal- 
ance of the circuit controls 
GATE* so that after Z24 is set by 
a pulse, no further pulse can 
pass to Z24 until about 0.72 mil- 
liseconds later. 

In order to accomplish that, 
the remaining two NOR gates 
are configured as an R-S flip- 
flop. Since the flip-flop is made 
of NOR gates, positive pulses 
set or reset its state. The set in- 
put, labelled S, Is at pin 8 and is 
connected to the output of 
Z24. Take my word for it; pin 13 
of the flip-flop, which is the reset 
input, is low at the start of a 
CLOAD, so Q* (pin 10) is high, 
which means that pin 11 (the Q 
output) is low, and so GATE* is 
low, and the gated buffer is free 
to pass CASSIN* right through 
to S* of Z24. Meanwhile, the Re- 
set Input of the CD4040 counter 
is held high since it, too, is con- 
nected to Q*, and this forces 



pins 13 and 14 of the counter 
low. The two diodes and the pull- 
up resistor form an AN D gate, so 
the R input of the flip-flop is low. 

Execute CLOAD, and wait for 
the first pulse. When it comes, It 
will pass right through the gated 
buffer and reach S* of Z24, trig- 
gering that flip-flop and causing 
Q to go high. This high triggers 
the set input of the NOR gate 
flip-flop, and so Q* goes low and 
Q goes high. high shuts the 
gate to any further pulses from 
CASSIN', so that any pulses on 
CASSIN* (which must be noise) 
get sent to the bit bucket. 
Simultaneously, since 0' is low. 
Reset of the CD4040 is low, and 
the counter starts doing its 
thing at 887 KHz. About this 
time OUTSIG* goes low be- 
cause the software saw that Q 
of Z24 was high. Q of Z24 goes 
low in response, and nothing 
else happens for awhile. 

How long is awhile, you ask? 
Well, the CD4040 is happily 
counting pulses, and after 128 
ol them have been counted, pin 



13 goes high (this Is the divide by 
28 output). Since the diode con- 
figuration is an AND gate, noth- 
ing happens. After 512 pulses 
have been counted, pin 14 goes 
high, but pin 13 has gone back 
low, so still nothing happens. 
But 128 pulses later, both pins 
13 and 14 find themselves high, 
and the 10K resistor brings pin 



13 of the CD4001 high. That re- 
sets the flip-flop, whk;h lets 
CASSIN* get through Id Z24 
once again. "Awhile" turns out 
to be 1/887.000 times 640, or 
about 0.72 milliseconds, give or 
take a few microseconds. , 

These five components keep 
possible noise on CASSIN out of 
the system for nearly 75 percent 




Fig. 2. Parts placement on the pert board is designed to permit 
use of component leads for much point to point wiring, fti par- 
ticular, note the placement of the diodes and resistor to allow 
their leads a straight shot to the IC pins to which they are 
soldered. Aside from the flying leads to the main circuit board, 
only + 5V and ground wiring is on the top of the board. 



Presenting "The Micro Mainframe'' 

*TRS-80 MOD-III 5-Megabyte, self contained Winchester Drive Computer 

system 7995.00 
5-Megabyte add-on Winchester Drive for *Mod-l ac *Mod-III computer 

system 3795.00 
Winchester Disk Controller for most drives 1495.00 
Both systems include *TRSDOS compatible operating systems 

Hard Disk Host adapter for most Winchester Hard Disks 

*TRS-80MODI&I1I 350.00 *TRS-80MODII 650.00 

MOD-III floppy disk controllers 

FDC III A — assembled controller for 5" and 8" drives 595.00 

read or write sir^le and double density 

FDC III B — assembled controller for 5" drives 325.00 

Installation kit for add-on floppy diskdrives 160.00 

Dealer Inquiries Invited 1-916-447-7048 

MICROMAINFRAME e 

714 Alhambra Blvd., Sacramento, CA 95816 



^See List of Advertisers on page 306 
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TRS-80 TAPE DIGITIZER 



■ F-. "I -I ■■■.■ ■■« I" I'-H S''0if"'t)<"-Oi'.iri-- I'asri E ••-v-a , E ■ ■ 

At last there is a cure lor TRS80 tape cloading blues For slmost three years, 
Alphanettcs has been selling the TRS-60 Tape Digltlief, a proven hardware 
sotution tor "ioai soltware problems. No lonQCf need you |i>ggle the recorder's 
volume conifol endlessly, trying for a perlecl ckwd ol a pre-recorded program. 
Jusi pop the tape into the cassette recorder, process Ihe signal through our 
digitifer. and you're ready to RUN a perlecl load' 

Just checK oul Ihe Tape Digituer's features 

• Makes tape program loading virtually independent o' Volume 
control setting 

• Allows coovina svstem S norrnai laoes wiinoul usina comoijipr 

• K4akes a perfect d^ial copy ot any tape, Mithoul using oxnputer. 
removal hum. noise, arv) cures minor d'opouls 

• Cassette switch allows martual controt ol casselte recorder in- 
dependent ol computet control 

• "Good Data' mdicaloi easily enables setting proper 
volump doubles as a tape momior 

• AC powered ■ no Datlenes to replace 

• Housed in a siuidy attractive melal case. 

• Complfitely compatable with level I & II 



Just teed your casselte to Ihe Alphanellcs Tepe Dlgltlier and feed your 
computer the exact digital waveform the TRS-SO gave your (ape! 
Get rid of your tape bugs today • $S4.95 postpaid Of return within 10 days tor 
afullrelundj ^—~- 

A,.^.l.l^ -' t. ■■'■1. .1 casspl'i' F-"-!!'.- rxvni' ^wilcri loi tb9 9S 



ALPHANETICS ^.24 

P.O. BOX 597 
FORESTVILLE CA 95436 



• 24 hr. phone 
(707) 887-7237 




MOO III (aiBkin avvilabl* toon. 



of the time between legitimate 
pulses. There is still a time inter- 
val when a noise pulse could 
trigger Z24 erroneously, but one 
does have to allow for variations 
in cassette recorder speed. 
Keeping noise out for 75 percent 
of the time gives a whopping im- 
provement in reliability, especi- 
ally when you consider that even 
if a noise pulse triggers the Z24 
flip-flop, the next data pulse 
would have been a 1 about 50 
percent of the time anyway. All 
this means that you can tolerate 
more noise output from Z4, 
which allows you to cranio up the 
volume or your recorder by a 
pretty wide margin. This, In turn, 
means you are not as likely to 
lose legitimate data pulses. It 
doesn't seem, however, that this 
fix would do anything to help 
CLOAD at lower than recom- 
mended volume settings. 

Building the circuit is very 
simple. Five components don't 
justify even a thought of a 
printed circuit board, so chop 
yourself off a IVz Inchx IVzinch 
piece of pert board with holes on 
1/10 inch centers. Layout of 
parts is not critical, but the ar- 
rangement shown in Fig. 2 
allows some wiring with compo- 
nent leads. Contrary to many 
cautions, i have not found 
CMOS Integrated circuits that 
fragile, and if you exercise 
reasonable care to avoid gen- 
erating static electricity and 
solder quickly, you won't need 
sockets. Fig. 3 is a pictorial rep- 



resentation ot the wiring on the 
underside of the board. (The on- 
ly hooker in this project may be 
finding a CD4040. If you have 
one on hand, use it, but don't try 
to buy one at Radio Shack— it's 
not in their catalog.) Instead, 
pick up a CD4020. This is also a 
ripple counter, and thankfully, 
the pinout is Identical to the 
CD4040 for the pins we use. 

Time now to open the com- 
puter. If you are building this cir- 
cuit you've done that before and 
don't need detailed instructions. 
Swing out the keyboard, there's 
no need to remove the main cir- 
cuit board. With the keyboard 
unit positioned normally— that 
is, with the tape, video, and 
power jacks at the upper right 
hand corner— you will see a set 
of four rows of ICs from the foil 
side of the main circuit board. Z4 
is the rightmost IC in the top 
row, and Z24 is directly below Z4 
in the second row. Pin 1 of alt 
ICs is the top right pin. Carefully 
cut the trace leading from Z4 pin 
10 to Z24 pin 9. Solder the red 
-I-5V lead from the perf board to 
pin 14 of Z24, and the black 
ground lead to pin 7 of Z24. Any 
other convenient power take off 
points may be substituted. 
Solder the green wire to Z4 pin 
10. 

Locate Z43 and Z44 as 
fotiows: Directly below Z24, in 
the third row of ICs is Z42; im- 
mediately to the left is Z43, and 
to the left of that is Z44. Now 
solder the blue wire to Z44 pin 



-<!> 4001 




r 



I 



F/g. 3, T/ie underside of the board shows the simple wiring re- 
quired. Bend the resistor lead at a right angle to the resistor body 
and soider it directly to pin 13 of the 4001, then spot solder the 
diode leads to it. The connection from pin 12 of the 4001 to pin 11 of 
the 4020 (4040) should be insulated. 



— >~i^ I 

•0-0"0"0-<!>"i-00-n 
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WE WILL NOT BE UNDERSOLD 



DISK DRIVES 



FOR TRS-80- Model I 

CCI-100 5'4", 40Track(102K) S314 

CCI-280 5'*".80TracK(204K( $429 

ADDON DRIVES FOR ZENITH Z-89 

CCI-189 6'*",40Track{102K) $394 

CCI-289 S'*". 80 Track (204K) $499 

Z-87 Dual 5V," system $995 

External card edge and power supply included- 90 day wafranty/one 
year on power supply. 

RAW DRIVES 8'SHUGART801R $395 

5V«'Tf^ACQrTAND0N $ CALL POWER SUPPLIES $CALL 



PRINTERS 




DISKETTES -BOX of 10 

S'A" Scotch $30 Maxell $40 BASF/Vertatim 

8" Scotch $45 Maxell $55 BASF/Verbatim 

PLASTIC FILE BOX-Hotds 50 5". " diskettes 

PLASTIC LIBRARY CASE 5'.' $3.00 3" 

HEAD CLEANING DISKETTE 

FLOPPY SAVER $11.95 RINGS 



16K RAM KITS 

200 ns tor TRS-80.- 



2 for $37 

Appie II. (Specify]: Jumpers 



$26.95 
$36.00 
$19.00 
$ 4.00 
$25.00 
$ 6.95 

$19 

$2.50 



SYSTEM SPECIAL 

Apple H Plus 48K w'llnve and controller. Epson MX-80 printer and 
interface SUP R Mo-:] RF Modulator: List $2965 You Pay $2299 



COMPUTERS/TERMINALS 



ARCHIVES 

ALTOS 

TRS-80' 

ZENITH 

ZENITH 

TELEVIDEO 

IBM 

ATARI 



64K,2-Drives. 77 Track 
ACS8000 Series 
II64K $3499 

48K, all-in one computer 
Z-19 

9200 $ 748 

3101 Display Terminal 
400 S 479 






I-16K 



950 



800 



APPLE PERIPHERALS 



MONITORS 

APF 9"B&WTVM-10 

BELL& 

HOWELL 9 BSWBHD911 

LEEDEX 12 B& W $ 129 

SANYO 9' BAWVM4509 

SANYO 12 BSW DM5012 

SANYO 12 Green Screen DM5112 

SANYO 13'Color DMC6013 

ZENITH 13" Color 



TELECOMMUNICATIONS 

LIVERMORF STAR MODEM 2 yea- guarantee 
UNIVERSAL DATA SYSTEMS UDS-103 
D-CAT HARD WIRED DIRECT MODEM 
AUTO-CAT AliIo Ans/jer, Uirecl Connect Modem 
D.C. HAYES MICRO-MODEM 
CCI Teinel Cnmmunicalions Package 



$5495 
$CALL 
$ 899 
$2200 
S 735 
$1049 
$1189 
S 795 
SCALL 



$115 



13" Color 



$195 
$329 
$155 
$226 
$238 
$406 
$349 



$125 
$179 
$189 
$249 
$295 
$135 




NEC Spinwriter 

Letter Quality High Speed Printer 

RO 

R,0 with tractor feed 
KSR With tractor feed 



C.ITOH 

EPSON 

PAPER TIGER 

IDS 445 

108 460 

IDS 560 

ANAOEX 

OK I DATA 

Microline 80 

Microline 80 

Microline 82 

Microline 83 

CENTRONICS 

Tl-810 

TRS-BO* software. 



Starwriter 
MX-80 



$1575 

$CALL 



Starwriter H 
MX-70 



Graphics &2K buffer 

Graphics & ?k buffer 

Graphics 

DP -8000 $ 849 



DP-9500;01 



Friction & pinfeed 

Friction, and pin & tractor feed 

Friction & pin feed feed 

120 cps. uses up to 15' paper 

730 $ 595 799 $ 969 



73^ 



:ompressed print & vert, form control 



$2395 
$2555 
$2795 

$1849 
$CALL 

$ 699 

$1050 

$1450 
$1295 

$ 415 
$ 500 
$ 615 
$ 849 
$ 749 

$1865 



PRINTER SPECIAL 

SEIKOSHA GP-80M 



List $399 



You Pay $319 



S-100 CALIFORNIA COMPUTER SYSTEMS 




MAINFRAME Model 2200A 

Z80CPU Model 2810 

MOTHER BOARD Model 2501 

16K STATIC RAM, 200ns Model 21 160 

32K STATIC RAM. 200ns Model 2032O 

64K DYNAMIC RAM Model 2065C 
FLOPPY DISC CONTROLLER Model 2422A 

EXTENDER BOARD Model 2520K 

2P-f2SI/0 Model 271BA 



$349 
$259 
$106 
$309 
$619 
$580 
$345 
$ 52 
$309 



APPLE ACCESSORIES AND SOFTWARE 

VISICALC 
DB MASTER 
Z-80 SOFTCARD 
VIDEX BOARD 
16KCARD 
APPLE JOYSTICK 
SUP-RMOD 
CCS CARDS 
GALAXIAN 
SPACE ALBUM 
ASTEROIDS 
FLIGHT SIMULATOR 
WIZARD&PRINCESS 
SARGON 2 
Hl-RES FOOTBALL 
MYSTERY HOUSE 




$119.00 
$159.00 
$269.00 
$259.00 
$169.00 
$ 49.00 
$ 25.00 
$CALL 
$ 22.95 
S 35.00 
$ 17.95 
$ 29.00 
$ 28.00 
$ 29.00 
S 35.00 
$ 24.00 



For fast delivery, send certified checks, money orders or call to arrange direct bank wire transfers. Personal or company checks require two 
to three weeks to dear. All prices a'e mail order only and are subject to change without notice Call tor shipping charges. 



■.ijnj:iiim.uiii]ULiJj.'Ui[.l.lJl 

The CPU SHOP 



298 



TO ORDER CALL TOLL FREE 1-800-343-6522 

TWX: 710-348-1796 Massachusetts Residents ca.l 617/242 3361 



5 Dexter Row. Dept. MC07M . 

Charlestowd. Massachusetts 02129 

Hours 10AM-6PM (EST) Mon -Fn. iSat till 5) 



Technical (nformalion call 617/2423361 
Massachusetts Residents add 5% Sales Tax 
Tandy Corporation Trademark/" Digital Research 



m.Tsle< charge 




^S»e L'sl of Aflvtitistrs on p»g» 3W 
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w-* 




PROBASIC 



PROBASIC $195.00 

Loader relocatably links user specified modules to save memory. 
Design BASIC to your specifications (now or later). 
Dump feature allows you to save your versions of Basic 
Sample: PROBASIC -P: ACDEFGIM -S:Your file 



Probasic includes the following relocatable modules 



PRO - ANGLES 

DEGREES. RADIANS 
ASIN, ACOS, PI # 



PRO-LABELS 

Label branching & testing 
IF LABEL 85 < > "Test" 
THEN MERGE . . . 
85 "Test" PRINT "Test" 



PRO-DEBUG 

* Most brackets optional . . . 
' Fix - T M error 

* New - DELETE 

* TRSTEP. TRVAR, PROC, 
INSERT, DIR, INBSC 



PRO-EXTENSIONS 

Dynamicly save variables & 
files during editing, merging, 
linking & deleting, . . . 
New ■ RENUM 
New - MERGE, LINK 



PRO-KEYS 

' Redefine key(s) to any string 
from program or keyboard 

" Enable/Disable from key- 
board with CTR'L - ) 

' Fix - live - keyboard 

" PROKEY = , PROKEYS 



PRO-WORDS 

UPC$. LWC$, TRIMS, REVS, 
PAUSE. RPTS FCHR, FSTR, 
FSECTS, CHGS, EVAL, 
CKKEY, FRACT, COMP, 
FQTY, MIN, MAX, EDT$, E #, 
INVS, CNSECS, 



PRO-MACH 

* S V C excess to basic subs 
" New ■ BREAK (Reset) 

* PEEK, PEEK%, PEEKS, 
POKE, POKE%, POKES, 
CALL adres (parms), 
CLRTN, EXECUTE, INP, 
OUT 



PRO-EDIT 

Immediate entry keys 
»♦•■♦, ./f1 
New - LIST & EDIT 
ROLLUP, ROLLDN 



PRO - CRT 

Inverse vidio 

CRT, CRTS, SCROLL 



PRO-SORT 

String aray sort routines 
2000 strings in 7-1 6 sec 
S0RTa$CUSING1,2... 



PRO - FILES 

■ Fix - LOF 

* RELOC, OPEN "E" 



PRO-FUNCnONS 

Multi-line Functions 

MIDS TO 

WAIT for S reorganizing 

New- HEX$ 

Misc fixes 



PRO - VRS 

* Allows 3 letter variables 
' Reserved words in variables 
' UPCVRS, LWCVRS 
KEYVRS, VARLEN 



PRO-GRAPH 

* Draw lines, patterns, points 
' SET, RESET, POINT, 
USING, TO, GRAPH 



Call and we'll send our 
PRO-80-SYSTEMS .507 
3206 CENTER STREET 
CedarFalls, la. 50613 



TEST PROGRAM" listing 

319-266-4262 
319-266-7184 
319-233-6111 



10, or alternatively to Z24 pin 8. 
Solder the violet wire to Z24 pin 
9, and finally solder the yellow 
wire to Z43 pin 9. Swing the key- 
board back in place, and using 
double sided foam tape, attach 
the perf board to the foil side of 
the main PC board at a conven- 
ient location. If your computer 
has as many mods as mine, this 
last step may be the most diffi- 
cult! {Incidentally, the foam tape 
sold by Radio Shack is a little 
thin, and I recommend using a 
double thickness.) 

It probably took you longer to 
read this article than it did to 
build up and Install the modifi- 
cation. Close up the computer, 
crank it up, and CLOAD away! I 
have been CLOADing wth the 
volume on my recorders cranked 
up to the stops with super re- 
sults. The Insensittvtty to vol- 
ume setting is great, and our 
friends at Tandy really did a 
good job with this modification. 

Warning 

The circuit I have described is 
the exact circuit installed by 
Radio Shack (except for the sub- 
stitution of a CD4020 for the 
004040). Whether you build and 
install it, or have Radio Shack do 
if for you, any tapes CSAVEd 
with any of the CPU clock 
speedup circuits installed and 
with the CPU operating at the 
higher speed become impos- 
sible to load. Here's why: When 
the Z80 is being driven by the 
faster 2.66 MHz clock, the soft- 
ware timing of the cassette in- 
put routines sets up an ex- 
pected clock pulse interval of 
1.33 milliseconds insead of 2.0 
milliseconds. Therefore, a data 
pulse would be expected at 0.67 
msec, but the CLOAD fix locks 
out CASSIN* for 0.72 msec. The 
software literally never sees a 
data pulse! Why doesn't the 
clock also speed up that 887 
KHz we used to feed the counter 
in our modification? Because 
that frequency is part of the 
video timing (it's called CHAIN 
in the Technical Reference 
Handbook), and fortunately, 
every inventor of a clock speed- 
up circuit knows you don't fool 
around with video timing. So, do 
your CLOADing at normal clock 
speed, and execute your pro- 
grams at the faster speed after 



they are safely in memory. 

Alternatively, a modification 
can be made to the clock speed- 
up circuit described in 80 Micro- 
computing (Feb., 1980, see 
"Faster, Faster" by Dennis 
Kitsz). I have not yet built the 
speedup circuit, and so haven't 
tested it. but it should work. Mr. 
Kitsz uses two sections of a 
74LS367 which he cailsZSPEED 
to gate either the fast or regular 
clock to the Z80. Break the con- 
nection of the diode at pin 13 of 
the CD4020 on the CLOAD modi- 
fication and run a lead from pin 
13 to pin 4 of ZSPEED Run a 
second lead from pin 5 of 
ZSPEED to the cathode end of 
the diode you just disconnect- 
ed. Pins 4 and 5 of the 74LS367 
are an unused buffer whose trl- 
state output state follows the 
normal speed clock control line. 
With the normal speed clock 
active, the path from pin 13 of 
the CD4020 and the diode is 
made, and the CLOAD fix oper- 
ates as previously described. 
However, when the fast clock is 
selected, the pin 5 output of the 
74LS367 is tri-stated. Therefore, 
the Reset input of the NOR 
gate flip-flop will be triggered 
when pin 14 of the CD4020 goes 
high, after only 512 clock pulses. 
This works out to a time delay of 
0.58 milliseconds, and although 
a little close, should still allow a 
pulse on CASSIN* every 0.67 
milliseconds to go through the 
system. 

Most of us who have opened 
our computers have done so 
more than once, and have made 
several modifications. There- 
fore, I can't guarantee this com- 
patibility of this modification 
with your system, or predict 
what impact it may have in con- 
nection with other mods you 
may have made. You must as- 
sume responsibility for any 
mods you make, including re- 
sponsibility for their compat- 
ibility in combination in your 
TRS-80. But it sure is nice to 
know about some of the fixes 
that come out of Fort Worth, and 
I hope all who find out about one 
will take the trouble to share the 
information. Anyone know what 
the fix to the computer and ex- 
pansion interface which cor- 
rects disk rebooting looks 
like?a 
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TRS-80* ILLUSTRATED 

ADVENTURE 

The Atlantian Odyssex; 
with Graphics 



INTERPRO 
presents 



OBVIOUS EXITS- 



^WnH^TTH^ 




HJm ' M '' ^ 



I AN ON A MCK ItK 

PAUNSHOP. SAILBOAT. 

I HAVE :THE SCUBA GEAR, HHICH 1 AH KEARING. 

t CRYSYAL PYRAHID t. t NEMLLICM t. 

KNAPSACK CONTAINING: FIASHLIGHT. SPEAR6UN. 

HHAT DO I DO NOH? 



MACHINE LANGUAGE 

32 Graphic Locations ■ 150 Word Vocabulary 
Exciting Adventure 

MODEL I 48K DISK $29.95 

WITHOUT GRAPHICS 

16K CASSETTE... $14.95 

DEALERS INVITED 
•TM TANDY CORP 



TO ORDER 
CALL or WRITE 

INTERPRO 

P.O. BOX 421! ^485 
MANCHESTER, NH 03108 
Mc€603> &6^-0477vlSA 



TRS-80* 16 K-up UTILITY 

ULTRA-MON 

The Intelligent Monitor 

The most powerful tool available to the 
novice or professional machine language 
programmer. 

- ROM/ DOS Independent 
Lineprinling disassembler 
Sell relocating 

Single step through RAM or ROM with each 
instruction individually disassembled. 

INTERPRETIVE EXECUTION allows you to execute 
your program or the ROM with Ultra-mon in complete 
control. 

DEBUG' type display with P.C. register disassembled. 

Breakpoints can be set in RAM or ROM. 

AND MORE 

EXCELLENT REVIEWS IN APRIL 80 

MICROCOMPUTING AND APRIL 

SOFTSIDE 

MODEL 1. 16K CASSETTE 

(Disk Loadable) $24.95 

24 PAGE DOCUMENTATION 

WITH STEP BY-STEP 

INSTRUCTIONS AND 
SIMPLE DEMONSTRATIQNS 

DEALERS INVITED - 

•TM TANDY CORP 




A MAJOR 

BREAKTHRU FOR 

Electronic Engineers 

Electronic Hobbyists 

Electronic Students 

Ham Operators 

A General DC-AC (steady state) Analysis 

of Any Circuit 

Will Analyze and Compute: 

• Node. Branch. Element, Voltages 

• Node, Branch, Element, Currents 

• Branch Power Dissipation 

• Magnitude and phase values and complete 
frequency response with graphic display 

• Modify any element in circuit for desired 
results 



A complete operational 

manual supplied 
comparable to I.B.M.'s 

E.C.A.P,- Program 
•A.C. Analysis Program 

$149.95 

•D.C. Analysis Program 

S89.95 



To Order Write; 



G & L Software Enterp. 
2304 N. 1st. Street 
Upland, CA 91786 



^ts^ 




Do Not Send Cash in the Mail 



TRS80' isd u-ademarkrjl the Tandy Corp.. E.CA.P. 
.Business Macliines. [nc. 



I uadeniark of Inrcmational 

1^39 J 



'See List of Advertisers on page 306 
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FOR TRS-80* MODEL I USERS ONLY 

4 




16 Times 
Normal Speed 



'TRS 80 is a trademark of Tandy Coip 



• High speed load TRS-80* Level II cassettes 

• Input 15K byte Level II program in 15 seconds 

• Search BASIC or SYSTEM programs by name 



Unlike other high speed tape input de- 
vices, FASTLOAD uses standard format 
cassenes. Therefore, there is no need to 
re-record on other media. At 8000 baud, 
FASTLOAD is faster than disk for short 
programs. FASTLOAD reads tapes at the 
fast-forward speed of the CTR-41 cassette 
recorder. The recorder can also be used 
for CSAVE at the normal speed. 



FASTLOAD connects to the 40 pin I/O or 
to the Expansion box. The control program 
does not use computer memory because 
it is in a built-in PROM. Other valuable 
features are keyboard debounce program, 
automatic key repeat routine and key- 
beep via cassette speaker. Price is $188.00 
for FASTLOAD and $95.00 for the modi- 
fied CTR-41 recorder. 



Personal Micro Computers Inc. 

475 Ellis Street, Mountain View, CA 94043 (4l5) 968-1604 
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GENERAL 



A computerist's view of how it all began, seen in 20/20 hindsight. 



Getting Involved 



Robert A. Batty, W0KSG 
2657 S. Bonanza Ave. 
Tucson, AZ 85730 



I've never liked Radio Shack 
because my few visits to their 
stores usually result in leaving 
empty-handed. I can never find 
the right parts! 

I've been an amateur radio en- 
thusiast for years, observing the 
Tandy Corporation's disregard 
of the ham's needs for parts and 
publications. I've avoided Tandy 
as best I can. 

But, after reading two and 
one-half years of Kilobaud Mi- 
crocomputing and other micro- 
computing magazines and 
watching the performance rat- 
ings of the TRS-80 climb, I 
bought the Radio Shack prod- 
uct. 

Spending $500 in an enemy 
camp is not pleasant, but I did it 
when Tandy reduced their $600 
TRS-80 by $100. 

Justifying the Purchase 

There were more important 
factors than the low price of the 
TRS-80 in my decision to buy. 



I started with a minimum con- 
figuration. Later I could upgrade 
to a system with disk drives, 
printer, and more memory, and 
even used other manufacturer's 
equipment. 

Second, the TRS-80 qualifies 
as good word processing sys- 
tem. I felt uneasy about spend- 
ing in excess of $2000 for a text 
editing, non-dot-matrix printer 
subsystem for the TRS-80. In- 
stead, the Anderson-Jacobson, 
as recommended by Allan 
Domuret (Kilobaud Microcom- 
puting, June, 1977) was in the 
$1000 range, I found. 

Third, Tandy had published 
the manual, TRS-80 Microcom- 
puting Technical Reference 
Handbook, complete with 
schematics. It convinced me 
that do-it-yourself maintenance 
of their product was possible. 

Installation and Checkout 

Unpacking and cabling the 
cassette recorder, video display, 
and keyboard was uneventful. I 
was impressed with the quality 
of the shipping package. (The 
octopus of exposed cables up- 
set me, however— there had to 
be a better way.) The checkout 
procedures verified that I had in- 
deed purchased a working sys- 
tem. The accompanying games, 
Blackjack and Backgammon, in- 
dicated further that my TRS-80 
produced the desired results. 

Dr. Lien's Basic Computer 



Language, which is included in 
the purchase price of the 
TRS-80, Level I system, is a fun 
course in learning Level I BASIC 
programming. If supplemented 
with another Lien text, The Ba- 
sic Handbook, you will be able 
to adapt most published pro- 
grams to fit in the 4K of memory 
in Level I. 

Outgrowing the System 

I soon found out (shortly 
before the 90-day warranty ex- 
pired) that the Level I language 
was inadequate. An increase in 
memory was essential. I decid- 
ed I could install the extra mem- 
ory expansion modules in the 
keyboard unit myself. Conse- 
quently, Radio Shack's installa- 
tion of the Level II came next. 
(Radio Shack can determine if 
an owner has tampered with a 
computer by covering an access 
screw with glyptol, a sealing 
wax that is destroyed by remov- 
ing the screw. Destroying the 
glyptol will not only void thewar- 
ranty, but there are rumors that 
the repair centers will charge a 
premium for servicing tam- 
pered-with keyboards.) 

The upgrade to Level II at the 
repair center took less than a 
week. I checked it functionally 
by stepping through most of the 
test programs in The Basic 
Handbook. Success again, I 
thought, but troublesome times 
were ahead. 



Disappointment < 

After Disappointment 

The Level II change included a 
manual entitled Level II Basic 
Reference Manual, disappoint- 
ment number one upon graduat- 
ing to Level II. Poorly written, 
containing none of the educa- 
tional assistance taken tor 
granted in the Level I manual, an 
inadequate table of contents 
and no index, I had the distinct 
feeling of being ripped off. 

Fortunately, "TRS-80 Level II 
Reference Manual Index" by 
Sherman P. Wantz appeared in 
the February 1979 Kilobaud Mi- 
crocomputing. This article al- 
lowed me to make a real refer- 
ence manual out of Radio - 
Shack's, even providing a page r 
renumbering scheme. 

Another shortcoming was 
soon to come — keybounce. This 
problem had been widely publi- 
cized in the personal computer 
magazines, but I hadn't ex- 
perienced it until Level II was in- 
stalled. This is possibly because 

I diligently kept the keyboard 
covered when not in use. Key- 
bounce is the double entry of a 
character on a single keystroke. 
This problem is fixed by period- 
ically removing the keypads of 
the faulty characters and clean- 
ing the contacts. 1 found that 
Radio Shack's program, KBFIX, 
which is supplied with the Level 

II change, satisfactorily over- 
came the problem. The short 
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8C:3IS 



THETIS 80 ISEISJIIIML 



^35 



If you own a TRS-80® Model I, Modei M, 

Model III, the Color Computer, or the new 

Pocket Computer, YOU NEED 80-U.S.! 



The 80-U.S. Journal has 



u 



programs for your enjoyment and enlightenment. 
Every issue contains several Basic or machine 
language program listings. It contains Business 
articles and program listings. No matter where you 
are, there is something for YOU in the Journal! 




and... 

JThe Journal contains reviews of hardware and software. Our "Evaluation 
T^eports" will help you make the best choice in selecting additions to your 
system. 

NO RISK Guarantee! 

We are so confident you will like the 80-U.S. Journal that we offer you our 
NO RISK GUARANTEE: Send the coupon below and mark it "bill me". 
You will be entered as a subscriber and we will immediately send you 
your first issue of the Journal. After you have had time to enjoy it, you will 
receive a bill for $16.00, and if you are not convinced that SO-U.S. is your 
computer's best friend, simply return the bill, mark it "cancel" and keep 
that first issue. It's that easy - you can't lose! 



is your 
TRS-80 
Lonely? 

Write today for 

our 
"No Risk Offer" 



SEND TO: 

80-U.S. Journal 

3838 South Warner Street 

Tacoma, Washington 98409 

Phone (206) 475-2219 



Name 

Address. 
City 



-State. 



^ip 



Bill Me i understand that I may mark my bill "cancel", 

and owe nothing if I am not satisfied with The Journal 



Visa/MC. 



$15 orfer good on!y in the United States 
TRS-SO is a Regutered Trademark of the Tandii Corp. 
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KBFIX program must be loaded 
each time the system is pow- 
ered up. 

My biggest disappointment, 
stili unresolved, Is the cassette 
loading problem. The Level II 
change increased the data rate 
during program loading and sav- 
ing. This caused the volume 
control on the recorder to be- 
come sensitive. I must praise 
Radio Shack, who tried to over- 
come the problem by returning 
my equipment more than once 
to the repair center, resulting in 
some improvement. My program 
loading abort rate remains at 
about 10 percent however, 
which I consider too high. I have 
attained this rate only by using 
Peripheral People's "Data Dub- 
ber", constantly cleaning the 
tape path of the recorder, and 
using Memorex MRX3 oxide 
tapes, which have produced bet- 
ter results than all the other 
brands of tapes I tried. Fortu- 
nately, after saving programs, 
the CLOAD? command ensures 
that programs saved were ac- 
tually recorded without error. 

A minor concern was the fail- 
ing recorder motor start relay 
(located in the keyboard). The 
relay contacts would weld while 
loading a program from tape. In- 
stead of stopping when READY 
appeared on the screen, the re- 
corder would proceed to the end 
of the tape. I found this could be 
minimized by hitting Enter be- 
fore activating the recorder on a 
load or save command. The re- 
corder play switch then takes 
the arc during the motor start 
operation. 

Convinced now that my Level 
II required no further warranty 



Hardware 




Level r 4K 


$529.00 


Level II modification 


106.00 


16K upgrade 


90.00 


Quickprlnter, cables, paper 


382.00 


Data Out)t>er 


50.00 


Software 




Blank tapes 


40.00 


Microsoft TYPING TUTOH 


17.00 


Discovery Bay WIN21 


29.00 


Lien TfiG Basic Handbook 


16.00 


Uen Learning L^vel II 


17.00 


Radio Shack TRS«) Micro- 




computer Technical Refer- 




ence Handbook 


11.00 


Table 1 





maintenance, I ordered the 16K 
memory modules and jumpers. 

Installation in the keyboard was 
straightforward. Care must be 
taken, especially when flexing 
the cable joining the two boards. 
I was advised to use caution 
when handling the modules as 
they are extremely sensitive to 
static electricity. 

After re-assembling the key- 
board and re-installing the sys- 
tem cables, I was pleased to 
note the correct response to the 
PRINT MEM command. More re- 
warding, I was finally able to key 
in and run all those programs 
labelled Level II, 16K. 

For the first time, I was 
thoroughly enjoying myTRS-60, 
doing all the things my Level I, 
4K system couldn't support. 
Most of the programs published 
in the microcomputer maga- 
zines ran. Converting other sys- 
tems' languages to the Micro- 
soft BASIC Of the TRS-80 was 
challenging, and especially 
rewarding when they ran with- 
out bugs. 

But, in modifying and debug- 
ging programs, I found it ex- 
tremely difficult to follow a pro- 
gram listing on the video screen, 
scrolling back and forth as the 
GOSUB and RETURN instruc- 
tions demanded. Another prob- 
lem. The only way to overcome 
this shortcoming was to attach 
a printer to the system. Inas- 
much as word processing was 
ultimately a requirement for my 
system, I considered making the 
purchase, 

A Selectric word processing 
printer such as the Anderson- 
Jacobson mentioned earlier 
was out of the question due to 
my lack of funds. A local Radio 
Shack flier arrived in the mail, of- 
fering the TRS-80 Quick Printer 
at quite a discount off their $499 
catalog price. 

This was the time to see if a 
discount Radio Shack would 
consider a 10 percent discount 
off the flier price, I phoned and 
they agreed. As shown in Table 
1, 1 became a printer owner at a 
fairly reasonable cost. 

Printer Arrives 

The printer arrived in fivedays 
and again I must commend the 
outstanding packaging done by 



Tandy. 

A roll of aluminum-finish 
paper came with the printer (I 
hadn't expected this and had 
ordered an additional three). 
After installing the cable from 
the printer to my keyboard, I was 
ready to go. 

Three print sizes were avail- 
able and 150 lines per minute 
was the output speed. I was 
pleased and proceeded to print 
some of the programs I wanted 
to modify. My only gripe now 
was the uppercase/lowercase 
confusion factor— to print 
lowercase, the shift key must be 
depressed when entering data. 
This deficiency is not the fault of 
the printer, however. Using the 
aluminum paper is also not as 
disadvantageous as I thought; a 
felt-tipped pen does an ade- 
quate job making corrections on 
it. 

I bought Peripheral People's 
Data Dubber not only to improve 
the tape loading problem, but to 
copy the machine language 
tapes 1 needed for backup. Not 
included in the expenditure 



table are the magazine 
subscriptions or necessities like 
tape head cleaner andcassette 
storage cases. 

Would I Do It Again? 

Absolutely. And in the same 
sequence: Level 1, 4K, Level II, 
the 16K modification, and finally 
the printer. 

Based on my pleasant experi- 
ence with the printer, i would 
recommend mail-ordering the 
entire system, Warrantj^ main- 
tenance presents no problem. 
The only requirement is a sales 
receipt showing date of pur- 
chase. 

Why not Level II initially? 
Three answers: (1) The Level I in- 
struction manual is a rewarding 
way to get started. (2) Level II is 
more appreciated when it fol- 
lows Level I. (3) Good program- 
ming habits are formed when 
memory is in short supply (4K). 

Additionally, how would one 
know about the program load- 
ing deficiency if one hadn't 
started with Level I, where it 
doesn't exist? ■ 



Word Processing? You need a 

SPELLING CHECKER 



Ttii? IS 3ft e-3ftfle of 3 ta^t t^ing checl-eii ty 
HEX^fLL. ^h9 iPiit srroUs i? Ihe screer. es it 15 chect-ed. Wlwi 
sTi error 1= detected, ^o-j have three choices. 

11 FiEFlACf tlie iFiffirr«?t word. H« replscenerit word 
1^ INBTftNlLY ftE-CHECKED for correctness, tte. inserted in tt» 
te.it. 

2) The uorri is correct, leave it as it 15. 

3* Leave the ward as it is. AM) tell tCXSPELL to 
LEftF'H this »ord for fi.iture reference, uitii jMst ore ke^strof-e. 

Yo'T dop.wefil is read's to print as soori as tCXSt'ELi 
IS finished. The word in error e.g. « 



4iKi 11 ESWF: Misslsl'e 

CONTINUATION 1 is s'-'OWi in conte.,t, incli.idirt^ cot.tirttation 

, fMSS: f) SffiftCE HOS'D Si LEflWE flS IS L) LEAUM WORD 



HeXSPi»LL 

zaps those.s»aeky typos 

HEXSPELL Shows you the errors right where it finds them, 
then instantly checks your corrections to make sure they ARE 
correcti When HEXSPELL is finished the corrected docu- 
ment is ready tor printing. HEXSPELL comes with a 20,000 
word list, with room for *00 more! Just one keystroke 
teaches HEXSPELL a new word. You can even clear the 
memory and leach HEXSPELL a complete new language^ 
Programs, wordllst & manual S69US. Manual only $12. ^S^ flBt 

TlstedSBfl^ns' Sc.ps.' 5 Elecl.ic Pencil, should »o-K «,l(i most «ora o'ocessors 

IBSaO Scriosil ire trMSTjrks o( TanOy Corp 

Elecl'.c Pfic" IS "iOsrrark oi Michael Sma.er ioii-aie ^125 

Am UAVik^tAM PO. Box 397. station A 
3^"?*?fj£rSK?!sJ? Vancouver, aC Canada V6C2N2 
^S^^YSTOm© Tetephooe (604)682 7646 



-See List of Advertisers on page 306 
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Yes, You Can 
Increase Your 
Programming 
Productivity 

SNAPPII EXTENDED BASIC 

SNAPP II EXTENDED BASIC A family of 
enhancements to the Model II BASIC 
interpreter. Part of the pacKdge origi- 
nated with the best of apparat, INC.s 
thoughts in implementing NEWDOS 
BASIC. The system is written entirely in 
machine language for SUPER FAST exe- 
cution. The extensions are fully 
integrated into Model ll BASIC, and 
require NO user Memory, and NO user 
disK space. The pacKage is made up of 
the following six modules, 
XBASIC-Six single Key stroKe com- 
mands to list the first, last, previous, 
next or current program line, or to edit 
the current line. Includes quicK way to 
recover BASIC program following a 
NEW or system or accidental re-boot 
Ten single character abbreviations for 
frequently used commands AUTO 
CL5, DELETE. EDIT KILL, LIST MERGE 
NEW, LLI5T and SYSTEM. 
XREF-A powerful cross-reference 
facility with output to display and/or 
printer. Trace a variable through the 
code. Determine easily if a variable is 
in use. 

XDUMP-Permits the programmer to 
display and/or print the value of any or 
all program vanables, Idenufies the 
vdiidble type foi all variables. Each ele- 
ment of any array is listed separately, 
XRENUM-An enhanced piograrn line 
renumbering facility which allows 
specification of an upper limit of the 
blocK of lines to be lenumbered, stjp- 
ports relocatioi i of renumbered blocKs 
of code, and supports duplication of 
bloc Ks of code, 

XFIND-A cross reference facility for 
Key woi ds and ctiaracter strings, also 
includes global leplacement of 
Key WQ Ids. 

XCOMPRESS-Compress your BASIC 
programs to an absolute minimum. 
Removes extraneous informaboo: 
merge lines: even deletes statements 
which could not be executed. Typically 
saves 30-40% space even for pro- 
grams wittiout our REM statements! 
Also results in 7-10% improvement in 
execution speed. 

ENTIRE PAChAGE FOR MODEL II 5^00 

ENTIRE PACKAGE FOR MODEL II) 5 I 2S 

AUTOMAP 

Save Cirne creating a fom-iated screen 
With our Extended Basic Mapping Sup- 
port system. The programmers tasK of 
communicating and displaying infor- 
mation with the user operator is 
completely automated with simple 
SEND and RECEIVE statement com- 
mands. Many different types of 
information can be sent and received 
f I oin the operators with the use of a 
single command Many hours of pro- 
gramming time are saved and cost 
efhciency is truly realized using 
Automap. 

MODEL II S75 

MODEL III " 560 



SUPERSNAPPX 

You can sort fast using your present 
facilities, or you can do it faster with 
Racets superb facilities, or you can use 
the fastest SUPERSNAPPX The heart 
of SUPERSNAPP X IS a SUPER FAST Ih- 
memory sort routine that has been 
benchmarKed against everything on 
the marKet and beats them all . . 
hands down. 

SUPERSNAPP X IS the most important 
component of SNAPP X EXTENDED 
BUILTIN FUNCTIONS which is a much 
needed set of additions to the Model ll 
BASIC interpreter that will put time sav- 
ing power at your fingertips. Lets 
compare (using random data) SUPER- 
SNAPP X and Racets GSF SORT for 
speed 

SORT SUPERSNAPPX RACET GSF 

1 000 inregers 39 seconds 59 seconds 
b 000 Singles 22 seconds 34 seconds 
2,000 Strings 1 seconds 1 S seconds 
SUPERSNAPP X 15 guaranteed to be the 
FASTEST in memory SORT on the mar- 
Ket or your money bacK, With it you 
also get these EXTENDED BUILTIN FUNC- 
TIONS PEEK, PEEKW, POKE. POKEW 
XDATS , XTIM5 . ETIMS . FILES. AND THE 

SPECIAL 5CMD (SNAPP COMMAND! 

PLUS, open -E" Set SCROLL PRO- 
TECTION. ERASE all ARRAYS in one 
command. Specify size and BlinK rate 
of CURSOR LONG ERROR MESSAGES 
Read from Video Screen Read. 
PEEK complete stnngs from memory, 
POKE complete strings to memory, 
convert upper case to lower case and 
vice-versa, turn complete screen off 
and on at will, extract largest or small- 
est values from user supDlied list of 
numbers 

We consider this next function as prob- 
ably the most powerful addition ever 
made to Microsoft BASIC, PRINT USING 
INTO A STRING. The ability to arrange 
data into a stung variable should perK 
your imagination. 

Modem SI 00 00 

ModeMII 575.00 

SPOOLER Mode) I, Model II 
and Model III 

Our worKhorse! UnliKe the one sup- 
plied with TRSDOS 2,0. ours requires 
no special Knowledge or training on 
the part of the operator. Additionally 
ours performs much better. On the 
Tandy SPOOLER, every time a disK is 
accessed, the printer stops deadi This 
pacKage is available for Model I in the 
TRSDOS/NEWDOS 80 versions or for 
the Model ll or Model III. Greatly 
enhances system performance when 
running typical business applications 
Many applications fiave been bench- 
marKed to run nearly TWICE AS FAST 
with the SPOOLER installed, installs in 
minutes and no changes are required 
to your programs. The Model II version 
requires NO user memory. If purchas- 
ing more than one system, call for 
price quote 5 100 

SNAPP SCREEN 
Another dependable product from 
Snapp. Inc. Using ngid plastic, Snapp, 
Inc designed the ultimate green 
screen at the lowest price. The Snapp 
Screen installs in a Snapp with the use 
of pressure sensitive tape. Reduce 
user fatigue with the Snapp Screen 

sio 



D0UBLETAKE374I 

This IS npt a football play but the way 
to play ball fast in converting IBM 374 1 
and similar fprmated diskettes to Radio 
ShacK formated disKs or vice versa 
Fast 15 the name of the game. s?00 

AUTOFILE 

Another big time saver from Snapp 
Inc, Autoflle offers all programmers 
much needed time saving tools to use 
when worKing with direct hies. Elimi- 
nate tedious commands such as 
LSETs, MKISS, MKDSS. MKSS's CVDs 
CVrs and CVSs I Even the FIELD 
Statement has been eliminated. You 
wont have to guess as to where the 
FlELDed variable is. The ASC and CHRS 
function references will be performed 
automatically. 

MODEL II 5S0 

MODEL III 540 

MASTER /SLAVE 

This software package was designed 
to support the transferring of files 
from one Model II to another, via direct 
connection or modem/phone line 
connection ALL Kinds of files, and 
baud rates up to 9600 are fully sup- 
ported. Transfer hies in eithei 
direction, even with the SLAVE Model ll 
UNATTENDED! 5 I SO 

ULTRA PPD 

This the ultimate Proportional Printer 
Driver that does the job the others do 
not Add to the Electric Pencil and your 
print will looK liKe its copy has been 
typeset No word processor should be 
without this enhancement Now avail- 
able for the DWII and Che LPIV. 5 1 00 

ITOII 

A helping hand when converting BASIC 
programs from the Model I to the 
Model II. Automatically adjusts PRINT 
@, and PRINT USING to compensate for 
differences in the language. Advises 
you where adjustments are necessary 
for PEEK, POKE. etc. s25 

XSCREEN 

Supports Che copying of the full video 
screen to the printer Can be invoKed by 
(.he operator with a Keystroke, or from 
your program with a USR call. Requires 
NO user memory 525 

XPRINT 

Print neatly formated hard copy listings 
of BASIC programs from disK. Programs 
may be ASCII or compressed. GuicK and 
easy group selection allows you to print 
many listing with one command. s3S. 

HOSTII/TERMII 

Allows remote control of a Model II 
from another Model II, or any ASCII ter- 
minal Our Host system, unliKe the one 
supplied with TRSDOS 2,0. supports 
accurate screen positioning on the 
Term station. Without this feature, for- 
mated displays appear pn the screen 
looKing liKe randomly placed garbage. 
Repuires NO user memory! This sys- 
terri is designed to provide software 
support to our customer locations 
withoutever leaving the office Cus- 
tom versions are now available for 
most nationally distnbuted terminals 
asas^S.OOootion Call for details, sso 



PL/B 

The most powerrul logical com- 
ponents have been selected from the 
worlds most powerTuI language to 
give you the most unbeatable pro- 
gram development tool to improve 
your programming productivity' 
Snapp. inc has merged the most use- 
ful components oF BASIC with the 
power of PL/ 1 An unbeatable struc- 
tured programming facility resulted 
that can increase programmers pro- 
ductivity up to B0%. Unlihe competitive 
products, which are slow rigid pre- 
processors representing a primitive 
attempt to bring Structured Program- 
ming concepts to the AAicro-Based 
user. PL/B 15 today's fourth generation 
answer to a fourth generation prob- 
lem' PL/B can give you triple the 
power of the earlier preprocessors at 
triple the speed PL/B is fully 
integrated into the BASIC interpreter 
Two modes of operation are available 
Transparent (hidden) or Compile and 
save mode Increase your productivity 
and save time with PL/B S200 00 

BREAKOUT 

With BreaKout you can learn the inter- 
nal wotKings of TRSD05 2.0 using any 
standard disassembler. Find your way 
out of the maze and save program- 
ming time by eliminahng the 
unneeded steps in TRSDOS 2.0. This is 
a must product for all advanced TRSBO 
programmers. S200 

DOSFIX 

A collection of patches to TRSDOS and 
BASIC to enhance their usability and 
Function Includes our well Known 
BREAl^7E patches and facilities to dis- 
able and verify detect which will 
inaease average disK speed by 30% 
Free with any Model II Software PacK- 
age. Purchased separately. s 10 

3m SCOTCH DISKETTES 

Double density certihed 8" Floppies 
for the Model II. Better quality is not 
available at any price. Ten diskettes to 
a box 





Quantity 


Price 


(boxes) 


Per/Box 


1 


S34 


S 


533 


10 


532 



Authorized Distributor 
Information Proce«8ing Products 

TERMS OF SALE 

Stiipfnpdts normallLj made within one ddy or 
recpipt or your order Custotiiei riorrridlly pay^ 
shippinq cost except pre-pdid oideis incrudinq 
SDftwdiP in wtiicti case shipping cost ib dbsorbeO 
bySndpp Inc COD orders wiirhdve standard 
COD fee ddded to shipping charye Net 10 days 
will be yranted to governmental agencies educa- 
tional institutions dnd well rated business firms 
Please include purchase order riumtier Ohio resi- 
dents add S .■ % sales tdx or exempcion certificate 

OUR GUARANTEE: 

If your dishette arrives damaged, we will replace it 
without charge if you ever accidentally damage 
It we will replace It for as 10 handling charge For 
d period of one year, we will provide you with 
dny enhancements or updates for a 5 1 handling 
charge For a period of one year, if errors are dis- 
covered in the programs, they will be corrected 
without charge in the event we cannot correct an 
error, uou may return the program material for a 
refuncf 

TR5-80 and TRSDOS are trademarks of the 
Radio ShacK division of Tandy Corporation. 
NEWDOS and NtWDOS/80 are trademar Ks of 
Apparat. Inc 
RACET CSF IS a trademarK of Racet Computes. 



Call our toll rree number: 1-800-543-4628 

Ohm residents call collect: (513)891 4496 

SNAPP. INC- 

37l9Mdntpll 

CiiK inndli. Ohio 45236 



CONSTRUCTION 



Well glitch my DOS. . . a transient suppressor of permanent value! 

Lightning Strikes Twice 



Paul C. Fooler, Jr. 
2103 Chariton Lane 
Radford, V A 24141 

Dennis Murray 
CompU'Tech 
1005 Chestnut Dr. 
Christian^burg. VA 24073 



One r^iny day, a friend was 
working on his computer 
when ilahtning struck across 
the street. For a brief moment 
the corr0uter was working on it- 
self. Ti)0 lightning only de- 
stroyed C^e inexpensive IC, but 
in his excitement to find cut 
what happened, my friend short- 
ed out several other ICs- The 
whole pr6blem might have been 
avoided\with a good power line 
transient suppressor. 

Powar line transients (often 



called glitches) can have a wide 
range of effects on your comput- 
er, from no effect at all to com- 
plete destruction of the system. 
Typical glitches cause the pro- 
gram you've been working on for 





Figure 1. A typical transient 



Parts List 

One AC line cord w/ground, Jameco 17236 

One CORCOM lOkt power line filter (10 amp) 

One transient surge absorber, ZNR-K201 

One metal housing, TEN-TEC TW-24 

Three AC soct<ets, WABER #3015 

One rubber Grommel or Strain Relief tor Line Cord Radio Shack 278-1636 or 

64-3025 

Two 6-32 x3'8 Flat Head Screws witH Lock Washers ar>d Nuts or two pop rivets 

1 Ft. #18 Gauge Stranded Hook-up wire 



three hours to get confused or 

totally and unrecoverably vi/iped 
out. A power line transient is a 
momentary excursion of the 
power line voltage amplitude 
large enough to inject into your 



system's logic. Transients have 
many sources besides lightning; 
the most common household 
sources of glitches is probably 
an induction motor like those 
found on the compressors of re- 



n. 



T" 



Figure 2. Modular Corcom filter in circuit 




* -n 




Photo 1. Pictured are all parts necessary to build the line filter. From 
left to right, top to bottom: chassis mount receptables (three-wire 
grounding type), line cord, RFI filter, metal enclosure, fuse holder, 
rubber grommet, ZNR transient surge suppressor. 
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frigerators, freezers, and air con- 
ditioners. 

Fig. 1 shows a typical transi- 
ent. We can avoid most and min- 
imize all transient problems with 
a simple and inexpensive power- 
line filter. We can give our sup- 
pressor extra muscle by adding 
a transient surge absorber (TSA). 
The surge absorber acts like two 
bacl<-to-bacit zener diodes and 
clips the transient as it attempts 
to rise above a predetermined 
level. If the filter doesn't get it, 
the transient surge absorber will. 

Building the Circuit 

The circuit is extremely sim- 
ple because it employs a modu- 
lar Corcom filter (Fig. 2). The 
most difficult part of this project 
is cutting square holes for the 
1 15 volt receptacles (Fig. 3). I cut 
mine with a Mototool emery 



wheel. I then dressed the edges 
with a small flat file. Next, drill 
the 9/16" and 7/16" holes as 
shown for the fuse holder and 
powerline cord. Finally, drill two 
5/32" holes for the power filter. 

Mount all parts as shown in 
the photos, remembering to 
mount the line side of the Cor- 
com filter toward the powercord 
insert hole. 

After all parts are securely 
tightened, start your wiring as 
shown in Fig. 4. A note on sol- 
dering here may help the novice. 
First, clean and "tin" your sol- 
dering iron (do not use a solder- 
ing gun). Simply run the iron's 
tip over a moist sponge until the 
crusty stuff is gone and then ap- 
ply a small amount of solder to 
the tip to make it shiny. On badly 
corroded irons, it may be neces- 
sary to first dress the tip with a 



DIMENSIONS . 
IN INCHES - 





Figure 4. Wiring 




Figures. 115 volt receptacles 



Photo 3. Using a ballpoint pen or soft lead pencil, mark locations 
and outline all holes to be cut. 




Photo 2. Apply masking tape to the front and back of the enclosure 
to protect its finish while marking and cutting all necessary holes. 




Photo4. 1 5/16" square holes are required for the receptacles. These 
are most easily cut using a nibbler tool or dremel mototool with a 
cutting wheel. 
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l-80!Mb*-Z0D3 ei' E23 • Calif :-8I)0-SZ2 1500 ex BZ3 

Ove-seas- adt 113 pijs addi'ional uostape ■ Aao 12 SO aocrage a-ia ria'.Dins pn t-ac'i iie"i • Caiiio 
restde-iis aoo f. sales lEi - Airow 2 weens a- clerks. C O ok . Pncs suBiecl -o c'langH wilhoul lo 
All iiems subieriT K ai/ailaOi'ily ■ ' — N^rgs T.adetia'k 

THE DISCOUNT SOFTWARE GROUP 

6WC Seiiia Ave Suite 309 • LosAngelcs.Ce 90C28 ■ (2'3) 666-7677 
In. -Bi LX 199-003: Pi"- LAti-. DiscSoll • USA 1 ELLX 194-t34 BVHL Ain Disi.Si'lt- 
-WX eiO-32t-2597 BVHL A"n DiscSo't 




Photo 5. Remove remaining masking tape and wash reservoir with 
elcoho'. Year completed enclosure should iook Ifke this. 




Photo 6. Install rubber grommet, line cord, fuse holder, and re- 
ceptacles with grounding plug, facing downward to allow adequate 
clearance for most popular 11 OV plug styles. 




,^440 



Photo 7. Position the RFI filler to provide adequate clearance bet- 
ween components. Mark location, drill holes, and mount filter. Due 
to their low profile, use of pop rivets is recommended to minimize 
the possibility of scratching the surface the filter is sitting on. 
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INCOME TAX SYSTEM 

FOR TRS-80* MODEL I. II or ill 



In the tax season just completed, our system, running on the magnifi- 
cent line of TRS-80 computers, prepared thousands of lightning-fast, 
error-free tax returns a day in accounting offices nationwide. 

Why not in yours? The Investment is minimal. Our system requires no 
special operator training. Runs on your TRSDOS, nothing else to buy. 

Features no other tax system, for any computer, has— 

1. Full interactive user control, in tax-form language only, line-by-line. 

2. Screen display of full 1040 and all schedules, prior to printout. 

3. All formats IRS and State approved. 

4. Schedule amounts automatically entered on Form 1040. 

5. Your Preparer's Information automatically printed at bottom of Page 2, Form 1040. 

6. Built-in Validation Check tests entire system, hardware and software. 

7. Special printer adjustment routines: Margin Offset, Text Position, etc. 

8. Fills in pre-printed forms (we supply) or use overlays. Your choice. 

9. AUTOMATICALLY COMPUTES: Tax — Earned Income Credit — Maximum/Minimum Tax — 
Least Tax Method —All Percentage of Income Limitations — All Fixed Limitations. 

DOES INCOME AVERAGING IN EIGHT SECONDS! 

10. Full support through the tax season, no charge. 

11. Inexpensive yearly updates in accordance with tax-law changes. 

12. Modular construction— Lets you order the type and size system you need. 

Prices start at $237.95 (1040 & Schedule A) 
25-page Descriptive Manual - $7.50 

(Refundable on order) 

MINIMUM SYSTEM REQUIRED: 
Model I, 48K, 1 Disk Drive 

CONTRACT SERVICES ASSOCIATES 

706 SOUTH EUCLID • ANAHEIM, CA 92802 
TELEPHONE: (714) 635-4055 



■TRS 80 is a trademark of Tandy Corp 



t'See List of Advertisers on page 306 
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FRICTION FEED FOR YOUR EPSON 



MX-70- MX-80 

•MX-70 and MX-BO ace Trade Marks of EPSON. Inc. 






DISK DRIVE WOES? 
PRINTER INTERACTION? 
MEMORY LOSS? 
ERRATIC OPERATION? 

Don't w.v — ^ so 
Blame The 
Software! 

Power Line Spikes, Surges S b,, .^->«Q7nR '^^^^ 'S0 2 

Hash could be the culprit! ^^' i4, 259705 ^^^ 

Floppies, printers, memory & processor often interact! Our 
patented ISOLATORS eliminate equipment interaction AND curb 
damaging Power Line Spikes, Surges and Hash, 

• ISOLATOR (ISO-1) 3 filter isolated 3-prong sockets; integral 
Sume/Spike Suppression; 187S W Maximum Iced. 1 KW load any 
aocket W2.95 

• ISOLATOR (ISO-2) 2 filter isdaled 3-prong socket banks; (6 
sockets total); Integral Spike/Surge Suppression; 1875 W Max 
load, 1 KWeitfierbank $62 95 

• SUPER ISOLATOR (ISO-S), similar to ISO-1 except double 
IIMrirtg & Suppression $94.95 

• ISOLATOR (150-4). similar to ISO-1 except unit has 6 
intflvlduaily filtered sockets $106.95 

• SUPER ISOLATOR ()S0-11) similar to ISO-2 except douUe 
filtering a Suppression $94.95 

• CtM^Urr BREAKER, any model (add-CB) Add S 8.00 

• CKT BRKWSWiTCH/PILOT (CBS) Add $16.00 

i?I yPMJl Master-Card, Visa, American Express 

DEALERS Order Toll Free 1-800-225-4876 

__^ (except AK, H), PR & Canada) 



/^^ Electronic Specialists. Inc ^i 

"1 Soufh Mfl.n Street N.mc.l' Msss 01760 

Technical & Non-SOO: 1-617-655-1532 



file. Once your iron is ready, the 
secret to soldering is to heat the 
work piece and then let the work 
piece melt the solder. 

Cut and strip all the #18 gauge 
hook-up wires to length and ap- 
ply a bit of solder to each bare 
end. This is called tinning the 
wire, making it much easier to 
solder the connection. Be sure 
to put a knot in the power code, 
or apply some other form of 
strain relief, or you will eventual- 
ly jerk some of your connections 
loose. 

After making all connections, 
inspect your work, looking for 



cold solder joints or misconnec- 
tions. When you are sure every- 
thing is correct, put the cover on 
the box and you're ready to plug 
the system into the wall. 

A powerline filter will not 
guarantee protection from all 
transients. A direct hit of a light- 
ning bolt, for example, will prob- 
ably fry your refrigerator, wash- 
er, and dryer as well as your 
computer and the filter itself. 
However, given any distance, 
the filter will reduce problems by 
a substantial margin. It's a case 
of an ounce of prevention being 
worth a pound of cure.B 







Photo 8. Cut receptacle wires to length and solder in place. Ensure 
proper polarity between the line cord and the receptacles. This can 
be most easily accomplished by plugging the line cord's plug into 
one of the receptacles and checking for continuity between one side 
of the RFI filter and one side of the line cord. Each side of the line 
cord should be soldered to the side of the RFI filter that shows con- 
tinuity for that wire. 




Photo 9. Fasten brackets to chassis. These will be used to hold the 
top cover in place. (Photos continue on next page.) 
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Photo 10. Your finished chassis should loolt like this. 




Photo 1 1. Fasten top cover to chassis and install njbber feet. 





Don't be misled by more expensive fmftstions! 

Th!s is the original Photo pcitit light pen pre^ 
ferred and supported by some of the leading 
software sources like. "Quality Sottwa'-e"— "In- 
stant Software"— "Level IV "products and so on. 

Just imsgine . . . 

In playing backgammon, (included) when you 
want to move a man, you iust pofnt at wtiere you 
want to move from, then pcint at where you 
want to move to, and your man moves!!! ^o 
more furrbling with keyboards — YEA! i 

Your Photo Point package com»$ complete; 

• 1 Photo point ligfit pen (of course) 

• Info sheets on how to connect the pen and 
hov* to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System. 
(DOS loo!) 

• Does not void any Radio Shack warranles 

Requirements: 

• Level II basic 

• And a little /mag;naf/on/.' 

For fast reai time programming it is your iowest 
cost peripheral at £19.95 



Announcing 
NEW PEN BASIC by Steve Bjork 

Steve is one of the Best Assembly Lang, oro- 
grammers around, and he has ccme up with PEN 
BASIC. This low memory routine wili add lO more ccrVi- 
mands to Levei II such as PENGET which searches :f>e 
entire screen for the pen and returns a number betvvfer 
0-1024 in about 1 sec. Plus 9 other commands. Perfect to' 
you lightware authors and NEW light pen owpg^E 
too! only S14.9S "■ 




(COUPON) 

Micro Matrix ^w 

P.O. Box 938 • Pacifica, CA 94044 

Send for yours NOW: (415) 355-4635 



Wiofo 12. Install fuse in fuseholder and you're ready! 

'S«9 Lial of AOvetiisers on page 306 
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• • • EVERYTHINQ For Your TRS-80* Model I or Model III • • • 



' TRS-80" IS a trademark ol Tandy Corp 



REMsoFT, Inc 



Let Your TRS-80'" 
Teach You 

ASSEMBLY LANGUAGE 



REMASSEM-1 



Tiredotbuymgbookaflef book on assembly lanquaqeproqrammmq and 
stiH not knowing your POP (rom your PUSH? 

HcMSOFT proudly announces a more pflicieni way, using your own 

TRS-80*'lo learn Ihelundampntalsofassembly language programming 
at YOUR pace and at YOUR convenience. 

Our unique package ■INTRODUCTION TO TRS-SO" ASSEMBLY 

PROGRAMMING", will provide you with ihp lollowinq 

* Ten 45-minute lessons on audio cassettes 

♦ Adriver program to make your TRS-SO"" video monitor serue as a 
blackboard tor the instructor 

* A display program for each lesson to provide illustration and rem- 
forcement for what you are hearing 

• A textbook on TRS-80'" Asspmbly Language Programming 

* S(ep-by-step dissection ot complete and useful routines to test 

memory and to gam direct control Over the keyboard videomoni- 
tor, and prmier 

♦ Hpw to access and use powerful routines m your Level II ROM 

This coursewasdevelopedand recorded by Joseph E Willis and is based 
on the successful series ot courses he has taught at (yipta Technologies 
Corporation the Radio Shack Computer Center, and other locations m 
Northern Ohio The minimum system required is a Level II 16KRAM 



iCQinPLJTHQMlCS 



■,^a-v«M«- 






50 N PASCACK ROAD 
SP|tlNG VALLEY, NEW YORK 10977 



■ All orders processed wifhtn 24 Hours 
• 30-Day money back guarantee 
• Add $3 00 for shipping in UPS Areas 
• Add$4 OOforC O D or NON-UPS Areas 
• Add S5 00 to Canada or Mexico 
• Add exact postage to all other countries 



LEARN TRS-80 '^ 
ASSEMBLY LANGUAGE 

DISK I/O 



REMDISK-1 



Your disk system and you can really step out with REMm» t -Educational 
Module REMDISK-1, a ■short course " revealing the details of DISK lO 
PROGRAMMING using assembly language 



Using Il^e same format as our extremely popular introduction to Hssem- 
bly language programming, this "ASSEMBLY LANGUAGE DISK I/O 

PROGRAMMING" course includes 

• Two 45-rninute lessons on audio cassette 

• A driver program to make your TRS-80- video monitor serve as a 
blackboard for the instructor 

♦ '^display program for each lesson to provide Illustration and rem- 
lorcement tor what you are hearing 

* A booklet of comprehensive, fully-commented program listings 
illustrating sequential file hO random-access file I O and [rack 
and sector I/O 

* A diskette with machine-readable source codes lor -i:\ programs 
discussed, m both Radio shack EDTASM and Macro formats 

* Routines to convert from one assembler format to the other 
This course was developed and recorded by Joseph E Willis for the 
student with experience in assembly language programming it is an 
iniermediate-to advanced-level course Minimum hardware reguired is a 
Model I Level II 15K RAM one disk drive system 




'^l#P^\ ^ M HOUR 
,C^\24 ORDER 




PLEASE SEND ME: 

□ REMASSEM-1 ITRS-80MODELICASSETTEI $69 95 

DREMASSEM-1 (TRS-80MODELI DISKETTE) $74 95 

DBEMASSEM-I (TRS-80 MODEL III CASSETTE) $74 95 

DREMASSEM-1 (TRS-80MODEL IIIDISKETTE) $79 95 

D REMDISK-1 lTRS-80 MODEL I DISKETTE) $29 95 

a REMDISK-1 (TRS-80 MODEL III DISKETTE) $34 95 



LINE 

(914) 425-1535 



NEW TOLL-FREE 
ORDER LINE 

(OUTSIDE OF N Y STATE) 

(800) 431-2818 



CREDIT CARD NUMBER 



SI^NA 



TURE ^,AME 



EXP DATE 



^°°"ESS CITY STATE 

•"ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE 



ZIP. 
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• ••EVERY THING FOR YOUR TRS-80V^« 



■ TRS-80" is a tridemdrk of (he Radio Shack Division of Tandy Corporation 



MOD-II PROGRAMS 



* AW orders processed within 24-Hours 
* 30-Day money back guarantee on all TRSDOS Software 
*Add $3.00 for shipping in UPS Areas 
*Add $4.00 for COD. or NONUPS Areas 
*Add $5.00 outside U.S.A.. Canada & Mexico 
* We win match any bonafide advertised price 
in any of the Major Computer Magazines 
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(I) ELECTRIC PENCIL (Micnael Shtayer Soll<>«re» 
Complete word pcocesso' wilh entensive editing and 
printer (otmftlling faaturss J32S (STANDARD 
TRSDOS VERSION) t3501OIABLO NECOROUME 
TRSDOS VERSION! 

(21 OENERAL LEDGER, ACCOUNTS RECEIVABLE. 
ACCOUNTS PAVABLE. INVENTORY CONTROL. 
INVOICING AND PAYROLL (Small Bustosss Systems 
Group) an eatensive business system fortne serious 
usef can be used one mcjdule at a tin^e or as a CO- 
oiflinaled system 1225 per rnodule S1299 lor th« 
complete system 

|3t GENERAL LEDGER. ACCOUNTS RECEIVABLE. 
ACCOUNTS PAYABLE. INVENTORY CONTROL 
AND PAYROLL (CompumaxI a complete user oi- 
enled busmess system can M used one module at a 
time Of as a cocrdmaied system Si40 pel module 
1995 lor the corT>plete system 

(4) MOO-II UTILITY PACKAGE (Racet Computes) 
adds important utildtes to TRSDOS copy tiles 
selectively taster and more accurale tile copying 
repair bad directories displays sorted directory ot 
all liles on 1 to 4 disk dnyes SUPfcHZAP ctiange 
disk ID and more StSO 

(5) ADVENTURE fl-X (Scolt Adams - Adventure 
Inlernational} a series o' games formally only 
available on ttie large computers your goat istomorli 
your way tfirougli a maie ol obstacles in order to 
recover a secret treasure Or complete a missJon Ifie 
package includes all 9 Adventures written by Scott 
Ada<T<s $99 95 

(81 GSF (Race! Computers) Generalised Subroutine 
facility a series ot super last mactime language 
utilities tfiat can be called Irom a BASIC program (no 
macfime language knowledge required) SClS 1000 
Items m under 5 seconds allows PEEK and POKE 
staiemenis move data blocks compress and un- 
compress oala works under TRSDOS J50 

JT) DSM (Hacel Computes! DiSk Sort Merge sorts 
and merges large multiple diskette liles on a 1 lo 4 
drive system NOT AN IN MEMORY SORT can 
acluBlly alphabetize (or any olhet type ol sort) 4 disk 
drives wo'ib ot data Sorts one complete disk ol 
information in 10 minutes inlormatiofi is provided to 
uM DSM With the RS MAILING PROGRAM works 
under TRSDOS ttSO 

(S) ASM (Small Systems So'tware) a machine 
language monilor and disassemtiler can be used 10 
see and modify memory or disk sectors contains all 
the commands found on the Model I version plus 
some additional commands for the MOD-II works 
under TRSDOS 13995 

(9) BLINK BASIC LINK FACILITY (Racel Computes! 
Link Irom one BASIC program lo anolber saving all 
variables chain programs without losing variables 

ISO 

(10) BASIC CROSS REFERENCE UTILITY (Racel 
Computesl lists all variables apd slrmgs used n a 
program (with the line numbers fn whicfi they appear ) 

lists atl GOTO s and GOSUBs (with the line num- 
bers in which itiey appear) searchB* lor any specific 
variables or strings (with tbe line number in which 
fhey appear) S50 

(I I) DEVELOPMENT PACKAGE (Racel Computes) 
SUPERZAP (to see. print or change any byte on a 
disketlel Disassembler and MOD-II interlace lo the 



iCQI^PUTHQOilCS" 



fW^TV^^V^* t JfcL 



50 N- PASCACK ROAD 
SPRtNG VALLEY. NEW YORK 10977 




HOUR 
24 ORDER 
LINE 

(914) 425-1535 



MICROSOFT EDITOR ASSEMBLER PLUS including 
uploading services and patches lor Disk I '0 assei^ble 
direclly inio memory save all or portions of source 
10 disk dynamic debug lacilily (ZBUG| entenOed 
editor commands J'26 

(12) HARD /SOFT DISK SYSTEM (Racel Computes! 
The software essential to interlace any oMhe popular 
large hard disk drives completely compatible with 
your enisling soltware ar^d files allows up 10 ?0 
megabytes of storage (and larger) directory eipand- 
abie to handle thousands ol Mes 1400 

(13) CAMEO HARD DISK DRIVE CONTROLLER 

coming soon (November 1 1) 

(14) HARD DISK DRIVES coming soon (Nov f) 

(15) H A E COMPUTRONKS. INC. SHARE-A- 
PROGRAM DISKETTE #1 works under TRSDOS a 
collection ol programs written by MDD-M owners 
programs incluOe data base management a word 
processor mail system mortgage calculations. . 
checkbook register and many others SB (add S3 
postage outside of tbe United States. Canada and 
Ueiico) FREE if you send us a diskette conlaining 
a program tfial can be added to ine SMARE-A-PRD- 
GRAM DISKETTE 

(ie) WABASH CERTIFIED DISKETTES S39 95 (per 

Bo> of 10) 

(IT) FLIP SORT DISKETTE STORAGE TRAV Stores 
60 Oiskelles comes complete with mdei -dividers, lilt 
plates and adjustable spacing {44 95 
(IB) MASTER PAC 100 1X essential programs 
BUSINESS. PERSONAL FINANCE STATISTICS 
f^ATH GAMBLING GAMES includes 125 page 
manual and 2 diskettes S99 95 

(19) BUSINESS PAC 100 100 essential business 
programs INVENTORY CONTROL PAYROLL 
BOOKKEEPING SYSTEM STOCK CALCULA- 
TIONS CHECKBOOK MAINTENANCE AC- 
COUNTS RECEIVABLE ACCOUNTS PAYABLE 
includes 1 25 page manual and two diskettes . S149 95 

130) EDITOR ASSEMBLER (Galactic Software Ltd ) 
the first user oriented Editor Assemble' fo' the 
MODEL II and was designed to uliliie an the (ealure5 
ol ibe MODEL II It includes innovative teaiures for 
ease of coding and debugging and complete docu- 
mentation (over 120 pages) works under TRSDOS 
1229 00 

|31) BASIC COMPILER (Microsoft) changes your 
source programs into macbrne language increases 
program eiecution by 3-10 times 1395 

(32) MAIL/FILE SYSTEM from Galactic Software Ltd 
stores 2 500 names per disk No sorting time is 
required since the file is automatically sorted by tirst 
and last name plus Zip CoOe on input Retrieve by any 
combination of 19 user codes Supports an 11 digit 
alphanumerica Zip Supports a message line Comes 
complete wiiri user-oriented documentaliOn (100- 
page manual) Allows lor company name and individ- 
ual ot a company and complele phone number (and 
eilension) works under TRSDOS 119900 

(33) INCOME TAX PAC Professional income tax 
package most torms and schedules output to video 
or line printer automatic memory storage of all 
information data can be loaded Irom diskette. 
Changed and edited built inerrorchecking $19995 

(34) COMPUTER GAMES (S650| Mean Checker 
Machine Sta'-Treklll. Concentration, Treasure Hunt. 
Banco Dog Star Adventure J74 95 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OFN V STATE) 

(800) 431-2818 



i 




|1) CP/H (Lilet>oa1 Associates) an alternative 
operating system foi the MOO-II tbal atlows MOD-II 

owners to use any ol the hundreds oi programs 
available under CP/M S170 

(3) CP/M HANDBOOK ISybSJ') a slap-by-Step 
guide to CP/M takes the reader through each ol the 
CP/M commands numberous sample programs 
practical hints reference tables 113 95 

(3) GENERAL LEDGER. ACCOUNTS RECEIVABLE. 
ACCOUNTS PAYABLE, INVENTORY CONTROL. 
AND PAYROLL {Peachtree Soltware) requires CP/M 
and MICROSOFT BASIC prolessional business 
systems turn key operation can be used as single 
modules or as a coordinated syslen' $500 per 
module 12500 for the complete system. 

(4) WORD-STAR The uHimaie word processor a 
menu driven word processing system mat can be Dsad 
with any printer All standard word processing 
commands are included plus many unique com- 
mands only found on WORD STAR requires CP/M 

$495 

(5) MAIL LIST MERGE An add on package that 
allows the user to sand form letters (created on 
WORD-STAR! lo any compiled mailing lisl (using any 
CP/W based MAIL program such as tbePEACHTREE 
MAIL PROGRAM! requires CP/M, WORD STAR and 
andy CP/M based mail program.. S150 

(■> SELECTOR 111 (Micro-Ap) complete data 
management system user defined fields and codes 
manages any list defined by the user includes 
additional modules for simplified inventory control. 
accounts receivable and accounii payabls.. requires 
CBASIC-? $295 

(T) SELECTOR IV (Micro-Apl the ultimate dale 
management system all features use I he SELECTOR 

III plus data lile format conversions full page report 

formatter computations global search and replace 

hard disk compatible oata/ieit merging $550 

(B) GLECTOn (Micro-Apl. add on package to the 
SELECTOR... genera I ledger ihel allows tne user to 
define a customijed chart ot accounts $350 

(9) CBASIC-2 a non-inteiaclive BASIC used for 
many programs (hat run under CP/M allows user Hj" 
make more efficient use Of disk tiles eliminates Ihe 
use of most line number teleiences require on such 
programs as Ihe SELECTOR $120 

(10) MICROSOFT BASIC an enhanced version ol me 
MICROSOFT BASIC lound on TRSDOS adds 
commands such as chaining (allows the user to LOAD 
and RUN a new program wiifiout loamg the variables 
currently in memory! long variable length lile 
records WMILt'WEND and others can beusedwith 
the BASIC COMPILER 10 speed up programs (3-10 
times taster enecution). .S3Z5 

(11) MASTER TAX (CPAidsl professional la< 
preparation program, prepares schedules. A, B, C, D. 
E F G R/RP. SE.TC, ES and 'orms 2106. 2119, 2210. 
3468. 3903, 2441, 4625, 4726 4797, 497?. 5695 and 
6521 Printing can be on readily available pre-prinled 
continuous torms on overlays, or on compuler 
generated IRS approved torms Maintainsclinttiislory 
hies interactive with CP/AidS General Ledger $995 

I1» GENERAL LEDGER II (CPAids) designed for 
CPAs stores complete '2 month detailed history ol 
transactions generates financial siatemenit, 
depreciation, loan amortiiat'ons journals, trial 
balances, stalemenis of cnanges m Imancial position, 
and compilation letters includes payroll system with 
automating posting to general ledgers, prints 
payroll register W2 S and payroll choclis $450 

(13) ELECTRIC PENCIL (Michael Shtayer Soltware) 
Complete word processor with eiiensive editing 

and printer lormaltmg lealu'es $275 (Standard 
printer version! $300 (DIABLO NEC o' QUME 
version! 

(14) BASIC COMPILER (Wicrosofl) changes your 
source progtams into machine language increases 
program e«ecution by 3-10 times $395. 

• (CP/M IS A REGISTERED TRADEMARK 
OF DIGITAL RESEARCH) 
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• • • EVERYTHING FOR YOUR TRS-80 '• • • 

* TRS-M" if » trademark of the Radio Shacit Division of Tandy Corporriion 



100 9Wt» 
orOGHAMS 



MASTER PAC 100 

Xnd EDITION CCOMPLETELY REVISED) I 



FOR YOUR TRS-80'" LEVEL II MICROCOMPUTER 

ALL ON CASSETTE OR DISKETTE 



BUSINESS AND PERSONAL FFNANCE 

1. CHECKBOOK MAINTENANCE 

2 TIME FOR MONEY TO DOUBLE 

3 FEDERAL FICA & WITHHOLDING TAX 
3 COMPUTATIONS 

4. HOME BUDGET ANALYSIS ^-, 

5 ANNUITY COMPUTATION _,f«W£S9 

6 UNIT PRICING RlJ«>»~ 
7. CHANGE FROM PURCHASE " 

8 NEBS CHECK PRINTFR 
9. DAYS BETWEEN DATES 

10 MORTGAGE AMORTIZATION TABLE 

1 1 INVENTORY CONTROL 

12. PORTFOLIO VALUE COMPUTATIONS 

13 VALUE OF A SHARE OF STOCK 

14 SALES RECORD KEEPING SYSTEM 

15. FUTURE VALUE OF AN INVESTMENT 

16. EFFECTIVE INTEREST RATE (LOANl 

17. PRESENT VALUE OF A FUTURE AMOUNT 

18. RATE OF RETURN VARIABLE INFLOW 

19. RATE OF RETURN CONSTANT INFLOW 

20. REGULAR WITHDRAWAL FROM INVESTMENT 

21. STRAIGHT LINE DEPRECIATION 

22. SUM OF DIGITS DEPRECIATION 

23 DECLINING BALANCE DEPRECIATION 

24. BREAK EVEN ANALYSIS 

25. SALVAGE VALUE OF INVESTMENT 

26. PAYMENT ON A LOAN 

27. FUTURE SALES PROJECTIONS 

28. CREDIT CARD FILE 

29. ECONOMIC ORDER QUANTITY (EOQ) 
INVENTORY MODEL 

30 VALUE OF HOUSE CONTENTS 

31. TEXT EDITOR 

32. MONTHLY CALENDAR 

33. DAY OF WEEK 

34. CASH FLOW VS. DEPRECIATION 

35. COMPLETE MAIL SYSTEM 
36 INTEREST RATE ON A LEASE 



-ISTICS 






STATISTICS AND MATHEMATICS 

37 RANDOM SAMPLE SELECTION 

38 ANGLO METIC CONVERSION 

39 MEAN, STANDARD DEVIATION, 
MAXIMUM AND MINIMUM 

40 SIMPLE LINEAR REGRESSION 
41. MULTIPLE REGRESSION ANALYSIS 
42 GEOMETRIC REGRESSION 

43. EXPONENTIAL REGRESSION 

44. SIMPLE MOVING AVERAGE 

45. SIMPLE T TEST — «. k ' 

46 CHI SQUARE TEST S » ** 

47 NORMAL PROBABILITIES 

48 BINOMIAL PROBABILITY 

49 POISSON PROBABILITY 

50 MATRIX ADDITION AND SUBTRACTION 

51 MATRIX TRANSPOSE 

52. MATRIX INVERSE 

53. MATRIX MULTIPLICATION 

54 SOLUTION OF SIMULTANEOUS EQUATIONS 

55 QUADRATIC FORMULA 

56. LINEAR EQUATION SOLUTIONS 

57 ROOT HALF INTERVAL SEARCH 

58 ROOTS OF POLYNOMIALS 

59. ROOTS NEWTON'S METHODS 

60. PRIME FACTORS OF INTEGER 

61, LEAST COMMON DENOMINATOR 

62, RADIAN DEGREE CONVERSION 
63 NUMERICAL INTEGRATION 

UTILITIES 

64, QUICK SORT ROUTINE 

65, PROGRAM STORAGE INDEX 

66, MULTIPLE CHOICE QUIZ BUILDER 

67, FORM LETTER WRITER 

68, SHELL SORT 

69, CASSETTE LABEL MAKER 
70 CODES MESSAGES 

71, MERGE TWO FILES 

72. SORT WITH REPLACEMENT 



MATH 



GRAPHICS 

73, DRAWS BAR GRAPH 

74, DRAWS HISTOGRAM 

75, MOVING BANNER DISPLAY 

GAMBLING AND GAMES 

76, RANDOM SPORTS QUIZ 

77 GOVERNMENT QUIZ 

78 HORSE RACE 

79 MAGIC SQUARE 
80. ARITHMETIC TEACHER 
8! HIGH LOW GAMBLE 

82 UNSCRAMBLE LETTERS 

83 HANGMAN 

84, GAME OF NIM 

85. RUSSIAN ROULETTE 
86 ROULETTE GAME 

87, ONE ARMED BANDIT 

88, HIT THE TARGET 

89, WALKING DRUNK 

90 STATE CAPITAL QUIZ 

9! TICTACTOE 

92. DICE GAME 

93 LUNAR LANDAR GAME 

94. BIORHYTHM 

95 HORSE SELECTOR (CLASS CALCULATOR) 

%, RANDOM DICE ROLL 

97, RANDOM ROULETTE ROLL 

98, RANDOM CARD DEALER 

99, GUESS THE NUMBER 
100 WHITE OUT SCREEN 



gambumg 



^^^^'j:^-- 



GUARANTEED SATISFACTION 

30-DAY MONEY BACK GUARANTEE ON ALL SOFTWARE 



jCQIYIPUTRQf^lCS! 



r..^*TV^MATi 



*^*^CJ1'«TJS ^rft».Tr£ "^ 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

PLEASE SEND ME: 

D MASTER PAC 100 CASSETTE VERSION $59.95 

D MASTER PAC 100 DISKETTE VERSION $59,95 

D MASTER PAC 100 (TRS-80 MODEL II VERSION) $99 95 



--^^ ^ - HOUR 
L^B\ 24 ORDER 
LINE 

(914) 425-1535 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 

* All orders processed within 24-Houra 

•k 30-Dai/ money back guarantee on all Software 




CREDIT CARD NUMBER EXP. DATE 

SIGNATURE 

NAME 

ADDRESS CITY STATE ZIP 

■** ADD $3.00 FOR SHIPPING IN UPS AREAS • ADD $4.00 FOR C.O.D. OR NON-UPS AREAS • ADD $5.00 OUTSIDE U.S.A, CANADA 4 MEXICO ••• 
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• ••EVERYTHING FOR YOUR TRS-80^^<^ 

TRS-80 la a Iradrmark ot ihr Radio Shack Division of Tandy Corporarlon 

BUSINESS PAC 100 

100 Ready-To-Rim 
Business Programs 







(ON CASSETTE OR DISKETTE) Includes 110 Page Users Manual 5 Cassettes (Or Diskettes) 

Inventory Control Payroll Bookkeeping System Stock Calculations 

Checkbook Maintenance.... Accounts Receivable.... Accounts Payable 



BUSINESS 100 PROGRAM UST 



1 RULE76 Interes ApportionrTwnl by Rule of the 78s 

2 AMNGI Annurty compuWOon program 

3 DATE Time between dates 

4 DAYYEAR Day o* year a parttcu^ar dote falb on 

5 LEASEINT krterest role on lease 

6 BREAKEVrS Breakeven anafysis 

7 DEPRSL StraighUlne depreciation 

8 DEPRSY Sum of the digits depreciation 

9 DEPRDB Declining balance depreciatiori 

10 DEPRDDB DouWe declining balance deprecwMwn 

1 1 TAXDEP Cash flow vs. depreciation tables 

12 CHECK2 Pnnts NEBS checiis along with daily register 

1 3 CHECKBKl Owckbook mairrtenaDce program 

14 MORTGAGE/A Mortgage amortiiation taWe 

1 5 MGLTMON Compute time needed for rrwncy to double, triple. 

16 SALVAGE Determines safvage value of an investment 

1 7 RRVARIN Rate of return on investment wtth vanaWe inflows 

18 RRCOMST Rate of return on investment with constant inflows 

1 9 EFFECT Effective inlerest rote of a loan 

20 FVAL Future value of an investment (compound interest) 

21 FVAL Present value of a future amount 

22 LOATHPAY Arnount of paymetit on a loan 

23 REGWTTH Equal withdrawals from investment to leave over 

24 SHPDISK Simple discount analysis 

25 DATEVAL Equivalent & noneguivalent dated values for oUig. 

26 AMMCJDEF Present value of deferred annuities 

27 MARKUP % Marlftip analysis for items 

28 SIhKFUND Sinking fund amottizflbon program 

29 BOriDVAL Value of a bond 

30 DEPLETE Depk*ion anafysis 

31 BLACKSH Biack Scholes options analysis 

32 STOCVALl Expected return on stock via discour*s drvidends 

33 WARVAL Value of a wanant 

34 BOMDVAL2 Value of a bond 

35 EPSEST Estimate of future earnings per share for company 

36 BETAALPH Computes alpha and beta variables for stock 

37 SHARPEl Portfolk) selection model-i.e, what stocks to hoW 

38 OFTWRrTE Option wrtdng computations 

39 RIVAL Value of a right 

40 EXPVAL Expected value analysis 

4 1 BAYES B«^«ian decisions 

42 VALPRDHF Value of perfect information 

43 VALADir-IF Value of addltktnal informabon 

44 unLTTY Derives utility function 

45 SIMR-EX Linear pnagramming solution by simplex mcXhod 

46 TRAMS Transportation method for linear programming 

47 EOQ Economic order quantity riwentory model 

48 QUEUE] Single server queueirtg (waiting lir)e) model 

49 CVP COM-votumeprafk arulysis 

50 CONDPROF CondHiond profit testes 

51 OPTIOSS Opportunity kns tables 

52 FQUOQ Fbced quantity economic order quantity modd 

NAfW DeaaopnoN 

53 FQEOWSH As above but wtth shortages pemiined 

54 FQEOQPB At above but wtth quantity price breohs 

55 QUEIECB CoM-beneA weUt^ lk>e analyiis 

56 liCFANAL tiet cmMIow anolyals for simpte Imotment 

57 PROFTC PralkaMI^ IndcK d a pralKt 

96 CAPl C^ Aaoct Pr. Modd m^ of prefect 



59 WACC Weighted average cost of coptial 

60 COMPBAL True rate on loan wrlh compensating bal. required 

61 DISCBAL True role on discounted k>an 

62 MERGAMAL Merger analysis computations 

63 FINRAT Financial ratios for a firm 

64 NPV rSet present value of protect 

65 PfyriDLAS Laspeyres pnce index 

66 PRIMDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 TSMETR Time series analysis lir>ear trend 

69 TIMEMOV Time senes analysis moving average trend 

70 FUPRIMF Future price estimation *ith inflation 

71 MAILPAC MaiBng list system 

72 LETWRT Letter writing system-bnks w*h MAILPAC 

73 SORT3 Sorts list of names 

74 LABELl Shipping label mater 

75 LABEL2 Name label maker 

76 BUSBUD DOME business booki<eeping system 

77 TIMECLCK Computes weeks total hours from limeCk>Ck irfo. 

78 ACCTPAY in memofy accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on pnnter 

80 INVENT2 In memory inventory control system 

81 TELDIR Computerized telephone directory 

82 TIMUSAN Time use anafysis 

83 ASSIGN tlse of assignment algorithm for ofrtmal job assigr 

84 ACCTREC In memory accounts recervable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of toarts 

86 PAYNET Computes gross pay reqiared for given net 

87 SELLPR Computes 5ell!r>g price lor given after tax arrxiunt 

88 ARBCOMP Artrtnge compulations 

89 DEPRSF SirJdng fund depreciation 

90 UPSZONE Finds UPS lones from rip code 

91 ENVELOPE Types envelope ir>ciudlng retum address 

92 A{JTOE?<P Automobile expense analysis 

93 INSFILE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAfTD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS SaleHeaseback analysis 

99 RRCOTABD Investors rate of return on cons«ertable bond 
100 POFrrVAL9 Stock market portfobo storagevaluation program 



D CASSETTE VERSION 
D DISKETTE VERSION 



»99.95 
»99.95 



New 



D TRS-80* MODEL D VERSION »149.95 (Oursioi ^^N^ 

ADD $3.00 FOR SHIPPING IN UPS AREAS (BOfli Jt^ *^*T£j 

ADO KOO FOR C.O.D. OR NON UPS AREAS * ^^/ "''"SflljJ 



ADD $5.00 OUTSIDE U.S.A, CANADA & MEXICO 

iCQIVIPJTHQI^ICSf 



MA'v^l.Ml'CJu. Af^^jCAtrjS ' 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 1(N77 



HOUR 
^^ LINE 





425-1535 



80 Microcomputing, July 1961 • 193 



CQIYIPUTHQI^ICSJ 



• • • EVERYTHING FOR YOUR TRS-80 • • • 

TRS-80 Is a irademark of thr Radio Shack nivlMlon or Tandy Corporation 

* All orders processed within 24-Hours 
•k 30-Dai> monei/ back guarantee on all Software 
• Add $3.00 for shipping in UPS Areas 
_^ ^__ • Add $4.00 for C.O.D. or NON-UPS Areas 

U VJGTl^VChC} ^-^^^ $5.00 outside U.S.A., Canada & Mexico 

SMALL BUSINESS _^_ 

SYSTEMS GROUP SYSTEMS 




COORDINATED 



WS4" 



master cHatge 



FACTS ABOUT THE S*B.S.G. BUSINESS PACKAGES 

' 1. S.B.S.G. is a sophisticated Business Software System designed for the serious businessman. 
2- Each of the S.B.S.G. Business Modules may be purchased separately.. .or you may purchase the entire coordinated business system. 

3. Modules purchased separately do not coordinate with the General Ledger (although lor the standard S.B.S.G. fee. the user may upgrade his 
individual modules for the coordinated system). 

4. Foolproof. Step-By-Step procedures are supplied, planned and documented for the First-Time Computer User. All programs are self- 
explanatory, telling the user what is required at every step, 

5. Programs are written in BASIC and the source code listing is supplied for those users who decide to modify the original system. 

6. A complete users manual is supplied with each module. 

7. Demo Data diskettes are supplied with sample data. 

8. S.B.S.G. has an In-House staff that can answer questions and problems related to the proper use of the S.B.S.G. Business System (on the 
'telephone or through the mail). 

9. First-Time Computer Owners Note-Instructions are provided for entering state payroll withholding tables There is an additional charge if 
you prefer to have S.B.S.G. Programmers insert the correct data. 

10. Minimum system requirement is 2-drives to run any single module. 

11, Minimum system requirement is 3-drives to run the coordinated business system (AR-AP-GL) or (AR-AP-GL with PAYROLL). 
12- ■Minimum system requirement is 4-drives to run the extended coordinated system (AR-AP-GL-PR and INVENTORY/INVOICING). 

13. The A. OSBORNE A ASSOCIATES business manuals are provided FREE with each order (they may be purchased separately at $20 per 
manual). 

14. The INVENTORY and INVOICING modules are original programs written by S.B.S.G. 

15- Each module can be purchased as independent modules to run on a 2 or more drive system except INVOtCING. 

16. Memory requirement is 48K for the MODEL-I and 64K for the MODEL-II 

1 7. All S.B.S.G. BUSINESS SYSTEMS may be upgraded up to 4-disk drives. No data rs ever lost during an upgrade. There isa standard S.B.S.G 
xharge for all upgrades. 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks in payment of outstanding invoices. In 
addition, it produces cash management reports. This system aids in 
tight financial control over all cash disbursements of the business. 
Several reports are available and supply information needed for the 
analysis of payments, expenses, purchases and cash requirements. All 
A/P data feeds General Ledger so that data is entered into the system 
just once- These programs were developed 5 years ago for the Wang 
micro-computer and have been tested in many environments since 
then. The package has been converted to the TRS-80'" and is now well 
documented, on-line, interactive micro-computer system with the 
capabilities of {or exceeding many larger systems), 
CAPABILITIES: 

* menu driven; easy to use; full screen prompting and cursor control 

* iru'oice oriented; everything revolves around the invoice; handles 
new invoice or credit memo or debit memo 

* invoce information recorded; invoice #, description, buyer, check 
re*ister #, invoice date, age date, amount of invoice, discount (in %), 
frSghl, tax ($), total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure; allows checks to be calculated 
for a set of vendors-or-for specific vendors 

* program prints your checks; contiguous computer checks with your 
company letterhead can be purchased from SBSG 

-* reports include (samples on back): 

• open item listing/closed item listing - both detail and summary 

• debit memo listing/credit memo listing 

• ^ging 

• check register report (to give an audit trail of checks printed) 

• vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER; each invoice can be distributed 
to as many as five (5) different GL accounts; system automatically 
posts to cash and A/P accounts 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers. Management can 
generate information required to control the amount of credit extended 
and the collection of money owed in order to maximize profitable credit 
sales while minimizing losses from bad debts. The programs com- 
posing this system were developed 5 years ago, especially for small 
businesses using the Wang Microcomputer- They have been tested in 
many environments since then. Each module can be used stand alone 
or can feed General Ledger for a fully integrated system. 
CAPABILITIES: 

* menu driven; easy to use; full screen prompting and cursor control 

* invoice oriented; invoices can be entered before ready for billing, 
when ready for billing, after billing or after paid 

* allows entry of new invoice, credit memo, deljit memo, or change/ 
delete invoice 

* allows for progress payment 

* transaction information includes: 

• type of A/R transaction • billing date 

• customer P.O. # • general ledger account number 

• description of P.O. • invoice amount 

• shipping/transportation charges 

• tax charges 

• payment 

• progress payment information 

• transaction print & file maintenance procedures insure accuracy 

* customer statements printed; computer statements with your com- 
pay letterhead can be purchased from SBSG 

* reports include: (samples on back) 

• listing of invoices not yet billed 

• open items (unpaid invoices) 

• closed items (paid invoices) 

• aging 

* fully linked to General Ledger; will post to applicable accounts; 
debit A/R, credits account you specify 
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PAYROLL 

Payroll invoices many complex calculations and the production of 
reports and documents, many of which are required by government 
agencies. It is an ideal candidate for the computer. With this Payroll 
system in-house, you can promptly and accurately pay your employees 
and generate accruate documents/reports to management, employees, 
and appropriate government agencies concerning earnings, taxes and 
other deductions. The package has been converted to the TRS-80'" and 
is now a well documented, op-line, interactive, micro-computer system 
with the capabilities of (or exceeding) many larger systems 
CAPABILITIES: 

* performs all necessary payroll tasl(s including: 

• file maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive: 

• hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• overtime pay 

* employees can be paid using any combination of pay types (except, 
hourly cannot receive salary and salary cannot receive hourly) 

* special non-taxable or taxable lump sums can be paid regularly or 
one time (bonus, reimbursements, etc) 

* health and welfare deductions can be automatically calculated for 
each employee 

* earnings-to-date are accumulated and added to permanent records: 
taxes are computed and deducted: US income tax. Social Security 
tax, state income tax, other deductions (regular or one time) 

* paychecks are printed; computer checks with your company letter- 
head can be purchased from SBSG 

* calculations are accumulated for; employee pay history, 941A re- 
port, W-2 report, insurance report, absentee report 

* fully linked to General Ledger. Each employee's payroll information 
can be distributed to as many as (12) twelve different GL accounts; 
system automatically posts to cash account 



INVENTORY CONTROL/INVOICING 

* ISAM (Indexed Sequential Access Method) eliminates the necessity 
for time consuming sort. 

* Pre-Allocated Files for IMMEDIATE update and inquiry capabilities 

* Fast Disk storage and retrieval. 

* Inventory Master Record includes.-.class...SKU.. .Division.. .Retail 
Cost... Beg inning Balance... Period Sale Units. Period Receipts , On 
Order.. .On Hand. ..Minimum Reorder Point.. .Recommended Re- 
order Amount,. .Vendor Number. Period Sale Dollars.. YTD Sale 
Unpts ...YTD Sale Dollars. 

* Calculated and Displayed Formulas include.. .Gross Margin ($),„ 
Gross Margin (%),.. Gross Margin ROI (%)... Average Inventory Retail 
{$)... Average Inventory Cost ($).. .Turn-Over (%). 

* Reports Generated include.. .Master File Listing. .Class Description 
Listing.. .Transaction Audit Trail . Minimum Reorder Point by Ven- 
dor.. .Retail Price List.. .Retail & Cost Price List... Period Sales Report 
... Year to Date Sales Report...Stock Status (Screen or printer output) 
...Commission Report (for salesmen and buyers). 

* Transaction Types include.. .Sales, Vendor Receipts.. .Vendor 
Orders.. .Customer Returns... Vendor Returns.. .Transfer Stock, 



GENERAL LEDGER ^ '^ 

The General Ledger accounting system consolidates financial data 
from other accounting subsystems (A/R, A/P, Payroll, direct posting) in 
an accurate and timely manner. Major reports include the Income State- 
ment and Balance Sheet and a "special" report designed by manage- 
ment. The beauty of this General Ledger system is that it is completely 
user formatted. You "customize" the account numbers, descriptions, 
and report formats to suit particular business requirements. These 
programs were developed 5 years ago for the V/ang micro-computer 
and have been tested in many environments since then. The package 
has been converted to the TRS-80'" and is now a well documented on- 
line, interactive micro-computer system with the capabilities of (or 
exceeding) many larger systems. 
CAPABILITIES: 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 

* more than 1,750 transactions may be entered via: 

• direct posting: done by hand; validated against the account file 
before acceptance 

• external posting; generated by A/R, A/P, Payroll or any other 
user source 

* data is maintained and reported by: ,:'v'~.%- . " 

• month " ■■?■■■/ j^- 

• quarter ' '^' 

• year '"'.%--:^ .^ i 

• previous three quarters -xtWi^fx--: ,t, 

* reports (samples on back) include: ii 

• trial balances if 

• income statement "i- . 

• balance sheet ^^ _^J .v. 

• special accounts reports and more " ""^f"' 

* user formats reports with the following designated as you wish- 

• titles 

• headings 

• account numbers -'i y ^■' 

• descriptions 

• subtotals S 

• totals f;-. 

• skip lines '£ 

• skip pages jg^" 

* up to eight levels of totals - fully user designated 

* menu driven; easy to use; full screen prompting and cursor control 



•CQinpirrRQoiicsj 



^4A^l-^MATc:Al A**\.CiTt>se <i(t*/ci'*' 



50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 




HOUR 
24 ORDER 
LINE ; 

(914) 425-1535 



PRICING MOD-1 

VERSION 

ACCOUNTS RECEIVABLE $125 

ACCOUNTS PAYABLE $125 

GENERAL LEDGER $125 

PAYROLL $125 

INVENTORY $175 

INVOICING $150 

COORDINATED INVENTORY/INVOICING ACCOUNTS RECEIVABLE $449 

COORDINATED AR-AP-GL $375 

COORDINATED AR-AP-GL with PAYROLL $495 

EXTENDED COORDINATED AR-AP-GL INVOICING/INVENTORY with PAYROLL $799 



MOD-II 


MOD-III 


VERSION 


VERSION 


$225 


$199.95 


$225 


$199,95 


$225 


$199.95 


$225 


$199.95 


$275 


$199.95 


$250 


$199.95 


$749 


$599.95 


$675 


$599.95 


$899 


$799.95 


$1299 


$1199.95 



■■m 
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THE ORIGINAL MAGAZINE FOR 
OWNERS OF THE TRS-80"* MICROCOMPUTER 



TRS SO" IS A TRADEMARK OF TANDY CORP. 



SOFTWARE 

FOR TRS-80" 

OWNEJIS 



H 



CQIYIPUTRQI^ICS 



I MONTHLY 

II NEWSMAGAZINE 
JJ FOR TRS-80 • 
C. OWNERS 



MONTHLY NEWSMAGAZINE 

l^ractical Support For Model I, II & III 



PRACTICAL APPLICATIONS 
BUSINESS 

GAMBLING • GAMES 
EDUCATION 
PERSONAL FINANCE 
BEGINNER'S CORNER 
NEW PRODUCTS 
SOFTWARE EXCHANGE 
MARKET PLACE 
QUESTIONS AND ANSWERS 
PROGRAM PRINTOUTS 
AND MORE 



NOW IN OUR 4th YEAR 



PROGRAMS AND ARTICLES PUBLISHED IN RtCENT ISSUES 
INCLUDE THE FOLLOWING: 

• FINCALC A COMPLETE-: ElNANClAi. APPLICATIONS PACKAC.E 

• INFORMATION SYSTEM REVIEW 

• STATJSTlCAl, COMBINATIONS 

• PASCAL'S TRIANGLE 

• ASSEMBLY LANGUAGE !"OR BEGINNERS 

• DISK PILES 

• MOD 111 REVILW 

• KEYBOARD IHUNDEH AND LKiHTING EXPLAINED 

• DOS COMMANDS IN I EVEl II 

• PROBABILITY CURVE GENERATOR 

• CALCULATOR SIMULATIONS 

• I HE MEGABYIE{iAP 

• STOCKS AND BONDS 

• BUDGEL ANALYSIS ([-OR BUSINESS AND HOME] 

• NEWDOS m REVIEW 

• DUTCHING THE HORSE SYSTEM THAT CAN'l LOSE 

• A SIMULATED CjOLF GAME 

• CONTINUOUS FORM SOURCES 

• TAX SAVER REVIEW 

AND MORE 



*';!S5. 



^Vi^^ 



FINCALC 

"^^^o-TlO^ ^ > ^^f > iu > ?h ui::^ A Complete Financial Analysis Package Used 

C9^ To Calculate Markup, Margin, Annuities, Compound Interest, Nominal 
OH And Effective Rates, Sinking Funds, Mortgage Calculations, Future Value, 
cNt^ Savings and Insurance, Percentage Difference Between Two Numbers, 
Amortization Schedule and More 



SEND FOR OUR NEW 64 PAGE SOFTWARE CATALOG (INCLUDING LISTINGS OF HUNDREDS OF TRS SO'" PROGRAMS AVAILABt E ON 
CASSETTE AND DISKETTE) $2 00 OR FREE WITH EACH SUBSCRIPTIONS OR SAMPLE ISSUE 



" AH programs are supplied on cassette <add $3 for Diskette Version - add $5 (or modified Mod-ll Version). 



!CQ^1PJTHQI>^1CSL, 

50 N. PASCACK ROAD 
SPRING VALLEY, NEW YORK 10977 

ONE YEAR SUBSCRIPTION $24 

TWO YEAR SUBSCRIPTION $48 /. 

SAMPLE OF LATEST ISSUE 5 4 

START MY SUBSCRIPTION WITH ISSUE 

*'(»! July 1978 • m12 June 1979 • «24 July 1' 

NEI^UBSCRIPTION RENEWAL 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 



NEW!!! 

MOD-II NEWSLETTER 
$1 8/year Cor 12 issues) 



»30 January 19811 




_ _ HOUR 
24 ORDER 
LINE 

(914) 425-1535 




CREDIT CARD NUMBER 
SIGNATURE. 



_EXP. DATE. 



NAME 



ADDRESS 



__CITY_ 



... STATE 



ZIP. 



•** ADD $I2/YEAR (CANADA. MEXICO) • ADD $24/YEAR AIR MAIL - OUTSIDE OF U.S.A., CANADA & MEXICO *" 
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• • EVERYTHING FOR YOUR TRS-80" • • 

MODEL III 



■ TKS-BO " ' IrjifeiTurli o( Tjnd, < o.p. 



(1) GENERAL LEDGER. ACCOUNTS RECEIVABLE, ACCOUNTS PAVASLE. PAYROLL, 

INVEMTOnV CONTROL AND INVOICING iSmail BiiS.npss Gnjjiil A' p«;p^vve bi.sirp'^^ 
syslpn *•:[ l-ie ^fiious i.spr can bp jsc'^o-'t' mcduleat a rime or .is .icoo-aina'ec! syitei' 
$199.95 npr Tioduie tl199.9S for ibe compicie syitpm " 



2) MASTER PAC 100 

SrAFiSTICS MA'H 



■00 esseniial programs BUSINESS PFflSONAL FINANCE 
..GAMBLING . GAUtS mcluOes 'JS paqe manual ana h diskel'ts 

SS9.9S 

3) BUSINESS PAC 100 IOC essorl.al busintss prograns INVENTORY CONTROL. PAY- 
POI I . BUOKKEEOING SYS*fM STOCK CALCU_AriONS CHECKBOOK MAINTEN- 
ANCF ..ACCOLNTS RFCFIVABI F ACCOUNTS PAYAHLE includes 1?5 page manual 
and five disliet^cs $99.S5 

4) INFORMATION SYSTEM (The Bolloii Sliel'l An in-memo'y 'n'ormalion system lor smaM 
mai ig (i5!i. ivenlGries ji e Iwoks, arlicles. recardK proqi^am relyeice files). Can boused 
lor anything -nai yoj woulO use rolodei or rdex card files Up lo ten user defre liekls. . 
Programmable p'irtojts for rotodex ca-rts, na.ling labels, etc Win idenfily al records that 
cnniam a group of characters you've entered even il that group is •- t-e middle ofa hne. Sorts 
data oase by any field $49.&0* 

5) DATA MANAGER II (The Bottoti SheMi BANllOy ACCESS Disi baseC UATA WANAGF- 
MEN'^ S'STFM (Simihar to l^4FORMATION SYSlbM above but RANHOM ACCESS 
STORAGE expains l^e amount of storage space availabto] Used to replace index cards for 
nedn,rr sized mai' lisls. inventor. es. oetsonnei records, sales prospects, etc . Uses up to '(•(;■ 
dish drives oi line Up to twenty usei defined 'leids, protj'amiablc pt niouts fo' rolocei 
cards, etc wili identify all records that contain a grnup ol cba'acters you ve entered even if 
f-at groi.p is in the middle o' a lire . mainlam up lo b changeablo prpso'led '«ey' tiles.. .. 
var.ab'e lengrli random 'pcords (the smaller the record you define the morf records yu can 
S'D'e; J99.9S* 

«) BUSINESS MAIL SYSTEM ;The Bottom Stiel'l Handles large rrailing isls lup ;o l&O.OOO 
r-arnesj.. supports 3 or 4 'ne addresses .. f les ajtomatically in 7ip coCe Order, alphabetical 
within 7ip code, formals tor 1 to 4 across mai'inq labels ..supports qmck disk location of 
single o' tiulliple names meets all industry and postal standards nun'eric code fields 
ncluded for prmlinq selected tetords S125.0O* 

7) ANALYSIS PAD {The Bottom Shelf) . A Coium,nar Calculator 'or fmancal analysis, line item 
bL.lgpt ng co^! analysis, sales analysis and a'liosi any tmancial func!ion land mary statistica' 
funct ons) ...cfea'e natr i(eso'29>39 makeallen^'iesatonei'meeilberbyroworcolumn .. 
aod. delete move or swi'cfi columns and 'ows ed-t any data I'om Ijti screen display... add 
s jbtract. mullip'y and div.dD one column oy anolf"ef and put results n designated column (up 
to Six ca cjlalions can be naae and placed in designated co-umn) define co'umns as co-i- 
sta'^ts. save calcclalions and formulas on disk results can be prir>ted in a varicly o' repori 
formaK |99,95* 

B) CHECKBOOK li (The Bottom Sl'tlll A complete in memory checkbooK balarcmg anc 
recorcill alion program . live column neyboarC inpul with 5 characters for c>ieck number. 16 
tor aayee, 4 Icr code numerical sort 'outine S49.50' 

9) CHECK REGISTER ACCOUNTING SYSTEM :The Bottom Shelf) A complete -andom access 
checbook system . le' and dptinp up 'o 60 accounts wilt- as many income accounts as you 
chsdse con^plPte chec^boo" balanc-g anu 'econcillialion.. single entry input where 
transaction can t;e disoersec over several accounts enablesusprtomakca64 character note 
on each transaction pfirilout ycu'own check after data entry, pnnls monthly summaries of 
each accoun" wiin month and year to date tola's, create a suspense Me to 'eminu you of 
coming expenses Reports generated included CnecK Regisle' (lor any rronth), notes to 
Cf\ec-. Register. Income/txpense Distribution Raport. Statpmenl ol Selected Accounts, Bank 
Beconci'e Staterrenl. Suspense *-ile and l-jll Account Oistnhulion Statemerit $74.95* 

(10) tlBflAflY 100 ""fie Bottom SneH| 100 Programs on a broad range of topics.. Finance 
Ftijcition .Capmcs Home Carres CASSETTE VERSION S49.S0 
ClISK VF9SI0N S74.95 

(11) ADVENTUWe (by Scott Adams) . ..A series ol games (for ages 10-99) wander through en- 
chanted worlds seeking I'sasures . 1 Adventureland . ? Pirate's AOventLjre 3 Mission 
Impossible Adventure .4 Voodoo Castle S The Count .6 Strange Odyssey . . 7 Mystery 
Fun House fi Pyram'd of Doom 9. Ghost Town . (HI and "2 'ecorrmcrded forfiemovie 
acventiire) Each adventure S14.9S <)on cassette) D-skettC versions soid ir< groups ol three 
at S39.e5 pe: firee programs (#1 - Hi. #4 - #S li7 - #9) 

(12) HORSE SELECTOR II IDr hd! Dajis; New simplified ve'SiOn of fie original Ho'se Selector 
(for lidlsi The first Horse Seieci on SyiiPm to actually calcjiafe the estimated o"s lot each 
ho'ie . easy lo follow rules uses 4 factO'S (speed rating track variant, distance ol the 
present 'ace. distance of the last race) calculated estimated odds.. FUEE DUTCHING 
TABi FS allows oettmg on 2 or more twrscs with a guaranteed proiii S50-00 

(13) MON-3 and MON-4 (Howe Software).... Powerful utility programs enanimq you to inte'act 
direct'y with yOj' THS-aO in MACHINE LANGUAGE The monilo' cnme? wilh complete 
40-pdge inslructjon manual makng it useful for both the beginner and aovancefi programme i .. 
simple commands make It easy lo use functions include D'Sl'i-AY DISASSEMSLH, MOVE 
ana COMPARE. SEARCH, MODIFY RELOCATE, PHINT. READ and WRITE UNLOAD SAVF 
and HEAD INPUT and OUTi-UT. SEND and HECEIVE.. MON-3 139.95 (for cassette). 
MON-4 149,95 I'or diSk|, 



« Ali ordeTfi prot*-ssed tvilhin 24-Hout\ 
* 30-iyay monev back tunruniee on ail THSDOS Huftware 
* Add $200 for shippinq in ('PS Ajchs 
* Add filOO for r O I) i.r JSIOr\-!.iPS Areot. 
* Add S'i.m ovtsiiU- L:S.A . Canada A Mexico 
* We wilt mall, h onx bonafide udi ettiavd pricf 
m an\) ol the Major Computer Magmine^ 



(14) SMART TERMINAL i.Howt Soflwaje) 
lo a imc sharinq compute' system 



enaores your TflS 80 tu be .ised as a re#ioie fetmioai 

$«a.9s 



(15) FAST SORT (Howe Sotlvtare) . a se'ies of machine-language subroutines to sort data ''om 
BASIC proyriims . data riay oe aiuhabctit (Mnng) or numern easily rierlac»d wiih your 
BASIC p'ograr's ino machine language knowledge is necessary) jg 95 

(16) MAILING LIST (Howe Sn'tware) maintains mailing i.*ls Ol Over i{XK) names... commands 
allow adding, changing, 'leleting, and linding names Soimg is done m machine languags 
sub'Outine labels printed tn 1 , 2 or 3 columns $49.93 

(IT) HOME BUDGET (Mowe Software) combines the maintenance of your checkbook with 
ana ysis n' your mcon-e. expense-, am: monthly Oil's Handles data mcliiOinq B'l.s. income, 
deposits checks and debits to your ["lecking account ana casn enpenses Computes check- 
oook balance list of unpaid bills, monthly andyear-to-oate summaries 01 income »id expenses 
showing income tai deductions.. AM output printed on video splay Or line p»*nier . CQmeS 
w.rr c^r-ip'trri; ■'■iSttu'.t on' manua $49.95* 

(18) SMALL BUSINESS ACCOUNTING (Howe Software) . ..Based on the DOME BOOKKEEPING 
SYSTEM ...keeps track of all income, expenditu'es and oayfoll for a small business of up to 16 
employees ... income and expenditures can be entered on a daily, weekly c monthly basis., 
computes monthly and year to date lotals. manual conta."* complete insirucilons 'O' cuslom- 
i^alion Cassette version $29,95 .Diskette verjon $49.95 



(19) ReMODEL-PROLOAD(HacelConojlPs) 
one part 0* r. nro^rarr 10 anolher 



Benurr'bcr p-cg'am lines 



noveWatements from 
$34,95 



(30) G8F (Racet Computes) Lightning last in-memory machine language sor14;tilily that can be 
made part of your BASIC progams without any mach-ne language inowtodge, , includes 
severs* other utilities to speed up your BASIC programs, no macnine vnowieoge necessary 
to use CSr in your 3ASIC programs $30.00 



(21) DOSORT (Racet Computes) 
on multiple disk d.-ives 



includes GSF (above) 



extends the in mernorv sort to sorts 
$45,l)0* 



(22) COPSYS iRacet Comp.jtes) allows the user to make copies of machines language cassettes 
wit-.ojt any know edge ol machine language $20.00 

(33) COMRPOC (Racet Compulos) ... an aiilo load orogram fo' disk users aikiws ine use' to 

insert a diskette '"to their MOO-tt) and nave the computer take over all toading, ,. load a 

machine language program. BAS'C. PUN ace'tanprogtarr all without isressmg a single aotton 

allows your compute' lo ;)er'orm 10, 70 30 or mo'e l.inctions without pressing a single 

button $30.00* 

(24) INFINE BASIC (Racet Computes) ..adds a variety o( machine language subroutines lo your 
BASIC programs (without any machine language knowledge) fas' softs, ..matrix operations 

compress and uncompress da'a and more $60.00 

(25) INFINITE BUSINESS (Hacet Computes!,, .en add on package lo INFINITE BASIC adds a 
variety ol rout nes -nportant 10 the businessman (increase accuracy ol caici,l»tnj'is and more) 

$30 00 

(36) DHS (Racet Computes)... ligMnmg fast machine language soti . ..sorts up to 4 disk drives ol 
mlo'mdtion t9O,0O' 

(27) BLINK (Racet Comoulcs). allows you to RUN new programs wiinout losing i>ie var'iO:e3 
StO'ud in your previous p'Oyram. . 'ine many proiirams together without los'ng imporianl 
variables $30,00' 

(28( KFS-SC (Racet Crmiputes) now you can use ISAM (Index Sfouei'tiai Access f' 6S) on yOi.r 
MOD-HI using ISAM in your BASIC programs allows instant access of you' items in your 
datd liles use with mail programs . inventory programs ..etc, $100.00* 



(29) MAIL LIST (Racet Computes) . 
access 
• FOR DISK ONLY 



.all routines are in machine language allowing for quick 

$75.00 



•CQIYIPUTHQI^ICS! 



i.^ft'^-CJv*^ " 



SO N. PASCACK ROAD 
SPRING VALLEY. NEW YORK 10977 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF NY. STATE) 

(800) 431-2818 




HOUR 
ORDER 

LINE 



(914) 425-1535 




^See List of Actvertrsefs on page 306 
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if He^d used select ,m 
it ^irouldn^t have taken seven days 

Learn SELECT' in |ust 90 minutes. A whole new word processing software 
concept that kicks the coded key habit and frees you from complicated instruction 
manuals. SELECT is fast. SELECT is logical. With single key mnemonics, you'll use 
dozens of commands that mstantly access the rich capabilities of this system. There's 
nothing like it. 

Simply hit "C" and you'll be ready to Create a document. 

Key "I" and you'll be in the Insert mode. 

Key "M" and Move entire blocks of text , . . and key dozens more. 

That's ail there is to it. You'll get all that word processing software promises . . . plus a 
few surprises. 

SELECT with SUPERSPELL.* The only microcomputer software with an integrated 
spelling dictionary. To proof your text all you do, of course, is to Key "S". SUPERSPELL 
with its 10,000 word dictionary scans your text at computer speed then displays and 
corrects ail your typing errors. You can increase SUPERSPELL's word power and 
customize the dictionary by adding new words, one at a time. Ask to see it today at 
your local dealer. 



SELECT with SUPERSPELL . . . just a llttte byte more. 



TM 



^50 



SELECT wtllruoonany machine mat uses CP/M or MP/M" or us derivatives. 
It needs 40K ol RAM ant) two disk flfivea Special version now available lor 
Radio Shack Mod ir" and Apple if". 

'SELECT and SUPERSPELL are tfademaiks ol Select Information Systems Inc. 

■ 'CP/M and MP/M are trademarKs o( Olaital Research, 
"*'A Irademarh of Tandy Corp. 
••"A trademark of Apple Com outer Inc 



INFORMATION SYSTEMS 919 Sir Francis Drake Boulevard • Kentfield. California 94904 • (415) 459-4003 
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TECHNIQUE 



Replace that worn-out Ready message with something more regal 



Never Ready 



Ron Balewski 
412 E. Ridge Street 
Nanticoke PA 18634 



Have you ever v/ished you 
could change your comput- 
er's tired, worn-out ready mes- 
sage into something vi/lth a little 
more life? If so, this program is 
for yout It will enable your com- 
puter to display anything you 
want in place of its built-in 
ready. Unfortunately, there is 
one slight problem. The new 
message that you choose will 
not be displayed after a CLOAD. 
That will be the only time you'll 
have to suffer with the old 
message. I'll explain why a little 
later. 

How It Works 

The concept for this program 
Is really quite simple. According 
to the TBUG manual, the basic 
warm-start re-entry point Is 
1A19H. After doing some disas- 
sembly from that point on, I 
found a DOS vector call at 
1A1CH. This is a call to 41ACH, 
which contains nothing but a 



RETurn. Moving along in the dis- 
assembly, I finally found the call 
which displays the ready mes- 
sage. 

With this in mind, let me now 
tell you exactly what I'm doing in 
the program. I plug a JumP to 
the starting address of my patch 
Into DOS vector 41ACH so that 
control wii) pass to my patch 
(see Program Listing 1) during a 
restart. Lines 10 and 20 of the 
listing are two unknown calls 
that I encountered during the 
disassembly. They must be put 
here because I'm going to pass 
them up in ROM. Lines 30 and 40 
dispiay the new ready message. 
Line 50 pops the return address 



to oblivion in order to balance 
the stack (i will Jump back, not 
RETurn). Line 60 jumps back to 
ROM at the instruction im- 
mediately following the one 
which displays ready. Line 70 
reserves memory to hold your 
new message. As you can see, ! 
skip over the built-in prompt 
almost every time that it's 
displayed. 

in order to make the initializa- 
tion program a bit easier to use 
(and a lot easier to write) I wrote 
it in BASIC (see Program Listing 
2). Lines 10 and 20 ask you for 
your new message. Lines 30 and 
40 poke the patch into high 
memory. Lines 50 thru 90 poke 



10 


CALL 


01F8H 


ROM CALL 


20 


CALL 


20FgH 


ROM CALL 


30 


LD 


HL,7FC0H 


POINT TO NEW MESSAGE 


40 


CALL 


28E1H 


PRINT MESSAGE 


50 


PGP 


HL 


BALANCE STACK 


60 


JP 


1A2BH 


JUMP BACK TO ROM 


70 


DEFS 


64 


SPACE FOR MESSAGE 






Program 


Jstingl. 



1 REM ***** KEWBERDY ***** 

2 REM BY RON BALEWSKI 

10 CLS!PRINT@276,"N E W R E A D Y" :PRINT:PKINT"yOUR MES 

SAGE (UP TO 62 CHARACTERS) ": INPUTAS 
20 IFLEN(AS)>62THENGOTO10 

30 PORK=326 88T0327fl3:READD:POKEK,D;NEXTK 
40 DATA2fl5, 248, 1,205, 249, 32, 33, 192, 127, 205, 167, 40, 225,1 

95,43,26 
50 K=32704 
60 FORJ=1TOLEN(A$) 
70 P0KEK,ASC1MIDS{A$,J,1)) 
80 K=K+1 
90 HEXTJ 

IflB POKEK,13:POKEK+1,0 
110 K=16812 

120 POKEK,195!POKEK+l,176;POKEK+2,127 
130 CLS 
140 END 

Program Listing 2. 



your new message, letter by let- 
ter, into the storage areaailocat- 
ed after the program. Notice 
that 64 bytes are allocated, 
while you are limited to a 62 
character message. That's 
because the last two bytes must 
be ODH (carriage return, line 
feed), OOH (end of message in- 
dicator). Line TOO takes care of 
this. Lines 110 and 120 put the 
patch address into the DOS vec- 
tor address. Line 130 clears the 
screen so you get the full impact 
of your new message the very 
first time it's displayed! 

The Problem ' f 

As I said earlier, this patch un- 
fortunately has no effect after a 
CLOAD. This Is because CLOAD 
is the one function which does 
not re-enter BASIC at the usual 
place. Instead, the ready mes- 
sage is printed inside of the 
CLOAD subroutine and control 
is then passed to a later point in 
the restart procedure, totally by- 
passing this patch. Considering 
how infrequently CLOAD is used 
(one CLOAD and your program 
is in memory), I don't think it's 
worth the memory you'd use to 
patch the message kito the 
CLOAD subroutine. But if you're 
curious and would like to try, let 
me briefly explain how I would 
attempt to do it. 

The Fix 

The end of CLOAD is a JumP 
to location 1AE8H. As it turns 
out, there is a DOS vector at 
1AECH calling 41B5H. I think 
you could patch a routine here 
which would move the cursor up 
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!!NOW AVAILABLE!! 

I NDEX 

Sequential 
Access 
"^ Method 

* Get and Put Records to Disk File by "KEY" 
^ * Read File in Key Sequence Without Sorting 

* Delete Records Without Recopyfng File 

, * Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

* Machine Language or Basic Subroutines. 

' BUSINESS APPLICATION ADVANTAGES 

- Improved Disk Utilizatnn 

- Easier Program Development 

j • Improved Operating Characteristics 

[ • Reduce or Eliminate Sorting 

■ Improved Performance 

is 

ISAM SUBROUTINES Documentation 

ISAM UTILITIES On Diskette $90.00 

'- - PLUS - Free Mailing List Sample Application 
;. Add 6% Sales Tax for CalHornia Orders 

TRS^O MODEL I, II, & III SOFTWARE FROM: 

Johnson Associates - or - Telephone Order Line 

P.O.BOX1402M ..85 For Bank Card Sales 

Redding, CA 96001 (916) 221-0740 

WRITE FOR FREE CATALOG 



a line, print the new message, 
and return, thereby overwriting 
the ready. I haven't tried this, but 
it's a possibility. One method 
that I did try was to insert the 
BASIC line: 

125K-16821:P0KEK,195: 
POKE K + 1,176: POKE K + 2,127 

This line causes the above men- 
tioned vector to jump to the new 
ready patch, thereby printing 
the new message and jumping 
to the beginning of the restart 
procedure. This method seems 
to work to an extent. I have the 
standard ready on one line with 
the new message on the line 
below It. 

Yes, Your Majesty 

In order to use the program, 
CLOAD and RUN and tell it what 
your new message will be. If you 
want a comma in the message 
string, be sure to enclose the en- 
tire message in double quotes 
when you type it in. This is 
because the program uses an in- 
put statement to accept your 
new message. 

The program, as written, will 



sit at the very top of a 16K 
machine. It's not relocatable 
because of the message point- 
er. To move this program some- 
where else you'll have to change 
the values of the pokes as well 
as the eighth and/or ninth num- 
bers in the data statement to 
show the starting location of the 
new message. It shouldn't be 
too difficult. For example, if you 
wanted to use this program at 
the top of a 4K machine, you 
would change the FOR state- 
ment in line 30 to: 

FORK-20400T020415 

You would also change the 127 
in line 40 to 79 and the 32704 In 
line 50 to 20416. Everything else 
is the same. Oh yes, be sure to 
set the memory size accordingly 
(32688 as the program now 
stands) or things won't function 
right. 

I think you'll find the new 
ready patch a very amusing pro- 
gram. I've received some very 
puzzled looks when someone 
sees my computer displaying 
"Yes, Your Majesty." ■ 



Why Do Professionals Prefer 



BECAUSE 

• Unique sottware • Technical suppoit • Quick 
flelivery • Established company • Release 2 
CP/M' (some packages uniJer UNIX- and TRSDSS^) 

• Oualily sotlware • In-house eipertise • Fas! 
response • User ofifenladon • Compelitiue prices 

• Customei service • Vtibalim" media • Ony« 
hardware (CP/M and UNIX i/ersions| 



i# 




BECAUSE 

Unique swift routing cybernetics response system 
gives you no-nonsense technical answers that save 
you time. Call: (714} 848-1922 



Business 
Medical 
Reai Estate 
Computer Systems 

wi?tJ?S'?'',~^''* i'So,!!?"'^"** *"' "'icrocompuler COBOLM Th» only COBOL 
l^n^-iH?" °? ?^"SD0S A UNIX) with .llernale key. (multi-key ISAM), CRT 



NEW RM/COBOL' applications: 

• Order Entry/Inventory • Receivable! • Payable* • 
General Ledger • Financial Modeling ■ Client Account- 
ing— and more on the way! 

NEW CBASIC2' application!: 

• REAP (Real Ettale Acqulfltlon Package). 



Software from Cybernetics? 



PIlM e»is(ing CBASIC3 packages 
APH (Automated Palient History) 
Osborne a Assoc -Payroll • Payables 'Receivables 
• General Ledger 
NAD" (Name and Address) 
PMS IProperiy Managemeni System) 
Inqulr* lor deUII* 

TrademarKs of Ryan-McFarland Corp.. Compiler Systems Inc Diqilal Research -BpN 
Telephone Laboratories. Inc . 'Tandy Corp , "Verbaiim. Inc Cybernehcs tnc "Slryc 
tured Syslems Group. Inc . 'Small Business Applications Inc ''^"''"^"" ""^ ^Iruc 



Il«din^' ^t^! " ^"~^^*./""?" "•'•' " '^P'** ""»• "« """•' '"'"'"■ 0"t- 

•landing leaching rtocumentallon ror newcomer* to CP/M. multiple CRT emula- 
on, down loading package. •U|>pon tor CQRVUS 10 Mb hard dlak. M«ny addi- 
tional uaer-orlented lealurei. ' 



And system soil ware packages 

MAGIC WAND' EdilingAVord Process 
CBASIC3 Compiler BASIC 
QSOBT- Sod Merge Package 




Distributed in U K by 

Microcomputer Applications Ltd 

Riverside Court, Caversham, Reading. England 

TEL {0734] 470425 



8041 Newman Ave.. Suite 208 
Huntington Beach, CA 92647 
(714) 848-1922 
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HfHnd New, Tup Oi.yiily, Exact Replacement Rihbons & Ca-liiayi-b Ihese MiDhuns Prndure 

Super Jet BiacK Impressions and UHra Reliable Pnni Lite They Are De'ivered lo Youf Uour 

Promptly tor Much less Than Mo5l Reldi! Stores 

• SPECIAL! BUY 10 and GET ONE FREE! 



nmfi pRWT[n 



'ACK sift «t*ll LIST" 



MOlO SHACK IfW IM 
FIADID SHACK LPII IPIV 
QHniONlCS MODS 70Q ta 7D3 
CENTmNICS <[n lO'A 102 
103 300 1D1 30e JOe 33Q 
3ie 398 SOO SOI M3 SOB 

see B?o «?o 

aNITONlCS )M-706 
tBM - StlViR DOllAH 5Tt 
34 Sn 37 MOU S<nn 

IMQU974, Wbe 3?8' 37?D 
3771-37M «9M ilOO SI03 
SllQ S22B W» S3Z0M0W 
IBM - HARMONILA '; ' StHtS 
I MOO 4973 It 3200. 32B9. 
MOD ? 

rtLErrpt moo 33 2a 3b 37 
3B sa 

WBio nmn II iM s BiK) HI 

*ltLn 'ITS 70 PRwnHSi 
QUME iFITSaOPfllMnR MOOSI 
WANOM S bS41W WC bbBI 

WD e&eiW 22BIW 
DEC '■: I tOYD 
D(C '7 t BOYD 
NiC SPINWflltlB 



Dm pt 
3(* 
3 P* 
3 (« 



1 pt 

5 P* 



3 pt 

■0 [>» 
1 P* 
3 Pt 

3p* 
3'P* 
* P» 



13 9b an 
)S 9b 3 pt 
18K 3pt 
;6 33 3 p* 



1 S 9b M 
bSO H 



9 42 u 

240 u 

9 31 H 

1 B QO 3 pk 
BBb u 

1) 77 3 pk 
20 17 3 pt 
23 40 3 urr 



YOUH WHOlISAlf PRICI 



B 9b RMoad nb ant, /S 95 eaj 

11 953 i» ;.i 98 em 

11 85/3 pt /J 98 vai 

I' 55:3^ I5 3^e» 



13 95.' Gum Ctn 

14 90 b I* 



70 B^ 3 1* 
13 90 1 pt 

e Bi H 

13 9b 3 1* 
b9b a 



n3 95 eai 

12 38 eal 



16 95 eoi 

1 1 39 eei 

16 8/ en 

l4 65 aa, 
'5 95 f «/ 



12 9b,3 I* 14 32 

14 2b 3 i» 14 /b 

23 60 *p*t rHoMl .'^ 90 



SIZE 



^UO I 45' 

b93 .4B 

b&3 > 4^ 

1 I 106' 



5 IB' 1210 
946- .30 



2 



16 ■ 



b 16 . 

HigD lati 

I « i310 

5 IS' .393 



I 2 

12 I IB 

12.^ 



20 



LOMMfNTS 



Nflon (nd liHTT 

M*)Dr< Jit aw 

Mllcr. JH elk 
•l|lo« Jit eik 
S mil Higli Spwd 



Gum Can 



Nylon Jtl tjik 

300 000 «*» mtp 

Mii<iilr«i I'lm 
Mi<Uiiiik> Mm 

Doublf SpoM! 
DcHibi* Spools 



H-T3 

C 700 

L ;oc 

L-1D0 



c ;o4'j 

R 300 



lt-4M 

C-blt 

r.-S2S 
r SSO 

H-6UU 
R 644 
"400 




TERMS; 

W NIWUM PL'RCHASF $20 
PAYMENTBY C O U.(UPS). t.HECK, 

WASTER CARD, OR VISA CHARGE 

CARD 
VOLUME DISCOUNTS: 

20 50 PACKS 10% 

51 too PACKS 15% 

•UNDER S20. ADD S5 HANDLING 
•■APPROX RETAIL PRICE VARIES 

ANCIE LABORATORIES^ie 



(_ 't 



-■>NLl£ .dC'Jtfl'jr.ei 

'I. M Hd'i^i'Tf Ri. 1 
Lit 'eqe Fa'« Vl <'L ."■lij 



301 345 GOOO iWa&n OC loCdH 
301 79?2060iBaito MD tuc*ii 
(K)0 638 09H7,rijalior\al) 



i"i Check Enclosed '. 

"■ (■ O D 

I VISA 

: IVlASTER CHARGE 

ACCT # 

EXP DATE 

MiN ORDER $20 

PRICES SUBJECT TO (.,HANCt 



While they last . 




the complete year oP 1980 80 Microcomputing 
(in its own shelf box. . . a $2.00 value — Free) 
for only $25.00.* 



Did you miss the 2,256 pages of useful information published for \(iur THS-HO' ' in HO Microcomputing last 
\ear? Now is the perfect time to catch up for onK' $25,00.' 

In the first \ear oi 80 Microcomputittif here were 335 articles on your TRS-80— 2'/2 times more than any other 
computing magazine. Also in 1980 there were new product reviews, news and columns and best of alt hun- 
dreds of dollars worth of useable programs, 

So to unlock the key to your TRS-80 and double its xalue. . .send in today for the complete year of 1980. 80 
Microcomputing (in its own shelf box) for only $25,00.* 

We ha\e a limited number of these complete sets so send in the card today or call our toll free #800-258-5473 
and charge it to your VISA, MC or AK card. 

'j)liL\ '^hippuiu and handhua (Sj "") ' 'THS-SII i.\ a '} radruiurk nj Tandi/ 



Hf© 




g [ want a year of SO Microcomputing for $25.(XJ plus 
^.l IW for shipping and handling. Plus I'll rect-ivi^ a shelf but tu sturf 
them in. 



CliLvk t-iifli>stii fur S. 

\:iiiif „ 

Aikirfss ^^^___ 

t:it\ 



State. 



Zip. 



I'leaw olUm 4 in 6 uei-h. for deliKcry 

,S0 Mioroc-ompiitiiig • H) Pine Strett * Pelerb<iroiich, \.H, li:145W 

Toll free ordering number SOl>-2.5H-.547:i 



SOBI 
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APPLICATION 



More power to your TRS-80. 



Enhance Your 
Level II BASIC 



GU Spencer (VK2JK) 
Box 300 
Spit Junction 
NSW 2088, Australia 



Every Level II owner worth his 
salt has by now bought a 
monitor program like RSM2, 
Monbug or T-Bug. Any of these 
fine programs make it tempting 
to dig around in the Level II ROM 
to see how it works. 

The first thing that you ac- 
quire from your searching about 
is a profound respect for the 
ROM authors. It's obvious that 
every byte does plenty of work. 

Discoveries 

Sooner or later, while cruising 
through ROM land in your moni- 
tor, a lot a familiar road signs 
will flash past. Pull over to the 
side of the road near &1660 and 
have a closer look. Well, for 
goodness sake! There are all 
those familiar BASIC words like 
Run, List and Stop. It must be 



(Note: In the text, numbers prefixed with & 
are in hexadecimal notation) 



some sort of look-up table. 

And look! There are some 
other English words hiding in 
the jumble. There's Merge... 
and Put. . .and Open. Wonder 
what they're there for? Get back 
Into the monitor and let's head 
for RAM. 

As we move through reserved 
RAM, we pass sign posts all 
pointing to the same place. 
"ITiere must be 20 or 30 in all, and 
each one says JP &012D. They're 
all bunched together near &4170. 
It must be a popular spot: Let's 
jump to 8012D and see why it's 
such an attraction. 

Just a hick town, this &012D. 
A Jump there results in this mes- 
sage to the screen— L3 Error. 
The Level II Manual says this 
about L3 Error: "Disk Basic only: 



10 DEFFNRAD(R) = (3.14159/180).R 

100 X = COS(FNRADW) 
D»gre« to Rsdian Conversion Functions 

Fig. 1 



An attempt was made to use a 
statement, function or com- 
mand which is available only 
when the TRS-80 Mini Disk is 
connected via the Expansion In- 
terface." 

Gosh, I guess you need about 
$1000 to visit ail those exotic L3 
destinations. Well, I probably 
didn't want to go there anyway! 

One day a stranger appeared 
on the shelves at the local Tandy 
store. No black jacket this! It's a 
manual with a rich brown jacket 
and it's called TRSDOS & Disk 
Basic Reference Manuai (Cata- 
log No. 26-2104). 

A brief reading reveals that all 
those strange English words in 
the Level II ROM near &1660 are 
Disk Basic words available only 
to those rich enough to afford all 
that extra gear. 

Digging for Answers 

The Level II ROM is a pretty 
complex can of worms. There's 
a lot to learn about how it all fits 
together. If I live long enough it 
may all become clear. 

With the use of a monitor, 
ROM can be unraveled a small 
bit at a time. A few things are 
now obvious: 



• The Level II BASIC interpreter 
can recognize Disk BASIC words. 

• While the interpreter recog- 
nizes the words it cannot imple- 
ment them. It's just not quite 
smart enough. You might say it 
knows the words. . .but not the 
music! 

• Most Disk BASIC words result 
in a jump to &012D via the links 
near &41 70. Thus, an L3 Error re- 
sults. 

A bit more effort and most the 
mystery is solved. Table 1 
shows what goes where. Each 
of these links Is a jump: there 
are 28 of them. Twenty-four are 
accessed by a Disk BASIC word. 
The other four are reached from 
a particular point In ROM. 

We've now established that 
RAM, from &4152 to &41A5, is 
reserved for Disk BASIC jump 
links. 

Let's look a little further. 
There's also a pattern in RAM 
from &41A6 to &41E4. Dividing 
this area into three-byte lumps, 
we notice that each lump starts 
with a &C9 (hex for the op code 
RETurn). 

This type of three-byte lump 
looks like it's a link for a Call 
from somewhere -in -ROM. The 
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Call has simply been short-cir- 
cuited with a RETurn. The three- 
byte lump could be replaced 
with JP nn (which is three bytes 
long). In that way we could link 
new code into a particular spot 



in ROM. As long as the new code 
ends with a RETurn, we'll go 
right bacl< to the calling routine 
In ROM. 

An investigation of the Call 
links ultimately gives us Table 2. 





Disk BASIC Word Links 




RAM 


LVLII 


LINK 


JUMf> 


ADDRESS 


CONTENTS 


FOR 


FROM 


&4152 


JP&012D 


CVI 


T* 


&4155 


" 


FN 


42524 


&4158 


" 


CVS 


T 


M15B 




DBF 


T 


&415E 




cvo 


T 


&4161 


" 


EOF 


T 


&4164 




LOG 


T 


&4167 




LOF 


T 


&416A 




MKI$ 


T 


8416D 




MKSS 


T 


&4170 




MKDS 


T 


441 73 




CMD 


T 


&4176 




TIMES 


«2510 


&4179 




OPEN 


T 


&417C 




FIELD 


T 


&417F 




QET 


T 


&4182 




PUT 


T 


&418S 




CLOSE 


T 


&4188 




LOAD 


T 


&4168 




MERGE 


T 


&4)8E 




NAME 


T 


84191 




KILL 


T 


&4194 




& 


&24Ce 


&4197 




LSET 


T 


&419A 




RSET 


T 


&419D 




INSTR 


&2506 


&41A0 




SAVE 


T 


&41A3 




LINE 


T 


JP &021D implements '13 ERROR' 




*T = JUMP from BASIC word look-up table 


Can be 


reached from Keyboard or Jrom Program. 






Table 1 







Oltwr Disk BASIC Links 




RAM 


LVLII 


LINK 


CALLED 


ADDRESS 


CONTENTS 


WITH 


FROM 


&41A6 


RETnn 


ERROR 


&19EC 


&41Ag 


" 


USR 


&27FE 


&41AC 


•■ 


READY 


&1A1C 


&41AF 


" 


KB INPUT 


&0368 


&41B2 


" 


BASIC INPUT 


&1AA1 


&41B5 


" 




&1AEC 


&41B8 


" 


" 


&1AF2 


MIBB 




NEW/END 


&1B8C 

and 

&1DB0 


&41BE 




VDU SELECT 


&2174 


&41C1 




OUTPUT TO 
DEVICE 


&032C 


&41C4 


" 


KB SCAN 


&0358 


&41C7 


" 


RUN 


&1EA6 


&41CA 


" 


PRINT 


&206F 


&41C0 


" 


— 


&20C6 


&41D0 


" 


CRLF 


&2103 


&41D3 




TAB 


&2108 

and 

&2141 


&4106 




COMMAND 
"INPUT" 


&2igE 


&41D9 


" 


_ 


&2AEC 


&41DC 


" 


READ 


&222D 


&t40F 




READ/LIST 


&2278 

and 

&2B44 


M1E2 


RETnn 


SYSTEM 


&02B2 


RET hn = 'Dead End' with 


room for JUMP or 


CALL in- 


Striiction 










Table 2 





for the TRS-80 from Micro -Mega 



The Original GREENSCREEIM 



1^29 




The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters end 
graphics like those featured by more expensive CRT units. 
Don't confuse the Original Green-Screen with a piece of thin 
film sfuc/r to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in e *u!l 
frame perfectly matched to the color and texture of the 
TRS-80 Video Display. It is attached with adhesive stnos 
which do not mar your unit in any way. 
The full frame design of the Original Green-Screen "squares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 

(Specify whether for f\Aodel i or Model III) 

THE GREEN-SCREEN $13.95 

Add $1.00 for postage and handling. 



THE ULTIMATE STAR TREK PACKAGE 




Tired of trivial computer games? This complete Star Trek 
package will provide you with endless fascination and 
challenge, in addition to the program cassette, it includes 
comprehensive instructions, a pad of "Voyage Log" record 
sheets, and a free-standing "Torpedo and Maneuvering 
Chart. " 

The package is built around the latest version of Lance 
Micklus' incomparable Star Trek III, a 13,000 byte program 
with a host of subtle and imaginative features, which in- 
clude numerous dynamic and spectacular graphic displays. 
Star Trek ill puts you in command of the Enterprise cruiting 
in a galaxy of 192 quadrants filled with uncharted hazards, 
including hostile Klingons, pulsars, and black holes. I'ou 
have at your disposal scanners, various weapons and 
defense systems, on-board computers, and a loyal crew. 
(You will need them all to survive the Klingons.) 
Your mission is to rid the region of Klingons and to locate 
five inhabitable planets, all within 300 stardays, before re- 
turning to Star Fleet Headquarters where your overall effec- 
tiveness as a starship commander will be scored. High 
scores are possible only with careful planning and effective 
battle tactics. The "Voyage Log" sheets wilt guide your 
strategy, and the "Torpedo and Maneuvering Chan" will 
give you a vital edge In combat. (When you engage three 
Klingon ships you can't afford to miss.) 

STAR TREK PACKAGE (tor Level n. 16Konly) $22.95 

Add $1.00 for postage and handling 



Terms: Check or money order, no CODs or credit cards, please. Add amount 
shown for postage and handlinglo price oi the Item. All Hems shipped within 48 
hours by first class or priority mall. Virginia residents, add 4% sales lax. 



Micro- IVlega • P.O. Box B265 ■ Arlington,\fe 222036 



^See List of Advertisers on page 306 
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Of the 21 links, 18 are each 
cailvd from only one place in 
ROM. Three are called from two 
places. The column in Table 2 
headed Link with Is a bit sus- 
pect. That's because I haven't 
yet positivety figured out what 
FK>M is up to when the calls are 
given. When you work them out 



for certain, let me know! 

So What? 

A fair question. In my case, a 
study of these link tables start- 
ed me on the road to a machine 
language program called Level 
II and 1/2. The source and object 
codes (called TwohaO are repro- 



duced in Program Listings 1 and 
2. This short program (not much 
over IK bytes) gives access to 
selected Disk BAStC commands. 
It also offers the ability to quick- 
ly renumber BASIC lines as you 
go along in a quite sophisticated 
way. 

Finally, Twohaf provides a fa- 



Program Listing 1 



42E9 



42E9 
iZEC 
42ED 
42eE 

42e;f 

42P0 
42F1 
42F4 
42F5 
42F6 
42F7 
42F8 
42FB 
42FC 
42FD 
42FE 
42Ff 
4300 
4303 
4304 
4307 
43QA 
430B 
430C 
430D 
430E 
430F 
4310 
4311 
4312 
4313 
4316 
4317 
4318 
431A 
43iD 
431E 
431F 
4322 
4325 
4328 
4329 
432A 
432D 
432E 
432F 
4330 
4331 
4332 
4333 
4336 
4337 
4339 
433C 
433D 
4340 



3AAF40 

3D 

3D 

3D 

37 

37 

CA5643 

4E 

23 

46 

a 

FA1343 

23 

4E 

23 

46 

05 

E21343 

23 

DA0A43 

211D41 

4E 

23 

46 

23 

C5 

4E 

23 

46 

C5 

DA6043 

CP 

BE 

3E80 

32DC40 

B6 

47 

C31226 

CD1643 

3AAF40 

B7 

F5 

22F340 

EB 

7E 

23 

66 

6P 

B4 

CA4E44 

7E 

FE28 

C28943 

D7 

22D840 

1802 



00100 

00100 

00110 

00120 

00130 

00140 

00150 

00160 

00170 

00180 

00190 

00200 

00210 

00220 

00230 

00240 

00250 

00260 

00270 

00280 

00290 

00300 

00310 

00320 

00330 

00340 

00350 

00360 

00370 

00380 

00390 

00400 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 

00490 

00500 

00510 

00520 

00530 

00540 

00550 

00560 

00570 

00580 

00590 

00600 

00610 

00620 

00630 

00640 

00650 

00660 

00670 

00680 

00690 

00700 

00710 

00720 

007 30 

007 40 

007 50 

00760 

00770 

007 80 

007 90 

00800 

00810 

00820 

00830 

00840 

00850 

00860 

00870 

00880 

00890 

00900 



< TWOHAP > PART 1 V 1.2 800401 

< TWOHAP > PART 1 v 1.2 800401 
A TRS-80 LEVEL II BASIC ENHANCEMENT PROGRAM 



GIL SPENCER {VK2JK) 

BOX 300 / SPIT JUNCTION, NSW 

AUSTRALIA 



2088 



THIS PROGRAM ENABLES THESE NEW BASIC FUNCTIONS - 

1. DEF FN -DEFINE FUNCTION 

DEFUSR -DEFINE DSER 

& -PREFIX FOR HEX NOTATION 

LINE -LINE RENUMBERING COMMAND 

MERGE -SET CONCATENATE PARTITION 

RSET -RESET " PARTITIONS 



2. 
3. 
4. 
5. 
6. 



FOR DETAILS, SEE TANDY TRSDOS & DISK BASIC MANUAL 

THIS PROGRAM IS LOADED BEGINNING AT - 

ORG 42E9H ; (THE USUAL START OF BASIC) 

NOTE - ACTIVE PART IS PROTECTED BY RELOCATING THE 
OSL'AL START OF BASIC HIGHER IN MEMORY. 
THE INITIALIZATION ROUTINE IS OVERWRITTEN 
AFTER EXIT PROM TWOHAF. 



AS5 



AS8 



AS7 
ASl 



LD 

DEC 

DEC 

DEC 

OR 

SCF 

JP 

LD 

INC 

LD 

PUSH 

JP 

INC 

LD 

INC 

LD 

PUSH 

JP 

INC 

JP 

LD 

LD 

INC 

LD 

INC 

PUSH 
LD 

INC 

LD 

PUSH 

JP 

RST 

CP 

LD 

LD 

OR 

LD 

JP 

CALL 

LD 

OR 

PUSH 

LD 

EX 

LD 

INC 

LD 

LD 

OR ■ 

JP 

LD 

CP 

JP 

RST 

LD 

JR 



A, (40AFH) 

A 

A 

A 

A 

Z,A56 

C,(HL) 

HL 

B, (HL) 

BC 

M,AS7 

HL 

C,{HL) 

HL 

B, (HL) 

BC 

P0,AS7 

HL 

C,AS8 

HL,411DH 

C,(HL) 

HL 

B, (HL) 

HL 

BC 

C,(HL} 

HL 

B- (HL) 

BC 
C,AS9 

8 

(HL) 
A,80H 

(40DCH),A 

(HL) 
B,A 

2612H 

ASl 

A, (40AFH) 

A 

AF 

(40F3H) ,HL 

DE,HL 

A, (HL) 

HL 

H, (HL) 

L,A 

H 

Z,AS2 

A, (HL) 

28H 

NZ,AS3+1 

16 

(40D8H) ,HL 
AS 4 



Program continues 



cility for appending one BASIC 
program to the end of another— 
concatenating BASIC programs. 

The source of Twohaf was 
written using Tandy's EDTASM 
{version 1.2) on a 16K machine. 
Because of RAfwl limitations it 
had to be written in two separate 
parts. When the object code 
from both parts is put together, 
we have Level II and 1/2. 

Like most of us, I have looked 
at many enhancement pro- 
grams for the Level II TRS-80. 
Many are very elaborate and rep- 
resent a lot of work. The trouble 
is that they take up too much 
room in RAM while providing a 
lot of functions that I personally 
never use. Furthermore, each 
enhancement is equipped with a 
multi-page manual that keeps 
getting misplaced. 

It finally came time to make a 
list of things that would be use- 
ful enhancements for Level II for 
my applications. 

The list was short: 

1. Enable DEF FN (DEFine 
FuNction) 

2. Enable DEFUSR {DEFine 
USeR) 

3. Enable hexadecimal nota- 
tion. 

4. Enable BASIC line renumber- 
ing. 

5. Enable appending one BASIC 
program to another. 

All these functions are around 
as parts of various enhance- 
ments on the market. No one 
utility that I have found offers 
them all. 

DEF FN (DEFine FuNction) 

This is perhaps the most use- 
ful Disk BASIC command for my 
kind of programming. It permits 
the programmer to define a nu- 
meric or string function. After 
definition, the function can be 
called one or many times in a 
program. The Disk BASIC man- 
ual (referenced earlier) explains 
DEF FN. 

A sample of the use of DEF 
FN is shown in Fig. 1. Note that 
the variable used to define a 
function need not match the var- 
iable used when the function Is 
called. 

Remember that a function 
definition is not limited to one 
variable. It's also useful to real- 
ize that one function can be 
used within the definition of an- 
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UNITERM 

UNIVERSAL TERMINAL 
PROGRAM 

The firsr and only fully inrelligenf femninQl program for 
DOTH Mod I and Mod III users! Includes all features 
found OS Terminol programs costing MUCH more, plus 
many not found anywhere else. Includes extensive 
documenrotion and handsome binder. 

Price $79.95 



RUN YOUR OWN COMPUTER 
BULLETIN BOARD 

Become a CONNECTION-60 SYSOP with on Autocon- 
nection Modem, Message-OO BBS Software (by Richord 
Taylor) ond CONNECTION-60 Enhoncemenrs (by Tom 
Vonde-Stouwe) oil for only S369.00 CS90 off regular 
price). 

Other Bulletin Board and Electronic Moil Pockoges 
Qvoilable. Coll for Info. 



LIGHT PEN 



THE COPYRIGHT KIT 

A self-Instruction booklet on copyrighring the computer 
programs you write. 

INCLUDES: Step by Step instrucrions, somple forms, as 
well as discussions of copyrights, patents orxl trade 
secrets, your rights secured by copyright, legal reme- 
dies upon infringements, material not copyrightable 
ond MUCH MORE! IF YOU EVER WROTE A COMPUTER 
PROGRAM YOU NEED THIS BOOK! Written by Attorneys. 
Published by Norionol Attorneys' Publicorions, Inc. ond 
distributed exclusively through DJ. Enterprises. 
ONLY $1 1.95 Deoler Inquiries Invited 



MODEL III SPEED UP! 

Load in the 500 Baud system rapes in 1 /3 the time with 
copy III. This urility will read in you 500 baud system 
rapes, and then write rhem outot 1 500 boud.This gives 
you backup protection as well os speeding up your 
rapes. A must for oil Model III Cossette users! 
ONLY S14.95 



MODEL III DISK 
DIREQORY PROGRAM 

Cotologue your Diskettes with this eosy to use 
Cotologue program for Model III Disk systems. Con run 
on OS lirrie as a 32K 1 Disk system. Help you keep track 
of ALL of your programs. 
ONLY....^ $19.95 



Mod I and III Light pen. Needs only o 9 
Volt Battery. Attaches through rhe Cas- 
sette recorder for ease of operarion. 
Easy to use and program. Comes 
complete with hordwore ond exten- 
sive documen-totion ond sample 
routines. All this power for only$12.95 



Wttor 



DRAW 60 



Ke' 



^"v.^ ^ev; 



»0ounce1 
■oftworer 



SoWeS 



T1C-T0C 80 

Micro-Clock 



ot-VritetoTY 



-essojV- 



ifPJEEWt.ot 



DRAW-60 is o mochine language 
routine that ollows you to draw 
graphics to the screen, ond then 
save them for future use. Accepts 
input from Keyboord, Joystick, or 
Light Pen. Eosy to use, with full docu- 
mentation. 

DRAW-60 (Alone) $6.95 

When purchased with light 
pen $4.95 



Put Q wrist watch on your Computer. Gives Time, Dote, 
and Doy of Week, without the need of operator input. 
Runs on botteries, so it never needs to be reset. Gives 
you the ability to enter doto with the knowledge that 
the Dare and Time ore correct. Includes complete 
documentotion, and somple routines. 

Mod I Version $99.00 

Mod IN Version $109.00 



MODEL III MEMORY KIT 

Upgrade your Model III to 32 or 46 K with the RIGHT 
Memory Chips. These ore Prime Ceramic 1 50ns (Fostll) 
chips. Beware of slower chips, as future Mod III upgrode 
moy not wori< with them! 

16Kset $45.00 

32K set $60.00 




Enterprises 



171 Hawkins Rood... 
Centereoch, New York 11720 

(516) 981-6568 (Voice) 
(516) 588-5836 (Data) 
MNET-70031 105 ^,,,,3,, 

Dealer Inquiries Welcome nys res. odd oppr. tax 




^See List ol Advertisers on page 306 



80 Microcomputing, July 1981 • 205 



COMPUTER 

EQUIPMENT 

& SOFTWARE 

BARGAINS 



|te COmPUTBR SHnPPHR I 






Gel }nur 
rirsi Issue /■R/;/'. 



[TlW4bs M SwwDtecounI W^a] 



EVERY MONTH 

BUY, SELL OR TRADE ALL TYPES OF COMPUTER 
EQUIPMENT AND SOFTWARE (pre-owned and 
new) among 20,000 readers nationwide. 
FEATURES: 

• Low classified ad rates - ^0^ a word 

• Hundreds of ads from individuals 

• Categorized ads so you can find them instantly 

• Large (11 by 14") easy to read pages 

, Subscribe now for $10 and receive 13 issues/year 
(one FREE plus 12 regular issues). After receiving 
your first issue if you're not completely satisfied 

■you may have a 100% refund and you still keep the 
first issue free. Bank cards accepted. 
BONUS: // you have something to advertise (pre- 
owned or software) send in a classified ad tcith your 
subscription and we'll run it FREE. 

^ The Nationwide Marketplace for Computer Equipment 

m compL/reR shoppsr ..212 

^ P.O. BOX F27 • TITUSVILLE. FL 32780 9 30S-269-32II 

MasterCard 8 VISA subscriptions onlv. call TOLL FREE 1-800-528-6050 Ex. 1M 



STOCK MARKET 
SOFTWARE 

Bx H & H Trading Company for Mod. I. [1, & 111 TRS-80'^s 

STOCK TRACKER™ times trades on individ- 
ual stocks and options. Uses a technical volume 
analysis. Completely objective. Gives buy, sell 
signals. 

MARKET TRACKER™ times tops & bottoms 
on the Dow Industrials; a composite of six tech- 
nical indicators. Some judgement required. 
Gives buy, sell signals. 
These two programs are accurate. 
Hundreds of satisfied users. 



ASK FOR THE EVIDENCE! 



iV FOR MORE INFORMATION OR TO ORDER, CONTACT: 

H * xU T<mPING CQMS^NY 

I POST OFFICE BOX 3354« ^223 

\ PLEASANT HILL. CALIFORNIA 94523 

ITel«phon« 415/937-1030 
VISA a. MASTERCARD 

I «««9dTM of Rodw Shock C 
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4342 CF 


00910 AS10 


RST 


8 


4343 2C 


00920 


INC 


L 


4344 0E04 


00930 AS4 


LD 


C,04 


4346 CD6319 


00940 


CALL 


1963H 


4349 3E80 


00950 


LD 


A,80H 


434B 32DC4e 


00960 


LD 


(40DCH) ,A 


434E CD0D26 


00970 


CALL 


2e0DH 


4351 EB 


00980 


EX 


DE,HL 


4352 37 


00990 


SCF 




4353 C3E942 


01000 ASH 


JP 


ASS 


4356 D22324 


01010 A56 


JP 


NC,2423H 


4359 05 


01020 


PUSH 


DE 


435A EB 


01030 


EX 


DE,HL 


435B CD8826 


01040 


CALL 


2888H 


435E Di 


01050 


POP 


DE 


435F AF 


01060 


XOR 


A 


4360 E5 


01070 AS9 


PUSH 


HL 


4361 F5 


01080 


PUSH 


AF 


4362 EB 


01090 


EX 


DE.HL 


4363 7E 


01100 


LD 


A, (HL) 


4364 FE29 


01110 


CP 


29H 


4366 20DA 


01120 


JR 


NZ.ASIO 


4368 2AF34a 


01130 


LD 


HL, (40F3H) 


436B CF 


01140 


RST 


8 


436C 28E5 


01150 


JR 


Z,AS11 


436E 2AD840 


01160 


LD 


HL, (40D8H) 


4 371 CD0D26 


01170 AS13 


CALL 


260DH 


4374 E3 


01180 


EX 


(SP) ,HL 


4375 CD2B1F 


01190 


CALL 


1F2BH 


437B 7E 


01200 


LD 


A, (HL) 


4379 FE29 


01210 


CP 


29 H 


437B 2807 


01220 


JR 


Z,AS12 


437D CF 


01230 


RST 


8 


437E 2C 


01240 


IMC 


L 


437F E3 


01250 


EX 


(SP) ,HL 


4380 CF 


01260 


BST 


8 


4381 2C 


01270 


INC 


L 


4382 18ED 


01280 


JR 


AS13 


4384 D7 


01290 AS12 


RST 


16 


4385 E3 


01300 


EX 


(SP) ,HL 


4386 CF 


01310 


RST 


8 


4387 29 


D1320 


ADD 


HL.HL 


4388 3ED5 


01330 AS3 


LD 


A,0D5H 


438A CF 


01340 


RST 


8 


438B D5 


01350 


PUSH 


DE 


438C CD3723 


01360 


CALL 


2337H 


438F 2B 


01370 


DEC 


HL 


4390 D7 


01380 


RST 


16 


4391 C29719 


01390 


JP 


NZ,1997H 


4394 E7 


01400 


RST 


32 


4395 282F 


01410 


JR 


Z , ATI 


4397 Dl 


01420 AT6 


POP 


DE 


4398 Fl 


01430 AT4 


POP 


AF 


4399 283F 


01440 


JR 


Z,AT2 


439B 301C 


01450 


JR 


NC,AT3 


439D El 


01460 


POP 


HL 


439E CI 


01470 


POP 


BC 


439F 70 


01480 


LD 


(HL) ,B 


43A0 2B 


01490 


DEC 


HL 


43A1 71 


01500 


LD 


(ML),C 


43A2 FA9843 


01510 


JP 


M,AT4 


43A5 2B 


01520 


DEC 


HL 


43A6 CI 


01530 


POP 


BC 


43A7 70 


01540 


LD 


(HL) ,B 


43A8 2B 


01550 


DEC 


HL 


43A9 71 


01560 


LD 


(HL) ,C 


43AA E29843 


01570 


JP 


P0,AT4 


43AD 2B 


01580 


DEC 


HL 


43AE CI 


01590 


POP 


BC 


43AF 70 


01600 


LD 


(HL) ,B 


43B0 2B 


01610 


DEC 


HL 


43B1 71 


01620 


LD 


(HL),C 


4302 2B 


01630 


DEC 


HL 


43B3 CI 


01640 


POP 


BC 


43B4 70 


01650 


LD 


{HL),B 


43B5 2B 


01660 


DEC 


HL 


43B6 71 


01670 


LD 


(HL),C 


43B7 18DF 


01680 


JR 


AT 4 


43B9 D5 


01690 AT3 


PUSH 


DE 


43BA F5 


01700 


PUSH 


AF 


43BB E7 


01710 


RST 


32 


43BC 11D340 


01720 


LD 


DE,40D3H 


43BF CC8828 


01730 


CALL 


Z,2888H 


43C2 Fl 


01740 


POP 


AF 


43C3 C31A28 


01750 


JP 


281AH 


43C6 2AB34a 


01760 ATI 


LD 


HL, (40B3H) 


43C9 EB 


01770 


EX 


DE,HL 


43CA 2A2141 


01780 


LD 


HL, (4121H) 


43CD DF 


017 90 


RST 


24 


43CE 3805 


01300 


JB 


CATS 


43D0 CD4328 


01810 


CALL 


2843H 


43D3 18C2 


01820 


JR 


AT6 


43D5 Dl 


01830 ATS 


POP 


DE 


43D6 21D340 


01840 


LD 


HL,40D3H 


43D9 E5 


01850 


PUSH 


HL 


43DA CDF529 


01860 AT2 


CALL 


29F5H 


43DD 7E 


01870 


LD 


A, (HL) 


43DE 22B340 


01880 


LD 


(40B3H) ,HL 


43E1 El 


01890 


POP 


43E2 77 


01900 


LD 


(HL) ,A 



Program continues 



43E3 23 


01910 


INC 


HL 


43E4 71 


01920 


LD 


(HL),C 


43E5 23 


01930 


INC 


HL 


43E6 70 


01940 


LD 


(HL),B 


43E7 18AF 


01950 


JR 


AT4 


43E9 FECI 


01960 DEF 


CP 


0C1H 


43EB 2852 


01973 


JR 


2,DBl 


43ED CD1643 


01980 


CALL 


ASl 


43FB CD2828 


01990 


CALL 


2828H 


43F3 EB 


02000 


EX 


DE.HL 


43F4 73 


02010 


LD 


(HL) ,E 


43F5 23 


02020 


INC 


HL 


43P6 72 


02030 


LD 


(HL) ,D 


43F7 EB 


02040 


EX 


DE.HL 


43F8 7E 


02050 


LO 


A, (HL) 


43F9 PE28 


02060 


CP 


28H 


43FB C2051F 


02070 


JP 


NZ,1F05H 


43FE D7 


02080 


RST 


16 


43FF CD0D26 


02090 DE2 


CALL 


260 OH 


4402 7E 


32100 


LO 


A,(HL) 


4403 FC29 


02110 


CP 


29H 


4485 CA051F 


02120 


JP 


Z,1F05H 


4408 CF 


02130 


RST 


8 


4409 2C 


02140 


INC 


L 


440A C3FF43 


02150 


JP 


DE2 


440D Fl 


02160 USR 


POP 


AF 


440E CD2D44 


02170 


CALL 


USl 


4411 D5 


02180 


PUSH 


DE 


4412 CD2C25 


02190 


CALL 


252CH 


4415 E3 


02200 


EX 


(SP},HL 


4416 4E 


02210 


LD 


C,(HL) 


4417 23 


02220 


INC 


HL 


4418 46 


02230 


LD 


B, (HL) 


4419 21E726 


02240 


LD 


HL,26E7H 


441C E5 


02250 


PUSH 


HL 


441D C5 


02260 


PUSH 


BC 


441E 3AAF40 


02270 


LD 


A, (40AFH] 


4421 F5 


02280 


POSH 


AF 


4422 Fe03 


02290 


CP 


3 


4424 CCDA29 


02300 


CALL 


Z,29DAH 


4427 PI 


02310 


POP 


AF 


4428 EB 


02320 


EX 


DE,HL 


4429 212141 


02330 


LD 


HL,4121H 


442C C9 


02340 


RET 




4420 D7 


02350 USl 


RST 


16 


442E 010000 


02360 


LD 


BC,0 


4431 3005 


02370 


JR 


NC,US2 


4433 D630 


02380 


SUB 


30H 


4435 17 


023 90 


RLA 




4436 4F 


02400 


LD 


C,A 


4437 D7 


02410 


RST 


16 


4438 EB 


02420 US2 


EX 


DE.HL 


4439 211F4A 


02430 


LD 


HL,4A1FH 


443C 09 


02440 


ADD 


HLfBC 


44 3D EB 


02450 


EX 


DE,HL 


443E C9 


02460 


RET 




443F CD2a44 


02470 DEI 


CALL 


USl 


4442 D5 


02480 


PUSH 


DE 


4443 CF 


02490 


RST 


8 


4444 D5 


02500 


PUSH 


DE 


4445 CD022B 


02510 


CALL 


2B02H 


4448 E3 


02520 


EX 


(SP),HL 

(HL) ,E 


4449 73 


02530 


LD 


444A 23 


02540 


INC 


HL 


444B 72 


02550 


LD 


(HL) ,0 


444C El 


02560 


POP 


HL 


444D C9 


02570 


RET 




444E 1E2E 


02580 AS2 


LO 


E,2EH 


4450 C3A219 


02590 


JP 


19A2H 


4453 110000 


02600 HEX 


LD 


DE,0 


4456 D7 


02610 


RST 


16 


4457 2B 


02620 


DEC 


HL 


4458 0605 


02630 


LD 


B,5 


445A 23 


026 40 HX6 


INC 


HL 


445B 7E 


02650 


LD 


A, (HL) 


445C CD3E1E 


02660 


CALL 


1E3EH 


445F EB 


02670 


EX 


OE,HL 


4460 300A 


02680 


JR 


NC,HX3 


4462 FE3A 


02690 


CP 


3AH 


4464 3019 


02700 


JR 


NC,HX4 


4466 D630 


02710 


SUB 


30H 


446B 3815 


027 20 


JR 


C,HX4 


446A 1806 


02730 


JR 


HX5 


446C FE47 


02740 KX3 


CP 


47H 


446E 300F 


02750 


JR 


NC,HX4 


4470 D637 


02760 


SUB 


37 H 


4472 29 


02770 HX5 


ADD 


HL,HL 


4473 29 


02780 


ADD 


HL,HL 


4474 29 


027 90 


ADD 


HL.HL 


4475 29 


02800 


ADD 


HL,HL 


4476 B5 


02810 


OR 


L 


4477 6F 


0282B 


LD 


L,A 


4478 05 


02830 


DEC 


B 


4479 CAB207 


02840 


JP 


Z,07B2H 


447C EB 


02850 


EX 


DE,HL 


447D 18DB 


02860 


JR 


HX6 


447F CD9A0A 


02870 HX4 


CALL 


0A9AH 


44B2 EB 


02880 


EX 


DE,HL 


4483 C9 


02890 


RET 




4484 00 


02900 LAST 


DEFB 





0000 


02910 


END 




00000 TOTAL 


ERRORS 







PRO 




Dept C, Sox 839 / No Hollywood, Ca 91603 / (213) 764-3131 







f>rofession:ai- 

"WORD I=»ROCES3I3StG 

Ct> f o r t h e <»> 

TRS— eo* ]>Xocfals I a-nd III 



Powerful editing *nd formatting features formerly 
available only on large ZBI>(^Time- Sharing computer! 

Easy-to-use tfue Full-Screen Editing 

Typeahead - never loses keystrokes 

Flexible - big documents. Form Letters, Index, 
Table of Contents, block move/copy, global change 

EPSOn'MX-80 - all 12 fonts, including EMPHASIZED 

Line Printer IV - Right-justified Proportional font 
(ours was the first complete system to do so) 

PLUS! underlining , .scripts, *"''*'^»cript« 

dcsLJtjl^-width, Centering, and much more 

Diablos* and others! underlining and good support 

Excellent documentation - hundreds of examples 

Injtroductory Pric; i p i $79.95 

(until 7/31/81, then J99.95, and still a bargain!) 

Requires 4dK, runs under TRSDOS^, NEKDOS, 
NEWDOS/80i VTOS* 4.0, LDOS^ (Upgrade privilege 
front SUBSCRIPT applies to current licensees.) 



DVORAK 

Keyboard translator with press-on labels! *19<9S 

Typing Tutor (requires a translator)! $19.95 

Special! Both DVORAK programs! $34,95 

(32K disk systems) 

Softivare Speedips 

FASXER $29.95 

Analyses executing BASIC programs, then 
identifies a simple program change to improve their 
execution speed. JIO hardware ;:fi ^qey are [Involved. 
works with packages as well as your own code and 
can reduce run-times by lO — SO*tfe. Example! 
"move selection" in "Othello" dropped from 48 to 32 
seconds. Runs on 16-48K Level I! tape or disk. 
Models I and III, Written in Z~80. This will be one 
of your most valuable utilities! 

XTE3SE3D40 $19.95 

Quickly upgrades Model I 35-track disks to 40 
tracks with your 40-track drives and DOS. j 



I <^^> ORDERI3yt< ^ < «• > I 

He acxxpt checks* C.O.D's* charge* and even cash. 

Telephone orders accepted for M/C and VISA. 

Please add $3.00 for shipping to orders under 
$25.00, Add 6% tax in Calif., and 10% outside U.S.A. 



V 



J 



ySsfl List of Advertisers on page 306 
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other. 

DEFUSR (DEFIne USeR) 

Ten different USR routines 
(USR0,1hrough USR9) can be de- 
fined. The purpose of DEFUSR 
is to tell the BASIC interpreter 
the stirt address of a machine 
language subroutine. 

Values can be passed from 



BASIC to USR and vice versa. 
Consult both the Level II BASIC 
manual and the Disk BASIC 
manual for the complete story. 

Hexadecimal Notation 

Disk BASIC offers you a way to 
use both hexadecimal and octal 
notation in addition to decimal 
notation. This is a great help to 



the programmer. It avoids the er- 
rors made when code is avail- 
able in hex (or octal) and needs 
to become part of a BASIC pro- 
gram (which requires decimal). 
Level II and 1/2 skips the octal 
option. There just doesn't seem 
to be much demand for it, which 
simplifies matters. A number 
without a prefix is assumed to 











Program Listing 2 








02920 
02930 


; < TWOHAF > 


PART 2 


V 1.2 B00401 






0294B 


; 




GIL SPENCER (VK2JK) 








02950 


; 




BOX 300 / SPIT JUHCTION 


NSW 2088 






02960 


} 




AUSTRALIA 








02970 














02980 


; THE 


FOLLOWING LABELS, DEFINED IN PART 


1, ARE NEEDED IN 






02990 


; PART 


2 - 






4322 




03000 


ASC 


DEFL 


4322H 




43E9 




03010 


DEF 


DEFL 


43E9H 




440D 




03020 


USR 


DEFL 


440DH 




4453 




03030 


HEX 


DEFL 


4453H 




4484 




03040 
03050 


LAST 


DEFL 


4484H 




4484 




03060 

03070 




ORG 


LAST ; CONNECT TO 1ST 


PART OF TWOHAF 


4484 


CD611B 


03080 


LINE 


CALL 


1B61H 




4467 


011E1D 


03090 




LD 


BCIDIEH 




44BA 


2B 


03100 




DEC 


HL 




448B 


D7 


03110 




RST 


16 




448C 


C5 


03120 




PUSH 


BC 




44BD 


010A00 


03130 




LD 


BC,000AH 




4490 


C5 


03140 




PUSH 


BC 




4491 


58 


03150 




LD 


D,B 




4492 


58 


03160 




LD 


E,B 




4493 


2826 


03170 




JR 


Z.NUl 




4495 


FE2C 


03180 




CP 


2CH 




4497 


2809 


03190 




JR 


Z,NU2 




4499 


D5 


03200 




PUSH 


DE 




449A 


CD4F1E 


03210 




CALL 


1E4FH 




449D 


42 


03220 




LD 


B,D 




449E 


4B 


03230 




LD 


C,E 




449F 


Dl 


03240 




POP 


DE 




44A0 


2819 


03250 




JR 


Z,NU1 




44A2 


CF 


03260 


NU2 


RST 


8 




44A3 


2C 


03270 




INC 


L 




44A4 


CD4F1E 


03280 




CALL 


1E4PH 




44A7 


2812 


03290 




JR 


Z,NU1 




44A9 


.'•1 


03300 




POP 


AF 




44AA 


CF 


03310 




RST 


8 




44AB 


2C 


03320 




INC 


L 




44AC 


D5 


03330 




PUSH 


DE 




44AD 


CD5A1E 


03340 




CALL 


1E5AH 




44B0 


C29719 


03350 




JP 


NZ,1997H 




44B3 


7A 


03360 




LD 


A,D 




44B4 


B3 


03370 




OR 


E 




44B5 


CA4A1E 


03380 




JP 


Z,1E4AH 




44Be 


EB 


03390 




EX 


DE.HL 




44B9 


E3 


03400 




EX 


(SP) ,HL 




44BA 


EB 


03410 




EX 


DE,HL 




44BB 


C5 


03420 


NUl 


PUSH 


BC 




^ 44BC 


EB 


03430 




EX 


DE,HL 




44BD 


22E545 


03440 




LD 


(NU0) ,HL 




44C0 


EB 


03450 




EX 


DE.HL 




44C1 


CD2C1B 


03460 




CALL 


1B2CH 




44C4 


Dl 


03470 




POP 


DE 




44C5 


D5 


03480 




PUSH 


DE 




44C6 


C5 


03490 




PUSH 


BC 




4407 


CD2C1B 


03500 




CALL 


1B2CH 




, 44CA 


60 


03510 




LD 


H,B 




44CB 


69 


03520 




LD 


L,C 




. 44CC 


Di 


03530 




POP 


DE 




44CD 


□F 


03540 




RST 


24 




44CE 


EB 


03550 




EX 


DE,HL 




44CF 


DA4A1E 


03560 




JP 


C,lE4AH 




44D2 


Dl 


03570 




POP 


DE 




44D3 


CI 


03580 




POP 


BC 




44D4 


Fi 


03590 




POP 


AF 




I4D5 


D5 


03600 




PUSH 


DE 




44D6 


180E 


03610 




JR 


NU3 




44D8 


09 


03620 


NU5 


ADD 


HL,BC 




44D9 
'^44DC 


DA4A1E 


03630 




JP 


C,1E4AH 




EB 


03640 




EX 


DE.HL 




,. 44DD 


E5 


03650 




PUSH 


HL 




44DE 


21F9FF 


03660 




LD 


HL,0FFF9H 




44E1 


DF 


03670 




RST 


24 




■ 44E2 


El 


03680 




POP 


HL 




, 44E3 


DA4A1E 


03690 




JP 


C,1E4AU 




44E6 


D5 


03700 


KU3 


PUSH 


DE 


' 


44E7 


5E 


03710 




LD 


E, (HL) 


Program continues 



be decimal. A number with an 
ampersand {&) prefix is as- 
sumed to be hexadecimal. Thus, 
in Level It and 1/2 the interpreta- 
tion of these two statements is 
identical: 10 DEFUSR3 = 27648, 
10 DEFUSR3 = &6C00. Level II 
and 1/2 does not support hex no- 
tation in data or input state- 
ments. 

BASIC Line Renumbering 

This is certainly one facility 
that every programmer wishes 
he had at his finger tips. A line 
renumberer should be easy to 
use; should be fast; should fix 
all pointers (GOTO, GOSUB, 
etc.); and should be flexible{vari- 
able start points, variable incre- 
ments, etc.). 

Level II and 1/2 offers all these 
advantages. About the only 
thing it does not do is change 
any reference to line numbers 
that you may have buried in 
REM statments. 

The Disk BASIC word that acti- 
vates the line renumbering rou- 
tine in Level II and 1/2 is Line. 
Used by itself, it assumes these 
default values: 

• New first line number = 10 

• Renumber a// lines 

• Increment = 10 

The Line command can con- 
trol all three of these parame- 
ters. For example, LINE 1000, 
500, 20 means: new first line 
number=1000; start renumber- 
ing with old line number 500; in- 
crement = 20. 

Such control is extremely 
handy when you need to insert a 
large block of numbers in the 
middle of a BASIC program to 
accommodate a new routine. 

Default values and specific 
values can be mixed in the Line 
command. For example -LINE, 
100 means: new first line num- 
ber=10; renumber alt lines; in- 
crement = 100. 

Concatenating BASIC Programs 

In EDP the word Merge means 
to shuffle or blend together. Ap- 
pend or Concatenate is a subset 
of Merge, meaning place next to 
each other. 

As the word Append is not in 
the Disk BASIC vocabulary, I had 
to settle for Merge. Here's how 
you use it: You have a BASIC pro- 
gram called John in RAM. 
John's highest line number is 
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YTEWRITER-1 




The World's 
First Under $300 
80 Column Dot Matrix Printer 



PRICE BREAKTHROUGH FROM MICROTEK 

Bytewriter-1, the $299 printer that has taken the 
industry by stornn! A product made possible 
through cost-effective design, efficient 
manufacturing operations, a proven \o\fj-cosi 
print mechanism and the simplest possible 
control electronics. We have done extensive 
testing with ail three models of the TRS-80. the 
Apple II, and the Atari 400 and 800. That is why 
we can guarantee you won't have any interface 
problems with the Bytewriter-1, 

TRS-80 is a trademark of Radio Shack. Div. of Tandy Corp. 
Apple II is a Irademark ol Apple Corriputer. Inc 
Atari dOO & BOO are trademarks of Atari, Inc, 
Bylewnter-1 is a trademark ot Microtek, Inc. 



Microtek. Inc, "^ 
9514 Chesapeake Drive 
San Diego, CA 92123 
Tel. 714-278-0633 
Outside Calif, call 
toll free: 800-854-1081 
TWX. 910-335-1269 



BYTEWRITER-1 SPECIFICATIONS 



Printing Technology: 



Printing Speed: 



Character Set: 



7-wire bi-directional 
impact wire matrix 

60 lines per minute 

(80 characters per second) 

continuous 



Character Size: 



Paper: 




MICROTEK 



96 character ASCII 
(upper and lower case) 

10 characters per inch 
(80 columns per line) 
plus expanded printing 

Friction feed (synchro- 
nous), accepts single 
sheet and roll paper up to 
9V2 inches maximum 
width. Prints original plus 
3 copies. 

By the way, our replacement print-head costs 

less than $30 too! 

Call or write today for more information. ^ ' 



inc. 



990. You have another BASIC 
program called Les on cassette, 
and you want to add Les to the 
bottom end of John, in Level II 
and 1/2, simply enter the vi(ord 
Merge. The VDU will say OK. 
RAM is now apparently empty 
(like after New). CLOAD Les in 
the usual way. At this stage the 
line numbers of Les do not mat- 
ter. Afier CLOAD it will appear 
as thoiigh only Les is in RAM. 
You can run it, change it, any- 
thing you like. You must renum- 
ber Les so that the lowest line 
number is higher than 990, 
which you can do quickly using 
the L^vel II and 1/2 Line com- 
mand. The Line command will 
not affect John. 

If ytfu had a third program on 
cassette named Bruce that you 
want to add beneath Les, use 
the word Merge again. Then 
CLOAD Bruce and continue as 
with Les. Remember that Bruce 
must start at a higher line 
number than Les finished at. 

When you've got all the 
pieces put together (and the on- 
ly limit is how much available 
RAM you have), you're ready for 
the last command in the se- 
quence, which is the Disk BASIC 
word RSET. When you enter 
RSET, the VDU will say OK. Now 
you've got one big BASIC pro- 
gram! Easy as that! 

Details 

You can add Level II and 1/2 to 

your arsenal in several ways. 

• Use Listings 1 and 2. These 
listings have both the source 
code and the object code. If you 
have EDTASM I'd suggest you 
key the source into the EDTASM 
buffer. After all, you are sure to 
decide to improve it. 

• If you don't have EDTASM, 
you can key in the object code 
using T-Bug or a similar utility. 
Use the two left-most columns 
of Listings 1 and 2. Be sure to 
get the right code in the right ad- 
dresses. 

• If you can't type (or don't want 
to) write to me and we can ar- 
range either a trade or sale of a 
cassette version of the program. 

After you have a copy of Level 
II and 1/2, it's easy to use. Load 
it into your Level II machine via 
System. The name is Twohaf. 
Hit the slant line command and 
everything's done. You're back 



in BASIC with extra functions at 
your fingertips. 

To remind you that the en- 
hancement is in there, a mes- 
sage will be printed before each 
ready prompt. This is nice when 
you've got as many versions 
around as I have! 

The Level II and 1/2 code 
starts at the beginning of Level 
II free RAM (&42E9). Positioning 
it here means that you can 
almost forget about it. All Level 
II commands work as always. 
You can even set memory size 
for machine language routines 
in high memory. 

You do lose about 1100 bytes 
of free RAM. Of course, if you 
find yourself with the memory 
size query again, you'll have to 
reload Twohaf, as the links are 
all set back to normal Level II by 
the bootstrap. 

Knowing how the links in Ta- 
bles 1 and 2 work will spark 
other ideas for you. It's nice to 
have some extra commands 
available that you can give from 
the keyboard. 

For example, it is not at all 
unusual for me to have RSM2 
loaded in high memory (&6C00 
and higher) while jumping back 
and forth between BASIC and 
machine language. It's easy 
enough to get from RSM2 to 
BASIC— G 1A19 does that. Get- 
ting back to RSM2 used to be a 
hassle. I have to first type 
System, then slant line, followed 
by 27648 (or is it 26748?). That's 
now all changed. Only six bytes 
did it. The beginning of RSM2 is 
&6C00 and fortunately it's also 
the entry point. So six bytes 
were added just before &6C00. 



6BFA 
6BFD 



21 00 60 

22 80 41 



LD HL,6C00 
LD (4180),HL 



After the addition, RSM2 was re- 
recorded using: P 6BFA 7E00 
6BFA. The result of this addition 
is to link RSM2 with the Disk BA- 
SIC word Get. 

Now all that's needed from 
BASIC is to enter Get— and, 
presto, we're back in RSM2. The 
same approach can be used for 
your favorite monitor or other 
frequently needed machine lan- 
guage utility. 

Now, if we could only speed 
up the baud rate of the cassette 
I/O, maybe we won't need disks 
after all... ■ 



44E8 7B 


03720 


LD 


A,E 


44E9 23 


03730 


INC 


HL 


44EA 56 


03740 


LD 


D, (HL) 


44GB 82 


03750 


OR 


D 


44EC EB 


03760 


EX 


DE.HL 


44ED Dl 


03770 


POP 


DE 


44EE 2807 


03780 


JR 


Z,NU4 


44F0 7E 


03790 


LD 


A, (HL) 


44P1 23 


03800 


INC 


HL 


44F2 B6 


03810 


OR 


(HL) 


44F3 2B 


03820 


DEC 


HL 


44P4 EB 


03830 


EX 


DE,HL 


44P5 20E1 


03840 


JR 


NZ,N05 


44F7 C5 


03850 NL14 


PUSH 


BC 


44Fe CD1846 


03860 


CALL 


NZ0 


44FB CD2345 


03870 


CALL 


NU6 + 1 


44FE 2AE545 


03880 


LD 


HL, {NU0) 


4501 EB 


03890 


EX 


DE,HL 


4502 CD2C1B 


03900 


CALL 


1B2CH 


4505 60 


03910 


LD 


H,B 


4506 69 


03920 


LD 


L,C 


4507 CI 


03930 


POP 


BC 


4508 Dl 


03940 


POP 


DE 


4509 D5 


03950 NU8 


PUSH 


DE 


450A 5E 


03960 


LD 


E, (HL) 


450B 70 


03970 


LD 


A,E 


450C 23 


03980 


INC 


HL 


450D 56 


03990 


LD 


D, (HL) 


450E B2 


04000 


OH 


D 


450F 280D 


04010 


JR 


Z,NU7 


4511 EB 


04020 


EX 


DE,HL 


4512 E3 


04030 


EX 


(SP) ,HL 


4513 EB 


04040 


EX 


DE.HL 


4514 23 


04050 


INC 


HL 


4515 73 


04060 


LD 


(HL) ,E 


4516 23 


04070 


IHC 


HL 


4517 72 


04080 


LD 


(HL) ,D 


4518 EB 


04090 


EX 


DE,HL 


4519 09 


04100 


ADD 


HLfBC 


451A EB 


04110 


EX 


DE.HL 


451B El 


04120 


POP 


HL 


451C 18EB 


04130 


JR 


Nue 


451E eiisiA 


04140 KU7 


LD 


BC,lA18H 


4521 C5 


04150 


PUSH 


BC 


4522 FEF6 


04160 NU6 


CP 


0F6H 


4524 AF 


04170 


XOR 


A 


4525 32E745 


04180 


LD 


(FB) ,A 


4528 2AA440 


04190 


LD 


HL, (40A4H) 


452B 2B 


04200 


DEC 


HL 


452C 23 


04210 NU9 


INC 


HL 


452D 7E 


04220 


LD 


A, (HL) 


452E 23 


04230 


INC 


HL 


452F B6 


04240 


OR 


(HL) 


4530 C8 


04250 


RET 


Z 


4531 23 


04260 


INC 


HL 


4532 5E 


04 270 


LD 


E, (HL) 


4533 23 


04280 


INC 


HL 


4534 56 


04290 


LD 


D, (HL) 


4535 D7 


04300 NW7 


RST 


16 


4536 B7 


04310 NW3 


OB 


A 


4537 2eF3 


04320 


JR 


Z,NU9 


4539 4F 


04330 


LD 


C,A 


453A 3AE745 


04340 


LD 


A, (FB) 


453d 87 


04350 


OR 


A 


453E 79 


04360 


LD 


A,C 


453F 2857 


04370 


JR 


Z,NW1 


4541 FE9E 


04380 


CP 


9EH 


4543 2025 


04390 


JR 


NZ,NW2 


4545 D7 


04400 


RST 


16 


4546 FE8D 


04410 


CP 


SDH 


4548 20EC 


04420 


JR 


NZ,NW3 


454A D7 


04430 


RST 


16 


454B FE0E 


04440 


CP 


0EH 


454D 20E7 


04450 


JR 


NZ,NW3 


454F D5 


04460 


PUSH 


DE 


4550 CDFE45 


04470 


CALL 


NW4 


4553 7A 


04480 


LD 


A,D 


4554 B3 


04490 


OR 


B 


4555 201B 


04500 


JR 


NZ,HW5 


4557 E5 


04510 


PUSH 


HL 


4558 2AE845 


04520 


LD 


HL , ( FC ) 


455B 2B 


04530 


DEC 


HL 


455C 212000 


04540 


LD 


HL,20H 


455F 2B 


04550 


DEC 


HL 


4560 212000 


04560 


LD 


HL,20H 


4 56 3 2B 


04570 


DEC 


HL 


4564 213000 


04580 


LD 


HL,30H 


4667 El 


04590 


POP 


HL 


456B 182A 


04600 


JR 


NW6 


456A FE0E 


04610 NW2 


CP 


0EH 


456C 20C7 


04620 


JR 


NZ,NW7 


456E D5 


04630 


PUSH 


DE 


456F CDFE45 


04640 


CALL 


NW4 


4572 E5 


04650 NW5 


PUSH 


HL 


4573 CD2C1B 


04660 


CALL 


1B2CH 


4576 0B 


04670 


DEC 


BC 


4577 3E0D 


04680 


LD 


A,0DH 


4579 384B 


04 6 90 


JR 


CNwe 


457B CDF920 


04700 


CALL 


20F9H 


457E 21D645 


04710. 


LD 


HL,NW9 


4581 D5 


04720 


PUSH 


DE 
Program continues 
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4582 CDA728 


04730 


CALL 


28A7H 


4585 El 


04740 


POP 


HL 


4586 CDAF0F 


04750 


CALL 


0FAFH 


4589 CI 


04760 


POP 


BC 


458A CD0A46 


04770 


CALL 


NXl 


458D El 


04780 


POP 


HL 


458E E5 


047 90 


PUSH 


HL 


458F C5 


04800 


PUSH 


BC 


4590 CDA7aF 


04810 


CALL 


0PA7H 


4593 El 


04820 NX6 


POP 


HL 


4594 Dl 


04830 NW6 


POP 


DE 


4595 2B 


04840 


DEC 


HL 


4596 189D 


04850 


JR 


NW7 


4598 FE0D 


04860 NWl 


CP 


0DH 


459A 2099 


04870 


JR 


NZ,NW7 


459C D5 


04880 


PUSH 


DE 


459D CDFE45 


04890 


CALL 


NW4 


45A0 EB 


04900 


EX 


DEjHL 


45A1 23 


04910 


INC 


HL 


45A2 23 


04920 


INC 


HL 


A5A2 23 


04930 


INC 


HL 


45A4 4E 


04940 


LD 


C, (HL) 


45A5 23 


04950 


INC 


HL 


45A6 46 


04960 


LD 


B, (HL) 


45A7 EB 


04970 


EX 


DE,HL 


45Ae 60 


04980 


LD 


H,B 


45A9 69 


04990 


LD 


L,C 


45AA CDEB46 


05000 


CALL 


Nxa 


4 SAD EB 


05010 


EX 


DE.HL 


45AE 13 


05020 


INC 


DE 


45AF 2AE845 


05030 


LD 


HL, (FC) 


45B2 2B 


05040 


DEC 


HL 


45B3 2B 


05050 


DEC 


HL 


45B4 2B 


05060 


DEC 


HL 


45B5 BE05 


05070 


LD 


C,5 


45B7 lA 


05080 NX5 


LD 


A, (DE) 


45B8 B7 


05090 


OR 


A 


45B9 283B 


05100 


JR 


2,NX4 


45BB 77 


05110 


LD 


(HL) ,A 


45BC 23 


05120 


INC 


HL 


45BD 13 


05130 


INC 


DE 


45BE 0D 


05140 


DEC 


C 


45BF 20F6 


05150 


JR 


NZ,NX5 


45C1 Dl 


05160 NX? 


POP 


DE 


45C2 2B 


05170 


DEC 


HL 


45C3 C33545 


05180 


JP 


NW7 


45C6 219345 


05190 MW8 


LD 


HL,NX6 


45C9 E5 


05200 


PUSH 


HL 


45CA 2AE845 


05210 


LD 


HL, (FC) 


45CD E5 


05220 


PUSH 


HL 


45CE 2B 


05230 


DEC 


HL 


45CP 70 


05240 


LD 


(HI.),B 


45D0 20 


05250 


DEC 


HL 


45D1 71 


05260 


LD 


{HL),C 


45D2 2B 


05270 


DEC 


HL 


45D3 77 


05280 


LD 


{HL),A 


45D4 El 


05290 


POP 


HL 


45D5 C9 


05300 


RET 




45D6 42 


05310 NW9 


DEFM 


■BAD BRANCH TO ■ 


45E4 00 


05320 


DEFB 





0002 


05330 N-J0 


DBFS 


2 


0001 


05340 FB 


DEFS 


1 


0002 


05350 FC 


DEFS 


2 


45EA B7B6 


05360 FJ 


DEFW 


0BeD7H 


45EC 9D9F 


05370 


DEFW 


9F9DH 


45EE C28E 


05380 NX2 


DEFW 


8EC2H 


45P0 B4B5 


05390 


DEFW 


0B5B4H 


45F2 8DCA 


05400 


DEFW 


0CAeDH 


45F4 9195 


05410 


DEFW 


9591H 


45F6 3620 


05420 NX4 


LD 


(BL) ,20H 


45F8 23 


05430 


INC 


HL 


45F9 0D 


05440 


DEC 


C 


45FA 2aFA 


05450 


JR 


NZ,NX4 


45FC 18C3 


05460 


JR 


NX7 


45FE 23 


05470 NW4 


INC 


HL 


45FF 5E 


05480 


LD 


E, (HL) 


4600 23 


05490 


INC 


HL 


4601 56 


05500 


LD 


D, (HL) 


4602 23 


05510 


INC 


HL 


4603 22E845 


05520 


LD 


(FC) ,HL 


4606 2B 


05530 


DEC 


HL 


4607 C3781D 


05540 


JP 


1D7 8H 


460A D5 


05550 NXl 


PUSH 


DE 


4600 C5 


05560 


PUSH 


BC 


460C 3E20 


05570 


LD 


A,20H 


460E 1E05 


05580 


LD 


E,S 


4610 0B 


05590 NX8 


DEC 


BC 


4611 02 


05600 


LD 


(BC},A 


4612 ID 


05610 


DEC 


E 


4613 20FB 


05620 


JR 


NZ,NX8 


4615 CI 


05630 


POP 


BC 


4616 Dl 


05640 


POP 


DE 


4617 C9 


05650 


BET 




4618 2AA440 


05660 NZ0 


LD 


HL, (40A4H) 


461B 7E 


05670 NZ2 


LD 


A, (HL) 


461C 23 


05680 


INC 


HL 


461D B6 


05690 


OB 


(HL) 


4eiE 2838 


05700 


JR 


Z,NZ1 


4620 23 


05710 


INC 


HL 


4621 23 


05720 


INC 


HL 

Program continues 



SPECIAL DELIVERY 



WORDPROCESSING 
- POWER - 

for the TRS-80® 

"...If you're presently looking for a mailing list proc- 
essor, this represents the current state of the art." 

80 MICROCOMPUTING - 80 REVIEWS - JULY 1980 

MAHjTORM is data entry at its best, just fill in 
the form! FAST, EASY to use functions include: 
search, sort, extract, page forward and back. 
Transparent cursor', insert/ delete characters, 
and MORE! 

MAILRITE prints 'personalized' form letters 
by inserting information from MAILFORM into 
Electric Pencil*, Scripsit*, or BASIC text files. 
Print letters, labels, even envelopes! Boldface, 
underscore, change margins, pause, print 
'unprintable' characters, and MORE! 

XTRAI includes: MAILFORM; MAILRITE - 
with capability of printing variable text from 
a 'key' file; MAILABEL - 1, 2, 3, or 4 across 
label printer; and MAILSORT - sort a full 
40 track double density data diskette in 
only 48K! 

ALL MACHINE LANGUAGE 

m«ans unBurpasad 
SPEED. RELIABILITY A EASE OF USE 

For VISA, Master Card & COD orders only 
Call NOW - TOLLFREE 

(800) 824-7888 

ASK FOR OPERATOR 203 

California (800) 852-7777 

Hawaii & Alaska (800) 824-7919 

For more informBtion call (214) 233-3998 

(Raquire* min 32K sinoU disk drive) 

FOR THE MODEL I & m 

SPECIAL DELIVERY $125 

XTRA SPECIAL DELIVERY ..$199 

FOB THE MODEL II 

SPECIAL DEUVERY $199 

(R«iuir«a Mod n DOS version 2.0) 

TkS K) ,s c, r.-.)islKry.l lr*lem-.rk ot Taiuly Cor,, 



S 



software concepts 

13534 Preston Rd. Suite 142 
Dallas, Texas 75240 



Dealer Inquiries invited »^299 



'See List ol Advertisers on page 306 
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THE PROGRAMMER'S GUILD 
MEANS ADVENTURE! ! 



SPIDER MOUNTAIN 

SEARCH FOR GOLD AND GLORY IN THE TUNNELS 
OF SHELOB'S LAIR. 



TAPE $14.95 



DISK $19.95 



LOST DUTCHMAN'S GOLD 

YOU AND THE GHOST OF BACKPACK SAM AGAINST 
THE TREACHEROUS TERRAIN AND HOSTILE 
INDIANS OF THE SUPERSTITION MOUNTAINS. 



TAPE $14.95 



DISK $19.95 



LOST SHIP 

DISCOVER THE SECRET OF THE FLOATING PIRATE 
VESSEL IN THE MYSTERIOUS DEVIL'S TRIANGLE. 



TAPE $14.95 



DISK $19.95 



DEATH DREADNAUGHT 

CAN YOU ESCAPE THE CREATURE'S DEADLY 
PURSUIT AND MAKE IT TO THE SHUTTLE ALIVE? 
RATED R DUE TO VIOLENT DESCRIPTIONS. 



TAPE $14.95 



DISK $19.95 



DRAGONQUEST 

RESCUE THE PRINCESS BEFORE SUNDOWN FROM 
SMAEGOR THE TERRIBLE. MACHINE CODE, KEY- 
BOARD MACRO. 



TAPE $15.95 



DISK $21.95 



THUNDER ROAD 

HILARIOUS TAKEOFF ON THE "DUKESOF HAZARD" 
CAN YOU GET YOUR MOONSHINE TO KNAWBONE 
BEFORE SHERIFF BUBBA SHUTS YOU DOWN? 



TAPE $14.95 



DISK $19.95 



DEADLY DUNGEON 

DISCOVER THE SECRET OF THE DEADLY DUNGEON 
AND EMERGE VICTORIOUS AND WEALTHY. 



TAPE $14.95 



DISK $19.95 



* * * NEW RELEASE * * * 
TEMPLE OF THE SUN 

EXPLORE AN ANCIENT AZTEC TEMPLE SEARCHING 
FOR THE SHAMAN'S SECRET. 



TAPE $14.95 



DISK $19.95 



COMPUTER MAIL ORDER IS HERE! ! I 



Programmer's Guild 

P O. Boji66'Peterboroogi>, NH 03'15B • eoa-saa-BOes Voice ■ SO3-9;4-7920 Daia 



4622 23 


05730 


INC 


HL 


4623 7E 


05740 NZ3 


LD 


A, (HL) 


4624 B7 


05750 


OR 


A 


4625 23 


05760 


INC 


HL 


4626 28F3 


05770 


JR 


Z,NZ2 


4628 F22346 


05780 


JP 


P,NZ3 


4e2B 2B 


05790 


DEC 


HL 


462C 11EA45 


05800 


LD 


DE,FJ 


4e2F 0E0C 


05810 


LD 


C,0CH 


4631 lA 


05820 NZ5 


LD 


A, (DE) 


4632 BE 


0583d 


CP 


(HL) 


4633 284S 


05840 


JR 


Z,NZ4 


4635 13 


05850 


INC 


DE 


4636 0D 


05860 


DEC 


C 


4637 20P8 


05870 


JR 


NZ,NZ5 


4639 7E 


05880 


LD 


A, (HL) 


463A FEa9 


05890 


CP 


89H 


463C 23 


05900 


IKC 


HL 


463D 20E4 


05910 


JR 


NZ,NZ3 


463F E5 


05920 


PUSH 


HL 


4640 2B 


05930 


DEC 


RL 


4641 D7 


05940 


RST 


16 


4642 FE23 


05950 


CP 


23 H 


4644 200F 


05960 


JR 


HZ,NZ6 


4646 D7 


05970 


RST 


16 


4647 FEP3 


05960 


CP 


0F3H 


4649 200A 


05990 


JR 


NZ,NZ6 


464B D7 


06000 NZ7 


RST 


16 


4e4C 2807 


06010 


JR 


Z,NZ6 


464E: FE2C 


06020 


CP 


2CH 


4650 20F9 


06030 


JR 


NZ,HZ7 


4652 PI 


06040 


fOf 


AP 


4653 1625 


06050 


JR 


NZ4 


4655 El 


06060 NZe 


POP 


HL 


4656 18CB 


06070 


JR 


NZ3 


4656 2AA440 


06080 NZl 


LD 


HL,(40A4H} 


465B EB 


06090 


EX 


DE,HL 


465C 62 


06100 HA2 


LD 


H,D 


465D 6B 


06110 


LD 


L,E 


46SE 7E 


06120 


LD 


A, (HL) 


465P 23 


06130 


INC 


HL 


4660 B6 


06140 


OR 


(HL) 


46G1 2667 


06150 


JR 


Z,NZ8 


4663 23 


06160 


INC 


HL 


4664 23 


06170 


INC 


HL 


4665 23 


06180 


INC 


HL 


4666 7E 


06190 NAl 


LD 


A, (HL) 


4667 23 


06200 


INC 


HL 


4666 FE0E 


06210 


CP 


0EH 


46eA 2809 


06220 


JR 


Z,HZ9 


466C B7 


06230 


OR 


A 


465D 20F7 


06240 


JR 


NZ,NA1 


466P BB 


06250 


EX 


DE,HL 


4670 73 


06260 


LD 


(HL) ,E 


4671 23 


06270 


INC 


HL 


4672 72 


06260 


LD 


(HL) ,D 


4673 18E7 


06290 


JR 


NA2 


4675 23 


06300 NZ9 


INC 


HL 


4676 23 


06310 


INC 


HL 


4677 18ED 


06320 


JR 


NAl 


4679 2B 


06 330 NA7 


DEC 


HL 


467A D7 


06340 NZ4 


RST 


16 


467B ES 


06350 


PUSH 


HL 


467C CD5A1E 


06 360 


CALL 


1E5AB 


467P CI 


06 370 


POP 


BC 


4680 7D 


06360 


LD 


A,L 


4661 91 


06390 


SUB 


C 


4662 2624 


06400 


JR 


Z,NA3 


4664 D5 


06410 


PUSH 


DE 


4685 5F 


06420 


LD 


E,A 


4666 3E02 


06430 


LD 


A, 2 


4688 F5 


06440 


PUSH 


AF 


4689 3E05 


06450 


LD 


A, 5 


468B 93 


06 460 


SUB 


E 


468C 3007 


06470 


JR 


NC,NA4 


468E 2F 


06 480 


CPL 




46 8F 3C 


06490 


IKC 


A 


46 90 Dl 


06500 


POP 


DE 


4691 Ce02 


06510 


ADD 


A, 2 


4693 F5 


06520 


POSH 


AF 


46 94 AP 


06530 


XOR 


A 


4695 C5 


06540 NA4 


PUSH 


BC 


4696 C4D446 


06550 


CALL 


NZ,NA5 


4699 El 


06560 


POP 


HL 


469A 360B 


06570 


LD 


(HL) ,0EH 


469C 23 


06580 


INC 


HL 


469D CI 


06590 


POP 


BC 


469E Dl 


06600 


POP 


DE 


469F 73 


06610 


LD 


(HL) ,E 


46A0 23 


06620 


INC 


HL 


46A1 72 


06630 


LD 


(HL) ,D 


46A2 23 


06640 NAG 


INC 


HL 


46A3 3620 


066S0 


LD 


(HL) ,20H 


46AS 10FB 


06660 


DJNZ 


NA6 


46A7 23 


06670 NA8 


INC 


HL 


46A8 2B 


066 80 HA3 


DEC 


HL 


46A9 D7 


06690 


RST 


16 


46AA 3C 


06700 


INC 


A 


46AB 3D 


06710 


DEC 


A 


46 AC 3eCB 


0672^ 


JR 


C,NA7 


46AE 23 


06730 


INC 


HL 

Prog f am continues 
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questitins for the computer operator, concerned with The versatility of their TRS80 programs ■ 



How in heavens name, 
can SUPER UTILITY 

provide answers? 

Super Utilitv is a powerful and sophisticated zapping program that 
allows you to go to the heart of the disk and read or modify data with 
ease, engaging simple one- key commands that threads through all of 
your logical decision choices Super Utility, written by Kim Watt of 
Breeze Computing, Inc. is a stand alone program containing seven 
main menus, which are the answers to frustrated questions you have 
while struggling through your TRSHO programs. 



A.Zap, 



has an easv to read pnntoul that 
leveals informatlori in both HEX and 
ASCII and simultaneously moveahle dual cursors. You 
can modify data using Hex. DecimaL ASCII or Binary 
input, and any changes are aulomatically updated on 
both sides ot the readout You can search through disk 
or file sectors, stopping anywhere to copy, cornpare and 
v^erify data on your disk 



Q Isn't there an easier way to get rid of this 
* data I don't want? 

^^ MJ« ■ y#¥p enables you to clear a disk of 
•*•* *** H'^unwanteddata Kill files by Hle- 
c or have the computer list them one at a time tor 



dell 



How can [ format my disk without erasing 
what I have? 



A*Foriiiat, 



your (iisk anii add tracks. 
■Make a AFj track disk a 40 
track You also have the option of formatting with or 
without erase, or custom formatting your disk 



This disk Is protected. Isn't there someway 
I can copy It? 

A.Disk Copy r£%^Zo[" 

TKS-80 readable disks, regardless of efforts to protect 
it So. back up your original and back up your modified 
version, too, or 

you wish to back 
up your tape 



A.TapeCopy 



I My disk won't boot. Now what do I do? 



will recovjer 
killed files, if 



A«Disk Repair 

the tile was accidently killed by thii utility Repair GAT 
table. HIT table and Boot Read protect directory track 
and check directory 



> How can I get more access to my memory? 



A«Meniory; 



f allows you to moue, lest, 
compare, zero, exchange 

edit, or lump to, memory Load memory to/from disk 
and input or output a byte to any port 



You will love the simplicity and freedom of 
modifying programs to suit your needs. Now. 
the only question left is . . . 



Q*How do I order? 

^k Scrid^check or money ordtr for only $49 9Fi 



I plus $2 50 shipping and handliny to 



1^76 



Breeze Computlna, Inc. P O Eim 101 < 

li,':kiry Ml 4H07:! 

Foreign orders, please add $5 00 additional postage. 
Michigan residents add 4% sales tax 

Bri-t/i- CiiiiiiiulmjJ, ''"-. will bt-iid t-vuiy inMier, upon 
rojii^lrjtion (if Supoi I 111 lily, imt- Iwck up copy $2.50. 



DISCOVER THE 6809 IN YOUR COLOR COMPUTER 

Now you can explore the Radio Shack Color Computer's impressive potentials— as an inexpensive 
development system, a color peripheral, a process controller— ad Infinitum. The Micro Works introduces 
these powerlul software tools for utilizing the color computer at the assembly language level. 



MONITOR TAPE; A cassette tape which 
allows you to: 

• Examine or change memory using a 
formatted hex display 

• Save areas of memory to cassette in 
binary (a "CSAVEM") 

• Download/upload data or programs to 
a host system 

• Move the video display page 
throughout RAM 

• Send or receive RS-232 at up to 9600 
baud 

• Investigate and activate features of 
your computer, such as hires graphics 
or machine-language music 

• Use your color computer as an intel- 
ligent peripheral for another computer, 
a color display or a 6809 program 
development tool 

The monitor has 19 commands in all, and is 

relocatable and re-entrant. 

80C Monitor Tape Price: $29.95 



THE 






MONITOR ROM: The 
same program as the 
monitor tape, supplied 
on ROM. This allows 
BASIC to use the entire 
RAM space. And you 
don't need to re-load the 
monitor each time you 
use it. The ROM plugs 
into the Extended Basic 
ROM Socket or a modi- 
fied ROMPAGK. 
80C Monitor ROM 
Price: $39.95 



r>' 



INSIDE THE COLOR COMPUTER: This 
package is a disassembler which runs 
on the color computer and enables 
you to generate your own source 
listing ot the BASIC interpreter ROM. 
Also included is a documentation 
package which gives useful ROM 
entry points, complete memory map, 
I/O hardware details and more. Dis- 
assembler features include cross- 
referencing of variables and labels; 
output code which can be re- 
assembled; output to an 80-column 
printer, small printer or screen; and a 
data table area specification which 
defaults to the table boundaries in the 
interpreter ROM. A 16K system is 
required for the use of this cassette. 
BOC Disassembler Price: $49.95 



Mastercharge and BankAmericard 



P.O. BOX 1110 DEL MAR. CA 92014 714-942-2400 



-See Lisl ot Advertisers on page 306 
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2 games per cassette 



(or thTRS-SO IMclIir III. ICK 
Lml 11 tr Model ]ll MSIC micnKOiwrtcn. 
t\i our pngnms hi» 

ACTION SOUNDS & GRAPHICS 




Tov design rour own spice lighter and 
theeblist off into l»ttle. Humin Of 
10 Coiifiiter Oppoiifiits. Fight i* 7 or i 
dinwuiMs. Tbree»eMtias:"Simggler'', 
-Rftnl Option" , twt "Phocoii Decathlon". 

THE NiW STARSHIP VDTAGES 

R brilliiit "trek" trpe spKewar. 3D 
lalatfuitharaparomd. Moviig e«eni< 
ciafl, SMH are "Cloaked". IG conniJads. 
Resae starbaie Sella ftxn the Rogues 
catal(« Ho. 7001 S I9.SS 




MRSECTORV 



Slill 

ne 

Ultiautt 

Space 

War 



Uiiqie splK utceii gives each plajrer a 
printi di$pl)^ lamdi fleet kattle craft 
and watch them f^ht. fire high pwcred 
OMrg) bMMS or short range oeapoii Spreads. 
Hmuii orcoHputer appoMnt. 

RARSECfORS TotriMHt Vtrsm. 
Giant gilM]i to coif«f . laleiise Stntegy < 
catilegtia. 2002 119.95 




! ! ! ANTS ! ! ! 



Amaiiig 
War 

let MM n 

lal 
Calooies 



Fast, nacbiit iMgiage speed. Three gine 
nriilioiti "Open Field", "HestStrritr', 
and 'OiglHil lots". 1 ptanrs or coMpiter 
■ppaneit. EasiftopliT, Cballeiigiig te 
Master. Fm pKhtd game for ill ages ! ! ! 

THE NEW STARSHIP VOYAGES 

catgtofHo. 2003 1 14-95 



HIGH SPEED LIFE 

The FmEST. most IDVIHCED msion if 
IMtammi'i fanois nutheadical|Mie. 
SpectKular kaleidoscopic aniMtion. 
SOO ten/mm ttpical. 32 preprogriNHMd 
patterns. Multiple coatrol functiwis 

( RsledWo-l n a05olIwB>aCrltkiu«, luuaS ) 

NAME THAT STATE QUIZ 

I toiiMtch educatitial game. Draai 
50 states and asks five questiotis. 
Three 4WI Ijipes. tas) ti Nse. 
cataleg Ho. 2004 S 14 95 



Disk Owners 

On special ra«Mst the abon gaows are 
milaUe NcasscHe (Ml) trmster), saow prici. 
CMpitihIewithTllSHS Disk Basic 4SK . 



Add S1 IXIpoMaga<inandling. COO add S7.S0 
Fla.Hm.Kld4\lBi Mike Chech a MX). piyaU* to. 

Synergistic Solar, Inc. 

POBoi S6IS9S, Miami Fl 331S6 

PWsH untie hn moiB inio, D««lei uxjuiry in»iled 



46AF CA1B46 


067 40 




JP 


Z,NZ2 




46B2 28 


96750 




DEC 


HL 




46B3 FE20 


06760 




CP 


20H 




46B5 2BF0 


06770 




JR 


Z,NA8 




46B7 FE2C 


067 80 




CP 


2CH 




46B9 28EC 


06790 




JR 


Z,NA8 




46BB FECE 


06 300 




CP 


0CEH 




46BD 28E8 


06810 




JR 


Z,NAB 




46BF FED4 


06 820 




CP 


0D4K 




46C1 3804 


06830 




JR 


C,NA9 




46C3 FED7 


06840 




CP 


0D7H 




46C5 38E0 


06 85 




JR 


C.NA8 




46C7 C32346 


06860 tlA9 


JP 


NZ3 




46CA 2AP940 


06870 NZ8 


LD 


HL, (40F9H) 




46CD 22FB4fl 


06880 




LD 


{40FBH) ,HL 




46D0 22FD40 


06890 




LD 


{40FDH) ,HL 




46D3 C9 


06900 




RET 






46D4 E5 


06 910 MAS 


PUSH 


HL 




46D5 2AF94B 


06920 




LD 


HL, (40F9H) 




46D8 EB 


06930 




EX 


DE,HL 




46D9 260B 


06940 




LD 


H,0 




46DB 6P 


06950 




LD 


L,A 




46DC 19 


06960 




ADD 


HL,DE 




46DD 22F940 


06970 




LD 


(40F99) ,HL 




46E0 44 


06 980 




LD 


B,H 




46E1 4D 


06990 




LD 


C,L 




46E2 El 


07000 




POP 


HL 




46E3 lA 


07010 NBl 


LD 


A, (DE) 




4eE4 02 


07020 




LD 


(BC},A 




46E5 DF 


07030 




RST 


24 




46E6 C8 


07040 




RET 


Z 




46E7 IB 


07050 




DEC 


DE 




4eE8 0B 


07060 




DEC 


BC 




46E9 I8PB 


07 07 




JR 


NBl 




46EB CD9A0A 


07080 NX3 


CALL 


0A9AH 




46EE AF 


07090 




XOR 


A 




46EF CD3410 


07100 




CALL 


1034ii 




46F2 B6 


07110 




OR 


(HL) 




46F3 C3D90P 


07120 




JP 


0PD9H 




46P6 21PD46 


07130 READY 


LD 


HL,GI1 




46F9 CDA72B 


07140 




CALL 


28A7H fDISPLAY A STRING POINTED @ BY HL 1 


46FC C9 


07150 




RET 






46FD OB 


07160 Gil 


DEFB 


0BH 




46FE 8785 


07170 




DEFW 


8587H .'GRAPHICS CHARACTER 1 


4700 4C 


07180 




DEFH 


'LEVEL II-1/2 


(V 1.2) IS -' 


4719 00 


07190 




DEFB 


;NUL= 


END OF STRING FOR CALL 28A7 


471A ED5BF940 


07 200 MERGE 


LD 


DE, (40F9H) 


; ( )= END BASIC 


471E IB 


07210 




DEC 


DE 




471F D5 


07220 




PUSH 


DE 




4720 CI 


07 230 




POP 


BC 




4721 IB 


07 240 




DEC 


DE 




4722 IB 


07250 




DEC 


DE 




4723 IB 


07 26 




DEC 


DE 




4724 lA 


07 27 




LD 


A, (DE) 




4725 B7 


07280 




OR 


A 




4726 2005 


07 290 




JR 


NZ,ME2 




4728 ED43F940 


07300 




LD 


{40P9H) ,BC 




472C IB 


07310 




DEC 


DE 




472D 13 


07320 HE2 


INC 


DE 




472E 13 


07 330 




INC 


ua 




472F ED53A44fl 


07340 




LD 


(40A4H) ,DE 




4733 214B47 


07350 




LD 


HL.MEl 


; OK MESSAGE 


4736 CDA728 


07360 




CALL 


28A7H 


; DISPLAY A STRING 


4739 C3191A 


07 37 




JP 


1A19H 


; JP TO BASIC 


473C 215247 


07 380 RSET 


LD 


HL, TWOHAF 




473F 22A440 


07 390 




LD 


(40A4H),HL 


; RESET 'BASIC BEGIN' 


4742 214B47 


07400 




LD 


HL,ME1 




4745 CDA728 


07 410 




CALL 


28A7H 




4748 C3191A 


07420 




JP 


lAi9H 




474B 3C 


07430 MEl 


DEFM 


'< OK >' 




4751 00 


07 440 
07450 




DEFB 









07460 


NOTE 


- PROGRAM FROM HERE DOIVN IS LOST WHEN JP TO BASIC | 




07 470 




IS DCWE. IT IS CWLY 


HEEDED FOR INITIALIZATION. 




07 480 










4752 212243 


07 490 


■hohap 


LD 


HL.ASC 




4755 225641 


07 500 




LD 


(4156H) ,HL 




4758 21E943 


07 510 




LD 


HL,DEF 




475B 225C41 


07520 




LD 


(415CH) ,HL 


;LINK TO DISK BASIC 'DEP' 


475E 215344 


07530 




LD 


HLjHEX 




4761 229541 


07 540 




LD 


(4195H) ,HL 




4764 3EC3 


07 550 




LD 


A,0C3a 


; 'JP' FOR USR & READY 


4766 32A941 


07560 




LD 


(41A9H) ,A 




4769 210D44 


07570 




LD 


HL,USR 


;LINK TO DISK BASIC 'USR' 


476C 22AA41 


07 580 




LD 


{41AAH) ,HL 




476P 218444 


07 590 




LD 


HL,LINE 


;LINR TO DISK B. 'LINE' 


4772 22A441 


07600 




LD 


(41A4H) ,HL 




4775 32AC41 


07610 




LD 


(41ACH) ,A 




4778 21P646 


07620 




LD 


HL, READY 




477B 22AD41 


07630 




LD 


(41ADH) ,HL 


;LINK WITH 'READY' 


477E 211A47 


07640 




LD 


HL, MERGE 




4781 228C41 


07650 




LD 


(418CH) ,HL 


;LINK WITH D.B. 'MERGE' 


4784 213C47 


07660 




LD 


HL,fiSET 




4787 229B41 


07670 




LD 


(419BH) ,HL 


;LINK WITH D.B. 'RSET' 


478A 215247 


07680 




LD 


HL, TWOHAF 




478D 22A440 


07 6 90 




LD 


(40A4H) ,HL 


;LOAD NEW 'BASIC BEGIN' 


4790 CD491B 


07700 




CALL 


1B49H 


;CALL LVL II 'NEW' 


4793 C3191A 


07710 




JP 


1A19H 


;JP TO BASIC 


4752 


07720 




END TWOHAF 




00000 TOTAL 


ERRORS 
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G>lor computer owners 




Yes, thai s rignt - for as little as 
$298.00 you can add ;J2K of dynamic 
RAM, and a disk interface, to your 
TRS-80 Color Computer! If you just 
want the extra memory it's only 
$199.00, and you can add the disk 
interface later for $99.00. 

Just plug the Color Computer In- 
terface (CCI), from Exatron, into 
your expansion socket and "Hey 
Presto!" - an extra 32K of memory. No 
modifications are needed to your 
computer, so you don't void your Ra- 
dio Shack warranty, and Exatron give 
both a 30 day money-back guarantee 
and full 1 year repair warranty on 
their interface. 

The CC! also contains a 2K 
machine-language monitor, with 
which you can examine (and change) 
memory, set break-points, set memo- 
ry to a constant and block-move 
memory. 

So what about the CCI Disk Card^ 
Well as we said it's only an extra 
$99.00, but you'll probably want 
Exatron's CCDOS which is only 
$29.95 - unless you want to write your 
own operating system. The CCI Disk 



Card uses normal TRS-80 Model I 
type disk drives, and CCDOS will 
even load Model I TRSDOS disks into 
your color computer - so you can 
adapt existing TRS-80 BASIC pro- 
grams. 

As a further plus, with the optional 
ROM Backup adaptor, you can dump 
game cartridges to cassette or disk. 
Once the ROM cartridge is on cas- 
sette, or disk, you can reload, examine 
and modify the software. The ROM 
Backup adaptor is only $19.95. 

For more information, or to place an 
order, phone Exatron on their Hot 
Line 800-538 8559 (inside California 
408-737 7111), or clip the coupon. 




excellence in electronics 

exatron 




DEALER ENQUIRIES INVITED 



Exatron, >^500 

181 Commercial Street, 

Sunnyvale, CA 94086 



C Please send a y2K Color Computer 
Interface for $199.00 

n Please send a CCI Disk Card for $99.00 

n Plea.se include CCDOS and manual 

for $29.9,') 

LJ Also include a ROM Backup adaptor 
for $19.9.') 

Please add Sn.OO for shipping to all orders, 
and 6 percent sales tax in California. 

Name 

Address 

City 

State Zip 

Charge my: 

D MasterCard Interbank Code 

n Visa Kxpiration Date 

Card 

~i Check enclosed for 

nShip COD ($2.00 extra) 



Signature t- 



■:!:K ham plu* Disk Inlerful 



TRS-Sll is A Lradc 



PROGRAMMING TOOLS FOR YOUR 



INSIDE LEVEL II 

The Programmers Guide to the TRS-80 ROMS 

M^DE LEVEL W ts a comoiehensive relerence guiOe to the Level II ROMs which allows 
rhd rnachpne language or Baste programme' to easily utilize ttie sophisticated routines 
they contain Concisely e» plains setups, calling sequences, and variable passage toi 
number conversion, arithmetic operations, and matfiematical (unctions, as well as 
keyboard, tape, and viOeo toutirws Part llptesents an enlirgiy new composite program 
Struclu'e which loads under the SYSTEM cOTimand and executes in both Basic and 
machine cMewitr^ the speed andetliciency ot a compiler In addition, the 18 chapters 
include a large body ol other intormation usetui to the piogiamrnei including tape 
tormals RAM useage, telocahon o( Basic piogiams USR call eipansion, creating 
SYSTEM tapes ot your own prog'ams. mteffacfng of Basic vanables directly with 
machine code a method ot greatly increasing the speed at which data elements are 
stO'ed on tape and special precautions lot d(s*< systems (INSIDE LEVEL II is a Clearly 
organized retetence manual II is tully typeset and packed with rrathing Put useful 
inlO'mation It does not contain questions and answers. ROM dumps. Ot cartods 
INSIDE LEVEL H... J15.05 



SINGLE STEP THROUGH RAM OR ROM 

STEP60 aiows you to step Ihtojgh any Basic O' machine language program one 
instruction at a time, and seethe address, hexadecimal value, Zilog mnemonic, register 
contents, and step couni (o^each instruction The top t4l(nesof the video screen are left 
unaltered so that the largel program" may perform its display functions unobstructed 
STEPSOwiHIollow program flow right into the ROMs, and is an invaluable aid in learning 
how the ROM rou!ir:es (unction CommanOs include step (trace), disassemble, run m 
Step mode at variable step. rate, disp.ay or alter memory or CPU registers, jump to 
metnory location, execute a CALL sel Oreakpoints in RAM or ROM, write SYSTEM 
tapes, and relocate to any page m RAM The display may also be routed to your line 
prinlw through the device conlrol block so custom pnnt drivers are automatically 
supported STeP«0.....$1«.95 



TELECOMMUNICATIONS PROGRAM 

This machine language program allows reliat)ie high speed lile transfers between two 
disk-based computers over rnodems or direct wire II is menu driven and extremely 
simple to use Functions include real-time terminal rnode save RAM butter on disk, 
transmildisk (lie. receive binary files examine and moditytJART parameters, programs 
custom log -on messages, automatic t6-bil checksum verification of accurate transmis- 
sion and reception, and many more oser conveniences Supports line punters and 
lowercase characters Wilh this program you will no longer need to convert machine 
language programs to ASCII for transmission, and you will know immediately jI Ihe 
transmission was accurate TELCMI S29.9S 



PROGRAM INDEX FOR DISK BASIC 

Assemble an alphaoenzed mdex ol your em, re program library trom disk directories 
Program names and tree space are read aulomatically (need not be typed in) and may 
De alphabetized with a lasl Shell 'Metzner sort by disk or program The list may also be 
searched lor any disk, program or evtension. disks or programs added or deleted, and 
the whole nsl or any part sent lo the pnnier Finally, Ihe list itself may be stored on disk tor 
future access and update The best thing since sliced bread' (January issue Of 80 
Microcomputing) Works with TRSDOS NEWDOS and NEWDOS'80 One drive and 
32K required INDEX.... 419.9S 



4 SPEED OPTIONS FOR VOUR TRS-80 

the SK-2 clock modification allows CPU speeds to be switched between normal, an 
increase of 50%, or a 50% reduction, selectable at any time without interrupting 
eieculion or crashing the program Instructions are also given for a 100% increase 10 
3.54 MHz, though the TRS-80 is not reiiab/e at this speed The SK-2 may be configured 
dy Ihe user to change speed with a toggle switch or on software command It will 
automatically return to normal speed any lime a disk is active, requires no Change to the 
opetating system, and has provisions for adding an LED lo indicate when the computer 
IS not at normal speed It mounts inside Ihe keyboard unit wilh only 4 necessary 
connections lor the switch option (switch not included), and is easily removed if the 
computer ever needs service The SK-2 comes tuHy assembled with socketed iCs and 
illustrated instructions $K-2 S24.95 



INSTANT ASSEMBLER 

Th« INSTANT ASSEMSLER is a new, powerful tape-based editor/ assembler and 
debugger for Ihe TRS-80 Model I It features immediate detection of errors as the source 
code IS entered, assembly to memory as wen as to tape, a built-m smgie- stepping 
debugger a compactly coded source formal that uses 1,'3 as much memory as stan- 
dard source, the ability to produce relocatable code modules, and the ability to Imk-ioad 
independently written modules In addition, the INSTANT ASSEMBLER has many oper- 
ational features including single stroke entry of DEFB and DEFW, continuous editing ol 
succesive lines, alphabetic listing of symbol table, separate commands lor listing error 
lines or the symbol table, block move function, and venlication of source tapes 
INSTANT ASSEMBLER includes three separate programs The assembler itself in- 
cludes the single -stepper and debugger In this mode you may have lull register 
displays, decimal or hex entry, forward or backward memory displays, disassembly of 
obiect code m nwmory memory display in ASCII format, and hex -to-decimal or 
dec I ma I- to -hex conversion The smgle-siepper will step one instruction at a time or at a 
fast rate to any defined address During assembly you may quickly switch from assem- 
bler to debugger and back again without losmg the source code This makes INSTANT 
ASSEMBLER an eicelleni learning tool (or machine language programming Also 
included on the tape ate two versions of the linking loader which allow you to write your 
programs in smaller modules and link them togelher lor final assembly 
INSTANT ASSEMBLER occupies 8375 bytes of nwnxiry in a t6K machine this will 
leave you more than 7000 byles which is enough to wnte assembly language programs 
of around 2000 byles This makes it ideal for users with only t6K machines While Ihis 
version was written specifically lor tape systems, we will soon have a disk version as 
well The instruction manual may l>e purchased separately for S5 which will apply 
towards the purchase of Ihe INSTANT ASSEMBLER INTASM $29.95 



RAM SPOOLER AND PRINT FORMATTER 

This program IS a lull feature pnnllormatting package leaturing user delmeable line and 
page length (with line feeds inserted between words or alter punctualionj, screen 
dump, printer pause conlrol, and baud rate selection In addition, printing la done from a 
4K expandable buffer area so that the LPRINT or LLtST command returns conlrol lo the 
user while printing is being done Ideal lor Selectnc or other slow printers Allows 
printing and processing lo run concurrently Output may be directed to either the 
parallel port, serial port, or the video screen SPOOLER $18.95 



MACHINE CODE FAST FOURIER TRANSFORM 

This complete package includes 3 versions of the machine language FFTASM rouline 
assembled tor 16. 32. and 48K machines, a short sample Basic program to access 
them, a lOK Basic program which includes sophisticated interactive graphing and data 
manipuialion. and a manual ol instructions and examples The machine language 
subroutines use variables detmed by a supporting Basic program lo make data entry 
and retneval extremely tasi and easy lor custom implementation They perform 20 lo 40 
limes taster than their Basic equivalent (256 points in t2 5 seconds), and require less 
than 1550 bytes ol men-iory The FFT is useful in analyzing slock market and comodity 
trends as well as for scienliiic information. FFTASM. ...M9.9S 



DUPLICATE SYSTEM TAPES WITH CLONE 

Make duplicate copies ot any tape written for Level II They may be SYSTEM tapes or 
dataiisls Thefrlename.loadaddiess.entrvpoinl, and every byte (in ASCII format) are 
displayed on the video screen CLONE S16.95 



RAMTEST FOR LEVEL II 

This machine language program is a very thorough test for several types Of RAM errors 
A complete test ot each individual bit m a 48K machine takes just 14 seconds Includes a 
separate test for power line glitches RAMTEST... ..$9.99 



EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

Load Basic programs or any other ASCII data file into the disk version of Electnc Pencil 
for editting One commarvl trom DOS quickly modifies existing files lo Pencil format 
One disk and 32K required PENPATCH.... J9.95 



MUMFORD 

MICRO 

SYSTEMS 



OHDLKING: C- p.^r,. ■ ,]. ,! ,,■ 
;■..;■ I'l.' .I'f ! I i; .,■'! :i' . ,r, r'l 
I'i. nil ':.'[■■,! I If ini 1 ' .iiii : fi. 

■■■ IjC .|li>l 1..>")|J il'dr'r , ,1 ( ,.; t, 



'I ■■. ;ii )MI1Im(M ill ,1 'li : '('[■, ri(t A ! i' ''Mile A ■ 
.(■ f ■ S". ' > ,1 ir.l ''■■ I \y: idr'.l ,'ir -.. |,-'.| j '.k 
I ' I *ii"i ,1 'I' ilrt'i' i>l,i ir 1 1" ',[■ V. 1 M rni'i 



Box 400-E Summerland. California 93067 (805) 969-4557 
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GAME 



A game for the re fractionary. 



The Level II Black Box 



Morris Jones 

533 Sutter St. #T206 

San Francisco, CA 94102 

When I tell you i have a Black Box for 
Level II BASIC, I'm not talking about a 
piece of hardware. Black Box Is a game that 
tests your ability to find Its contents. 

Parker Brothers released Black Box last 
year as a game for two players. In their ver- 
sion, one player sets up the Black Box and 
the other plays detective. In this Level II pro- 
gram the computer sets up the Black Box 
and gives you the clues. You have the fun of 
digging into the box. Though the program 
does not keep score for two players, you 
can alternate at the keyboard and tally your 
own scores. 

If you have played the Parker Brothers 
version you will find the computer a more 
devious opponent than a real person; 
people tend to use patterns, while BASIC Is 
very random. 

This Black Box is really an eight-unit by 
eight-unit square, much like a checker or 
chess board. The program hides three, four 
or five balls, or markers, in the box, and the 
object is to locate them by probing the box 
with imaginary rays. Only three conditions 
befall a ray: It may never leave the box; It 
may exit at a different location; or It may be 
reflected back out the same way it entered. 



Imaginary Rays 

A ray can enter the box in any of 32 
places— eight squares on four sides. To 
launch a ray you must select one of the 
numbered locations. The ray advances one 
square at a time, until it leaves the box or 
hits a ball. If a ray hits a hidden ball, it will be 



absorbed. The program then marks the en- 
try point with an H. See Fig. 1. During the ac- 
tual game you cannot see the path the ray 
follows, but only where it comes out— if it 
does. 



H H 



32 
31 
H 
29 

H 

H 

26 

25 



As the ray advances, if it sees a bail that 
is ahead one square and one square to the 
left or right, it will be deflected 90 degrees 
away from the ball and leave the box at an- 
other point. (In other words, if the ball is 
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F/g. 1. Examples of hits: Two, three and seven are direct hits. Six, 19, and 28 are deflected 
hits. The program only marl(s the hit, not how the ray traveled. AA is an ordinary deflected 
ray for comparison. 
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'80" SHROUDS 




essionally 



other Models 
*LNW DEMI-CASE..$32.50 

•LNW SHROUD $27.50 

*"80" SHROUD $24.50 

Add $2.50 shipping & handling 
N. Y.S. residents add 7% sates tax 

^358 

SYRACUSE R&D CENTER 

Box 125, Dewitt, N.Y. 13214 

"Specializing In Electronic Packaging" 



TRS-80 ■ SOFTWARE 

For The Model I G Model III Computers 

MACHINE LANGUAGE 
SOFTWARE 

MONITOR ff3 $39.95 

Disassembler, memory displays, memory 
move, search verify, and modify, read and 
write obiecl lapes. hexadecimal arithmetic, 
otiject code relocator. unload programs for 
disk. symt)Qlic output tapes, ■11-page in- 
struction manual 

MONITOR »4 $49.95 

Same as Monitor #3 but adds save and read 
disk files, direcl input and output ot disk 
sectors, send, receive, oi talk to another 
computer via RS-232-C interface, symbolic 
disassembly on disk 

SMART TERMINAL $69.95 

Enables your TRS-80 to be used as a remote 
terminal to a time-shanny syslem Supports 
lowercase and lull range of control keys 
Automatic transmission between memory 
and bost computer Much more 

FASTSORT $9.95 

Mactime-language sorting program for use 
by Basic programs Many limes taster than 
other methods' 

BASIC SOFTWARE 

MAILING LIST $69.95 

Maintains mailing list tiles of over 1001) 
names per diskeite Add. delete, change, 
find name, machine language soM, print die 
SMALL BUSINESS 

ACCOUNTING $49.95 

Based on Dome Bookkeeping Journal ft6l2, 
keeps track ot income, enpenditmes. and 
payroll tor a small business of up to 16 
employees Daily, monthly, year-lo-date 



14 Lexmgton Road, New Ctly, N.Y. 10956 

' TRS-80 13 a registered trademark ol Tandy Corp ^loa 



"You will find the computer 
a more devious opponent 
than a real person." 



ahead left, the ray will turn right.) The pro- 
gram then marks the entry anid exit points 
with two double letters. The first deflection 
will be marked AA at both entry and exit, the 
second, BB, and so forth. 

A ray can be deflected several times be- 
fore it leaves the box, or it may be deflected 
to land on a hit, in which case the program 
simply marks H without telling you that the 
ray was first deflected. The ray can also 
travel straight through to the opposite side 
without being deflected at all. See Fig. 2 for 
examples of deflections. Fig. 1 also shows 



B(B,8) l^ldden ball array 

G(B,8) guess array 

N1(32) array of edge marker strings 

N2(16) sets ot double letters to use as markers 

VI video address 

SC score 

C "instriictions in progress" (lag 

IM Index for N2, N2{IM) Is next marker to use 

XI entry point for ray 

X2 exit point for ray 

E direction vector 



Table 1. Important Variables 



some deflected hits. 

Now consider the special case in which a 
ray finds a ball ahead to the left and right. 
The ray can be deflected neither left nor 
right, and, instead, is reflected back toward 
the entry square. The ray exits from the 
same point It entered, and the program 
marks the point with an R. 

One other special case causes a reflec- 
tion. If the entry point you choose Is directly 
to the left or right of a ball hidden on the 
edge, the ray will never have a chance to 
enter the board and be deflected, thus It Is 
marked as a reflection. Examples of this 
special case and other reflections are Illus- 
trated In Fig. 3. 

Stop and Score 

The initial instructions give animated de- 
scriptions of what happens to a ray when it 
enters the box. During the game launch as 
many rays as you like, place guess bails, or 
remove them as often as you need to before 
you stop and score. 

When you place a guess ball, the com- 
puter puts a graphic marker on your guess 
square. This is useful as a reference while 
you check your board. If you find that the 
ball is in the wrong place, remove it and 
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F/g. 2. Examples of deflected rays with markers at entry and exit. Notice that if you swap 
the entry point with the exit point, you achieve the same result— a deflection path will al- 
ways produce one and only one pair of markers. 



218 • 80 Microcomputing, July 1981 



"Breaking the program 

during execution allows you 

to checl< for bugs, restart 

and draw the board again." 



place it somewhere else. The program will 
not teil you whether a guess is right or 
wrong until you finaliy stop and score. 

Your score is the numlser of iettered 
markers used. The object Is to solve the 
Black Box using as few markers as pos- 
sible. A hit or reflection scores one point, 
and a deflection scores two, but reveals 
more about the board. A wrong guess at the 
end of the game adds a penalty of five 
points. 

A game with three balls is very simple. 
However, a game with five balls is consider- 
ably more difficult. When playing with five 
balls, it Is possible to create an ambiguity, 
that Is, one of the balls may be Impossible 
to locate from the edges, though this rarely 
happens with random layouts. 

The program takes full advantage of Lev- 
el II features and is designed to be relatively 
crash proof. If the screen becomes filled 
with garbage, you can redraw the board. 
Breaking the program during execution 
allows you to check for bugs, restart and 
draw the board again. All of the Input Is 
done through INKEYS routines and most re- 
sponses do not require the Enter key. 

Give Black Box a try next time you get 
tired of Swords and Sorcerers. It's a good 



R 



solitaire game. 

Program Notes 

Black Box is one of my first programs. 
Though it's been refined and play-tested, 
I'm sure I still have things to learn about ef- 
ficient programming. In particular, the ray 
movement logic (lines 2000-2340) seems too 
clumsy . The routine works beautifully, but 
if you find suggestions to reduce those 
if. . .Then statements, I would enjoy hear- 
ing from you. 

For newer programmers, the many lines 
that state: IF E = 1 IF 8=2 IF VV08. . . 
etc., are not mistakes. The various condi- 
tions can be grouped together with "and" 
operators, but then BASIC will have to eval- 
uate the entire expression before evalua- 
ting the If statement. I felt that the program 
would run a little faster if, after evaluating 
the first expression and finding it false, it 
need not evaluate the rest. 

Here Is a description of the major rou- 
tines of the program: 

Lines 10-110 initialize the program and 
set up the variables. 

Lines 500-660 display the board for the 
first time and hide the balls. Line 610 Is the 
entry point for each move. 
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Fig. 3. Examples of reflections: Four and six reflect because of the ball on the edge (five 
would be a hit). Fourteer) is a straightforward spell out reflectior), and 31 is a deflected re- 
flection. For comparison, AA and BB are ordinary deflected rays. 

■•Sse List of AOvertiaara on page 306 



NEW PROGRAMS 
FOR THE TRS-80 

incopROP 

Income Properly Analysis 
for the TRS-80 

INCOPROP: Based upon siandaidi^ed melhods 
ol properly iinalv5is used Ihrougtioul the real 
estate induslry Generales a 3 page (epoti contain- 
ing an annual properly operating siatemeni and a 
comprehensive 10 year cash tlow analysis Con- 
lams IRS tan table lo proiecl attertax income 
stream and investors I R R 

• HandlesSdrHe^ent mei(>o05 cj' lai Oepreciaiion 

• Haridlesuplo Sloans 4 3 d'lle'eni type loans 

• Higtilj intBraclnelornialpeimils Sensidnly i>nd(yBi5 

• Dish 'ilescrealed lor perma^enl sloragearoala 
Minimuin system requiremenls 3?h RAM 1 drue anO 
prmier Sold witri intDirnaiive 78 page uaei s manual cover 
ing basic aspects ot income p'Operly invi 
aala Morkslieets 
i.*oaoi I S 111 on casselie loi easy iransiei 

10 disk 
l^txtei II onemciiaiskeite 

Model II Version ovaiiaule in MSASIC 

, running under CPil^ 

MAiNDEX: An easy-lo use program to aiO you in 
the indexing ol your tiles on disk Can't find ttial 
program you wrote last month' Put your computer 
to work I Find any program or data file in your sys 
tem in seconds 

• AMainlnaexolallyouroineraisli s directories 

' Alpliabetizes Irsi ol tiles and gives you names, grans 
used, dales wriiien tracvs and tile descriptions 

• Sorts Files by name dish and categories 

• File Oesciiptions can cp sea'ctiM 'oi hey words 
■ Punts Oish labels wiEti dish narr^eand liie names 

• uses all ine adyancsd sna e«liemely lasi iiie mampu 
laiiQti capabilities olAccarai Int sNEmDOS'SP 

Hequties Level II 48X. t dish drr.c and NEWDOSfBO on 
cassette lot easy ir^nstec to disk S20 9^ 

VISA' , iHkwtwCam 



nt S 50 



ilc^OO 




DEPT EM, PO BOX &91,NOVATO. CA 94947 



Welcome to . . . 

THE RACES 




THEY'RE OFF! 



Eight horses surge down the track, straining tor 
Ifie lead, *ith your horse struggling in the pack 

They round the tutn and head inio the stretch 
Your horse shoots Irom behind, catching the lead 
horse They cross the tinish line. 

The Win. Place, and Show horse results arc 
printed on the screen, along with each bettor s 
race winnings and total daily winnings 

You collect your winnings and decide if yoij want 
|ust to watch, or bet on trie next race, you study 
the Odds, place your bets and select the ItacK 
Speed — fast (dry), aveiage. or slow iweti 

The liorses ate at the starting gate jumping and 
snorting YOu raise the gale, and the next race is 
underway 

Each horse gallops forward randomly Spectators 
sqjiirn and shoul as they urge then horses to win 

YOU have all Ide track action and Ihnlls Plenty ot 
winners — and losers' Now you can use youi com 
puter 10 tind Out whal it lakes to wn al the track 
Good Luck' 

Send check, ot charge il to Visa 
ot MC. (Print charge number and 
expiration dale — Pfione 313-627 
2877 fot charge if you wishj 
WE GIVE IMMEDIATE SERVICE' 

ECHO PRODUCTS INC . 335 MILL ORTONVILLE 
MICH. 48462 
Dealer inquires Invited t^ 197 



Requires 16K 
Tape — 19.95 
Disk — $14,95 
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SSI HHGn^gtPC SCFIWRE UBUBY 



STKOW- The praitaBi that sets the standard in 

Btruetural enginaerinq softimre foe the Mcdel I, 

new available to Hrdel II owners. 

Model I, MK, l-disit D S49.95 

Mc del II, 6<K D S79.95 

SKTim PBCPHITUB- JUmther fopular etqlnoering 
prngram, nc*i available fca- the Model II. 

Hadel I, 16K. L-II T S14.95 D Sn.« 

Mcdel II D SZ9.95 

Podcet CarpatBi T S9.95 

mn MK- Let the KEKET CCWVTEB help jmu learn 

engineering math progrann, high school thru gr«l 
school ana P.E. Taken from Schaum Outline 
Series. 

Lines ana Points r S14.95 

G«ieral BfjjationB Pak r S14.95 

Alao for >tdel I, L-II r S19.95/ea. 

Mt-W PRmm- Bi-directional, upper b lower case. & 

disposable print head. A high quality printer 

at a very reasonable price. 3599.00 

C ABI£ ~ 535.00 

lOCRBX DlsranSS S l/*' Double Daaity 529.95 

8' ftiubla Deralty S39.95 

^403 




MISSOURI RESIDENTS 

PLEASE ADD 

'iji^ STATE SALES rs» 



MEMOREX 

DISKETTES 
& CARTRIDGES 

for your computer or word processor 

BUY THE BEST FOR LESS, 
Lowest prices. WE WILL NOT 
BE UNDERSOLD!! Buy any 

quantity. Call free (800) 235- 
4137 for prices and information 




RUN BIG 
CPM* 

PROGRAMS 

ON YOUR 
MODEL 1 TRS-80* 

WITH 39 Of 54K ot userspace.Can use Mixed 
Drivers S'A or 8'' (Variable Tracks) 
Compalable with all TRS'80 Operating 
Systems and all THS'SO Programs.(usable 
on 48K disk systems only) Boards tit into 
keyboard inclosure. 

FREEDOM OPTION $245 

MEMORY EXPANSION OPTION. . . . $295 
Sand Chack or Monay Ordar to: 

(HASS "ESIOENIS. 'LEASE I NCLUDE SK TAX) 

■ •C*\tf« ltd. ^<4i 

P.O.Boia3S8 •Weburn. MA. 01888 
(617) 944-8329 H::*>:'~.H^. . 



"The final display 

of the board shows where 

the program hid the balls/' 



Lines 1000-1260 make up the stop and 
score routine. The routine first checks to 
see if you have made the right number of 
guesses and returns to the menu if you 
haven't, it then checks the guess array 
against the ball array and scores discrep- 
ancies. Lines 1050-1210 show graphically 
where wrong guesses and correct locations 
are. The final display of the board shows 
where the program hid the balls. 

Lines 2000-2340 provide the move logic 
for the rays. Variable C Is a flag, telling if the 
program is in the instruction sequence, if 
so, the ray movement is displayed. This can 
be useful for debugging the ray movement 
logic. 

Lines 3000-3040 place a guess in the 
guess array. 



Lines 4000-4040 remove a guess from the 
guess array. 

Lines 5000-5020 redraw the board. 

Lines 6000-6080 are used by the routines 
at 3000 and 4000. The routine displays the 
coordinate markers, accepts the input, and 
sets the values for the array subscripts in 
order to place or remove a guess ball. 

Lines 7000-7070 complete the ray move- 
ment logic by setting or changing the val- 
ues for the edge markers and printing them 
around the box. 

Lines 8000-8420 are the instructions. 
With variable C set equal to - 1 , the instruc- 
tions go back through the program and dis- 
play graphically what happens to rays as 
they go through the box using an 
example. ■ 



Program Listing 

10 CLS 

20 CLEAR200 

30 DIM N1$(32),B%(8,8),N2S(16),G%(8,8),N3${16) 

40 DEFSTRN,Y:DEPINTA-M,0-X,Z 

50 VI=15360:SC=0:IM-1:W=0 

55 FORI=1TO8:FORJ=1TO8:B(I,J}=0!G(I,J)=0:NEXTJ,I 

60 F0RI=1T032:N1(I)=RIGHTS(STRS(I} ,2) :NEXT 

70 FORI=lT07:M2(I}=STRINGS(2,CHR${64+I))!NEXT:FORl=8T016:N2(I)=S 

TRING$C2,CHR$t6 5+I)):NEXT 

80 FORI=lT08:N3(I)=STR$(I)iNEXT:FORI*9T016:N3(I)-CaR$(56+I)+" ": 
NEXT 

85 IFCTHEN110 

90 CLS: PRINT: PRINT-BLACK BOX VERSION 2 , 0" : PRINT"BY MORRIS JONES" 

:PRINT:PRINT"DO YOU NEED INSTRUCTIONS? "; 

95 Y=INKEY$:IFY=""THEN95 

100 PRINTY;:FORI=1TQ200:NEXT:IPY="Y"THENC=-1:GOTO8000:ELSEIFY<>" 
N"PRINTCHR${08) ; :GOT095 
110 C=0:CLS 

500 FORW=lT08:FORHV=lT08!D=VI+65+64*W+3*HV: POKED, 143 :P0KED+1,1 
43:NEXTHV,W 

510 F0RI=1T08:PRINT@65+3*I,N1{I};:NEXT 

520 FORI=9T016:PRINT@156+64*(I-9} ,N1(I) jsNBXT 

530 FORI=17T024:PRINT@665-3*(I-17) ,Nl(r) rsREXT 

540 FORI-25T032:PRINT@577-64*(I-25),Nl$(I); jNEXT 

550 PRINTe99,"CH00SE:";:PRINT@163, "DEGREE OF DIFFICULTY, ";: PRINT 

@227, "NUMBER OP BALLS (3-5)?"; 

560 H=VAL(INKEYS) : IFH<3ORH>5THEN560ELSEPRINT@250 ,Hf 

570 P0RI=1T0H 

580 HV=RND(8) :W=RND(8) 

590 IFB(HV,W)THEN580ELSEB(HV,W)=-1:NEXT 

600 FOR1=1TO700:NEXT 

610 GOSUB8410 

620 PRINT@99,"CHOOSE:";:PRINT@163,"l) STOP AND SCORE" ;: PR1NT@227 

,"2) LAUNCH RAY";:PRINT§291,"3) PLACE BALL GUESS"j 

630 PRINT@335,"4) REMOVE BALL GUESS"; : PRINTe419 , "5) REDRAW BOX"; 

!PRINT@773,' POINTS USED:";SC; 

640 PRINT@803,STRING$(34," ") :PRINT@803, "CHOICE?" ; 

650 X0=VAL(INKEYS) : IFX0<1ORX0>5THEN650ELSEPRINTX0; : FORI=1TO200 :N 
EXT 

660 ONX0GOTO1000, 2000,300 0,4000,5000 

1000 FORI=1T08:FORJ=1T08:IFG(I,J)THENW=W+1:NEXTJ,IELSENEXTJ,I 

1010 IFW>HPRINT§803,"TOO MANY GUESSES" ; :W=0 : FORI=1TO700 :NEXT:GOT 

0610 

1020 IFW<HPRINT@803,"NOT ENOUGH GUESSES" : :W-0 :FORI=lTO700 :NEXT-G 

OTO610 

1025 GOSUB8410:GI=-1 

1030 FORI=1T08 :F0RJ=1T08 

1040 IFG(I,J)ANDNOTB(I,J}TaEND=VI+65+64*I+3*J:GI=0:ELSE1140 

1050 PRINTe803,STRINGS(29," "); :PRINT@fi03, "WRONG GUESS"; 

Program continues 
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***** ******************* ****^^** **** * * * ************** 

4MHZ, DOUBLE DENSITY,COLOR&B/W 
GRAPHICS . .THE LNW80 COMPUTER 



COHPARE THE FEATURES AND PERFORMANCE 




yuen you've canpared the features of an LNW80 Computer, you'll qiiickly 
understand why the LMW80 is the ultimate TRS80 software compatible system. 
LNM RESEARCH offers the most complete microcomputer system at an outstand- 
ing loM price, . ,„ 
We back up our product with an unconventional 6 month warranty ano a lu 
days full refund policy, less shipping charges, 

LNW80 Computer Sl,«50.00 

LPiwaO Computer w/BW Monitor- i one 5" Drive S1,9H.00 

All orders must be prepaid. CA residents please include 61 sales tai. 
contact us for shipping charges 

' TRS80 Product of Tandy Corporation, 

" PMC Product of Personal Microcomputer, Inc. 



FEATURES 




LNH80 


PMC- BO" 


IRS- 30* 
MODEL III 


PROCESSOR 




4.0 MHZ 


1.8 MHZ 


2.0 MMI 


LEVEL 11 BASIC INTERP. 




YES 


YES 


LEVEL III 
BASIC 


TRS80 HODEL 1 LEVEL 11 COMPATIBLE 


l^S 


YES 


NO 


4BK BYTES HW 




TES 


YES 


YES 


CASSETTE BAUD RATE 




500/1000 


600 


500/1 SOO 


FLOPPY DISK CONTROLLER 




SINGLE/ 
DOUBLE 


SINGLE 


SINGLE/ 

MueiE 


SERIAL fiS23J PORT 




YES 


YES 


YES 


PRINTER PORT 




YES 


VES 


VES 


HEAL TIME CLOCK 




VES 


VES 


TES 


24 X BO CHARACTERS 




, YES 


MO 


NO 


VIDEO MONITOR 




YES 


YES 


VES 


UPPER AND LOWER CASE 




YES 


OPTIOKAL 


YES 


REVERSE VIDEO 




YES 


NO 


HO 


KEYBOARD 




63 KEY 


53 KEY 


53 KEY 


NUMERIC KEY PAD 




YES 


NO 


YES 


B/W GRAPHICS. 128 X 48 




YES 


YES 


YES 


HI-RESOLUTION B/W GRAPHICS, 


480 X 192 


YES 


NO 


NO 


HI-RESOLUTION COLOR GRAPHICS 
128 X 192 IN 8 COLORS 


(NTSC), 


YES 


NO 


NO 


Hl-RESOLUTION COLOR GRAPHICS (RGB). 
384 X 192 IN 8 COLORS 


OPTIONAL 


NO 


NO 


WARRANTY 




6 MONTHS 


90 DAYS 


90 DAY^ 


TOTAL SYSTEM PRICE 




$1 ,914.00 


S1,840.00 


t2,187.00 


LESS MONITOR AND DISK DRIVE 




S1 ,450.00 


$1,375.00 


... 



LNW80 

. BARE PRINTED CIRCUIT BOARD i MANUAL 189.95 

The LNWBO - A high-speed color computer totally compatible with 
the TRS-80*. The LNW80 gives you the edge in satisfying your 
computation needs in business, scientific and personal conputa- 
tion. With performance of 4 MHz, Z8DA CPU, you'll achieve per- 
fonnance of over twice the processing speed of a TRS-80*. This 
means you'll get the performance that is comparable to the most 
expensive microcomputer with the compatibility to the world's 
most popular computer (TRS-80*) resulting 1r the widest soft- 
ware base. 

FEATURES: 

. TRS-80 Model 1 Level II Software Compatible 
. High Resolution Graphics 

. RGB Output - 384 X 192 In 8 Colors 
. NTSC Video or RF HOD - 128 x 192 in 8 Colors 
. Black and White - 480 x 192 
4 MHi CPU 

500/1000 Baud Cassette 
Upper and Lower Case 
16K Bytes RAM, 12K Bytes ROM 
Solder Masked and Silkscreened 



LNW SYSTEM EXPANSION 

BARE PRINTED CIRCUIT BOARD 

AND MANUAL $69.95 

WITH GOLD CONNECTORS $84.95 

The System Expansion will allow you to expand your LNW80. TRS-80' 
or PHC-80" to a coimlete computer systa" that is still totally 
software conpatlble with the TRS-EO* Model 1 Level II. 



LNDoubler&DOS PLUS 3.3D 

- Assembled and Tested w/DOS plus 3.3d 5175.00 

Double-density disk storage for the LNW Research's "SysteoiEipan- 
sion" or the Tandy's "Expansion Interface". The LNOoubler™ is 
totally software conpatlble with any double density software 
generated for the Percom's Doubler***. The LNDoublerTM provides 
the following outstanding features. 

Store up to 350K bytes on a single 5" disk 
Single and double density data separation 
. Pretlslon write precompensatlon circuit 
. Software switch between single and double density 
. Easy plug in Installation requiring no etch cuts, jumpers 
or soldering 
35, 40, 77, 80 track 5" disk operation 
120 day parts and labor Warranty 

5 
*** Doubler is a product of Percom Data Company, Inc. ; 

DOS PLUS 3. 3D 

Micro Systems software's double density disk operating system. 
This operating system contains all the outstanding features of 
a well developed BOS, with ease in useability. 

KEYBOARD 

LNWBO KEYBOARD KIT . $84.95 

The Keyboard Kit contains a 63 key plus a 10 key, P.C. board, and 
remaining coinponents. 



CASE 



32K Bytes Memory 

5" Floppy Controller 

Serial RS232 20ma I/O 

Parallel Printer 

Real Time Clock 

Screen Printer Bus 

On Board Power Supply 

Solder Masked and Silkscreened 



LNW RESEARCH 

C OR PORA T ION 
2620 WALNUT 
TUSTIN CA. 92680 ^sz 

ORDERSAINFO. NO. 714-544-5744 
SERVICE N& 714-641 -8830 



LNM80 CASE $84.95 

The streamline design of this metal case w111 house the LNW80. 
LWN System Expansion. LHW80 Keyboard, power supply and fan. 
LNDoublerTM, or LNW Data Separator. This kit includes all the 
hardware to mount all of the above. Add $12.00 foe shipping 

PARTS AVAILABLE FROM LNW RESERARCH 
. 4116 - 200ns RAM 

6 chip set $26.00 

B Chip set $33.50 

16 chip set $64.00 

24 chip set J9*-00 

32 chip set $124.00 

LMWSO "Start up parts set" LNW80-1 J82.00 

LNWBO "Video parts set" LNH80-2 $31.00 

LNWBO Transfomwr LNW80-3 $18.00 

LNWBO Keyboard cable LNWeO-4 $16.00 

40 Pin computer to expansion cable $15.00 

System Expansion Transformer S19.00 

Floppy Controller (FD1771) and UART (TR1602) . - . $30.00 



VISA MASTER CHARGE 
ACCEPTED 



UNLESS MOTED 

ADO S3 FOR SHIPPING 



I » 



JOY-6 



THE ULTIMATE JOYSTICK INTERFACE 
FOR YOUR TRS-80* 



Oon't be letl oul The best action and siirmlnlion games re 
quire smoolh, clean, ffter tree loyslicli control Thats what 
you gel if/ith JOY-6, and mote' 

■ 2 pyslirts with pusnbuttons tor lasl aclion 

■ Souno elfecis caoabiipiy Greai (or space games 

■ Simple sotlwaie COnlior - write your own programs 
• Wanua/ — scherrialic ttieory ot opera lion solTivaFe 

■ 2 additional A 10 D cnannels tor game paOdles sensors 
PLUS: Joypak- 1 -A 16"* Li cassene wiin gfasci'iaiing nemgames 
- SOLO, FRENZY, WIPEOUT, DOODLE. ENDPLAV aia 
BLCX^KADE - an acrioi ariO siralegy game ivpin 9 levels o( difi 
cuiry Try to break tnrougJi your opponent s Oefenses Bui waic^ out' 
While the enemy 15 reDuiidmg his bioc«aae nes destroying yours' 
Games car lasI lor seconds 01 riour^ 



SPECMl. HrmOOUCTIMT OffOtl 

ISSfUHil-i) 'fSFEO HfADI ro cia. 
CDWPiirj. «T ONLv S84.95 



1 'Mt ABOVE PLUS POWtR SWPPl ' 

>».i - $99.95 

OUALITV GUARAHTEED 



; systems INC. 

I ?« PAftX LAHe 

I KINCjO* P«uS5l> P* IMC« 



PHONE ORDERS WELCOME 
215-337-3876 

Coo CNEC" UO UC VIS* 



TOS 



'vmCnUi 







AVAHABLE- For modaU t, II, and III oi well 
at ony itandord 12 inch monitor 

I 1-a C70C /Add il [>0 Is. ihaa.r^I hoiWIng nl C^.lsna] 

LIST ^/ £f \r*i,d«APt odd 61 m1«i <s> ' 



ORDER NOW 

»4 HOUl — 
PH 40a-t4*-l3M 



FEATURES: 

D*««««f« flan 



J\/C *U0»O- VIDEO 

/W iZD '^i"® SYSTEMS 

3415 AwtiNnnvaU Dr. San iata, CA, *SI33 



SIEMENS 
DISK DRIVES 

5V4" flippy wfth case and power supply 
Ons Drive $ 3SO 

Two Drive S B&O 

Three Drive S 900 

Four Drive S11S5 

8" with case and power supply. 

Dne Drive $ 489 

Two Drive S 940 

Three Drive S1400 

Four Drive SIBBO 

COMPUTER BALES & SERVICE 

b8l9 Camp Bowie Blvd 
Fori Wo.-m TX 76107 

817-731-7412 ^36 



1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1255 
1260 
2000 
NU";; 



F0RL=1T05 

POKED, 143 :P0KED+1, 143 :FORK=1TO250:NEXT 

POKED, 133 : POKED+1, 138 : FORK=1TO250 : NEXT 

NEXTL 

POKED, 14 3: POKED+1, 143 :SC=SC+5 
PRINT@773, "POINTS USED:";SC; 
NEXTJ,I 
GOTO1220 

IFB(I,J)ANDNOTG{I,J)THEND=VI+65+64*I+3*JELSE1210 
PRINT@8B3,STRING${29," ");: PRINT@803 , "CORRECT LOCATION"; 
F0RL=1T05 

POKED,133: POKED+1, 138 :FORK=1TO250:NEXT 
POKED, 143: POKED+1, 143 :FORK=1TO250: NEXT 
NEXT 

POKED, 133: POKED+1, 13 8 
NEXTJ,I 

GOSUB8410:IFGXPRINT@739,"ALL CORRECT"; 
PRINT@80 3,"PLAY AGAIN? "; 
Y0=rNKEYS:IFY0=""THEN1240 
IFY0="N"THENPRINTY0:END 

IFY0<>"y"THEN1240:ELSEPRINTY0;:PORI=lTO200:NEXT 

CLS:C=-1:GOTO50 

GOSUB8410:PRINT@99, -LAUNCH RAY" ; : PRINT@227 , "0 RETURNS TO ME 
PRINTg803,STRING$(28," ") :PRINT@803, "CHOOSE VECTOR (01-32)? 

2010 Y0=INKEYS:IFY0=""THEN2010ELSEIFASC(Y0)>47ANDASC(Y0)<58PRINT 
Y0;:ELSE2010 

2015 Y1=INKEY$:IFY1=""THEN2015ELSEIFY1=CHRS(08)PRINTY1;:GOTO2010 

ELSEIFASC(Yl)=13THENyi="":GOTO2025:ELSEIFASC(Yl)>47ANDASC(yi)<58 

PRINTY1;ELSE2015 

2020 Y=INKEY$:IFY=""THEN2020ELSEIFY=CHR${08)PRINTY;:GOTO2015 

2025 X1=VAL(Y0+Y1) : IFX1=0THEN610ELSEIFX1>32THEN2000 

2030 1FX1<9THENE=1:HV=1:W=X1:GOTO2070 

2040 IFX1<17ANDX1>8THENE=2:HV=X1-8:W=8:GOTO207 

205 IFX1<25ANDX1>16THENE=3:HV=8:W=-X1+25:GOTO207 

2060 E=4:HV=-X1+33:W=1 

2070 IFB(HV,\rv)THEN7010 

2080 rFE=lORE=3IFW<>lIFB(HV,W-l)THEN7000 

2090 IFE=1ORE = 3IFW<>8IFB(HV,W+1)THEN700 

2100 IFE=2ORE = 4IFHV<>1IFBCHV-1,W)THEN7 00 

2110 IFE=2ORE = 4IFHV<>8IFB{HV+1,W)THEN7000 

2120 IFCTHEND=VI+65+64*HV+3*W: POKED, 133: POKED+1, 138 :FORI=1TO100 

: NEXT: POKED ,143: POKED+1 , 143 

213 IFE=1IFHV=8THEN229 0ELSEIFB{HV+1,W)THEN7010 

2140 IFE=2lFW=lTHEN2290ELSEIFB(HV,W-l)THEN7010 

215 IFE=3IFHV=1THEN2290ELSEIFB(HV-1,W)THEN7010 

2160 IFE=4IFW=8THEN2290ELSEIFB(HV,W+1)THEN7010 

217 IFE=1IFW<>1IFB(HV+1,W-1)THENE=4:GOTO2120 

2180 IFE=lIFW<>aiFB(HV+l,W+l)THENE=2:GOTO2120 

2190 IFE=2IFHV<>1IFB(HV-1,VV-1)THENE=1:GOTO2120 

2 200 IFE=2IFHV<>8IFB(HV+1,W-1)THENE=3:GOTO2120 

2210 IFE=3IFW<>1IFB{HV-1,W-1)THENE=4:GOTO2120 

2220 IFE=31FW<>8IFB(HV-1,W+1)THENE=2:GOTO2120 

2230 IFE=4IFHV<>1IFB(HV-1,W+1)THENE=1:GOTO2120 

224 IFE=4IFHV<>8IFB(HV+1,W+1)THENE=3:GOTO2120 

2250 IFE=1THENHV=HV+1:GOTO2120 

2260 IFE=2THENW=W-1:GOTO2120 

2270 IFE=3THENHV=HV-1:GOTO2120 

2280 W=W+1:GOTO2120 

2290 IFE=1THENX2 = 25-W:GOTO2330 

2300 IFE=2THENX2=33-HV:GOTO2330 

2310 IFE=3THENX2=W:GOTO2330 

2320 X2=8+HV 

2330 IFX2=X1THEN7000 

2340 N1{X1)=N2{IM) :N1 (X2) =N2 (IM) : SC=SC+2 : IM=IM+1 :GOTO7020 

3000 GOSUB841fl 

3010 PRINT@99, "PLACE A GUESS BALL" ; : PRINT@227 , "0 RETURNS TO MENU 

";:GOSUB6000 

3020 G{HG,VG)=-l:D=VI+65+64*HG+3*VG 

3030 POKED, 133:POKED+l, 138 

3040 GOTO7020 

4000 GOSUB8410 

4010 PRINT@99, "REMOVE GUESS BALL" ; : PRINT@227 , "0 RETURNS TO MENU" 

;:GOSUB6000 

40 20 G(HG,VG)=0:D=VI+65+64*HG+3*VG 

4030 POKED, 143:POKED+l, 143 

4040 GOTO7020 

5000 CLS : FORI=lT08!FORJ=lT08:D=VI+65+64* 1+3 *j! POKED, 14 3: POKED+1, 
143:NEXTJ,I 

5010 FORI=lT08:FORJ=lT08:IFG(I,J)THEND=VI+65+64*I+3*J:POKED,133: 

POKED+1, 138 :NEXTJ, I :ELSENEXTJ, I 

5020 GOTO7020 

6000 FORI=lT08:PRINT@l+3*I,I;:PRINTg94+I*64," ";CHR${6 4+1) ;:NEXT 

6030 PRINT@803, "ENTER GUESS (EX: E6)? " ; 

6035 Y0=lNKEYS:IFY0=""THEN6035ELSEIFY'fl="0"THENPRINTY0;:FORI=lTO2 

Program continues 
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RS-232 Printer Driver 
Versortltity 

V*i 'n/ea^'iOl''^ ona looDi© ^ J J2 c '■ 
or-vp'tfio'corDeset ^(COioretvCpf^'Te-i 

• lises ~^e r,* *!)■ 'JS 232 C txxxa Afe- ooo 

Vcr-, it.)i:iTt}k":,<jxi -.x)! '.•'a 3'e ctjoiKiye 

' "■age iije No'"*'*?' <>' f;'i'"'i.'cJ unes pei i'ctj> 

• V.-T^je' cji ctxjrot.ie's oef rifie ;coT.ooe 

• rArrOei of •>! n "c -^eo oTef o ^uriooe 

• 'oQo' tcTfi sfiiec' 'fcrnloetj o -r.jffioe '« 
(eeos, 

• Priicesj » G^.,'Tt Of haoayx*e ;.v©i/-o; 

• nsQi' a 'i-"© 'eeo lU^'; aftef a conoge feiv/r 

• Concert ow« cose c»<i(act9's'cuc<»(W3M> 

cx*oc'e's ;ves/no; 



>^493 



-12 jh Kilt- "to«] i^'R J^ 



'TRS-90 3 o feo«iwed Hode-nort or f^e lonav Con 




ARE YOU 
PUZZLED BY THE 
USED COMPUTER 

MARKET? 

Our unique, nationwide listing 

service puts buyers and sellers 

of used micro-equipment 

together. 

Listings from S3O0 — $25,000 

(ADDles, TRSao IBM -iioc s Tciucleai 

YOU PAY ONLY 
FOR RESULTS! 

We also offer for S6 75 the 

USED MICRO-TRENDS REPORT 

Data on: 

Manufacturers • Models • Prices 

Trends • Maintenance 

call toll-free 

USED COMPUTER 
EXCHKHeE ... 

(800) 527-9191 ext. 61 




TOTAL 

DISKETTE 

BACKUP 



[^ 






DO NOT TAKE UNNECESSARY RISKS 
WITH YOUR SOFTWARE, 

If your d 5ke;ie software liLiiary ,i nol com- 
pietelv Ijackeil up. mail the order Oelow im- 
mediaielv' O', i' voii are wasting ttislietiei by 
making backup copies of all yotii diskeltet, 
yout piobJem It solned' Uiing DUMPLOAD. 
the total contents ot your diikettes can be 
wfely durriped to tape. The hi-speed tape op- 
tion allows 5IH 35 or 40 ttack djjkettei lo fit 
on one C60 caselte. This macfime language 
utility will pay 'or itself the first time one of 
your valuable proqiams will not loscf 

• TRS-80 Mooel 1 16K-48K 

■ TRSDOSor NEWDOS80 Compatible 

■ May be used to back up TRSDOS VTOS 
4 0, NEWDOS, MICRODOS. or data 
tliski (Sirigle Deniityl 

• Tape vent canon routine included 

• Single drme owners are no longer 'equired 
to keep switching diskettes to create a 
backup. 

• Backup without having to remembef 
Master giasswords 



VES' RUSH ME MY COPY OF DUMPLOAD 

IMMEDIATEtY 



Si 5.95 ON MY CAREFULLY PACKED 
TRSDOS OR NEWDOS80 
DISKETTE ENCLOSED (pnoniy service) 



--$16 96 on Casetie — SI 9. 95 on Oiskeite 

Name 

Address 

C 1, 



-State- 



Z'P 



MAIL TO: 

COMPLETE COMPUTER SERVICES .<9S 

8188 HEATHER DRIVE 

NEWBUHGH. INDIANA 4/630 





Radio /haek 



DEALER 




TRS-80 DISCOUNT 



^ NO OUT-OF-STATE TAX 
D NO SHIPPING COSTS 



"s^o$3500 



MODEL II 64K 



PACKS ENOUGH DATA HANDLING POWER FOR 
MANY bMALL BUSINESSES 




TRS-80 MODEL III 

32K-2 DISKS 

»2100 

NEW PERSONAL COMPUTER 
REAL-TIME CLOCK, SHARPER 
CRT IMAGES AND FASTER 
LOADING CASSETTES 



CERTIFIED CHECKS 
CASHIERS CHECKS 
OR CREDIT CARDS 




TRS-80 COLOR 

COMPUTER OR VIDEO 



$339 



each 



A LOW COST COLOR COMPUTER FOR PERSONAL BUSINESS OR ENTERTAINMENT 



-496 



-See List ol Adverlise's on pag» 30S 



PERRY OIL & GAS INC. 

137 NORTH MAIN STREET, PERRY, MICH. 48872 

PHONE (517) 625-4161 

WARRANTIES HONORED BY ALL RADIO SHACKS • 'TM, TANDY CORP. 
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"TRS80 color 

From the January 1981 issue o1 the CSRA Compuler 
Club newsleltgr: 

There was some amusement al the Novem- 
ber Fneeting when the Radio Shack repre- 
sentatives stated that the software in the 
ROM cartridges could not be copied. This 
month's 68 Miop Journal reported they had 
disassembled ttie programs on ROM by 
covering some ol the connector pins wtlh 
tape. They promise details neit month. Never 
lell a hobbyist something can't be done! Ttws 
magazine seems to be the only source so lar 
of technical informations on the TRS-80 color 
computer-''. Devoted lo SS-50 6800 and 
6809 machines up lo now, 68 Micro Journal 
plans to include the TRS-80 6809 unit in 
' future issues. 

NOTE: This and oNier interesting and needed articles 
tor the Radio Shack TRS-80 color computer'"'' are being 
included monthly in 68 Micro Journal— The Largest 
specialty computer magazine in the world! 

68 MICRO JOURNAL 

^ 301S HmMH RdkI 

MKSOW, TH »7S*3 ^^gi 

FDTAign Orders— Ad<J; 

Air Msil-t3a.D0/Yesr Surtace-S1 2 Do/Year 

.■■ 1 YsarllSSO 2 YBar!432 50 

3 Yeais.MS.SO 

CanaOa i Mexico Add tS.50 Per Year 

10 USA SuDscrlpllDn Rale 



BUSINESS & 
PLEASURE SOFTWARE 

THS-BO'" MOD. 1, LEVfL II 
PERSONAL FINANCIAL STATEMENT 

|t6K) casHtti 114.95 

INCOME TAX (8K) catMtte 19.95 

INCOME/DEDUCTIONS FILE {SK) 

Gisstttt 10.95 

STOCK CHARTING (8K) cassatia 15.95 

MAILING LIST (Dish only) {32K) 22.95 

ADD: *4.00 for disk axcopt mail list. 
All pricas includa shipping chargas. 

DISCOUNT! 

3 or mora programs 25 off. 
- SomI us your programs for raview. 

BAP$ SOFTWARE 

6221 Richmond, Suita 220 

Houston, Taxas 77057 713/783-3433 

TRS-8D is a ragistered trademarh of Tamly Corp. 



Organize your sliides, negatives or 
albums by code, location, category 
or title. A MUST FOR PHOTOGRAPHERS 
L2 16K Tqpe $19»5 pisk $29*5 



Also available: 

DAILY APPOINTMENT CALENDAR 

HOME BARTENDER GUIDE 

LEARN GERMAN & others 

^ Write for free brochure 

TAPE-TRONICS - »» 
346 N. Western Ave. 
Los Angeles, Ca. 90004 
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00:NEXT:GOTO6075 

6040 IFASC(Y0)<65ORASC{Y0)>72THEN6035ELSEPRINTY0; 

6050 Y1=INKEY$:IFY1=""THEN6050ELSEIFY1=CHR$(08)THENPRINTCHRS(08) 

;:GOTO6035:ELSE1FVAL(Y1)<1ORVAL(Y1)>8THEN6050ELSEPRINTY1- 

6060 i=INKEY$:IFY=""THEN6060ELSEIFY=CHRS(08)THENPRINTCHRS(08};:G 

6070 HG=ASC{Y0)-64:VG=VAL(Y1) 

6075 FORI=1T08:PRINT@1+3*I," "; :PRrNT@94+r*64, " "; :NEXT: IFY0=" 

THEN610 

6080 RETURN 

0"THEN610 

6080 RETURN 

7000 N1{X1)="R ":SC=SC+1:GOTO7020 

7010 N1(X1)="H ":SC=SC+1 

7020 FORI=1T08:PRINT@65+3*I,N1(I) f :NEXT 

7030 F0RI=9T016:PRINT@156+64*CI-9),N1(I};:NEXT 

7040 PORI=17T024:PRINT@665-3*(I-17),Nl(l);:NEXT 

7050 FORI=25T032:PRINT@577-64*(I-25) fNl(I) ;:NEXT 

7060 IFCTHEN&000 

7070 GOTO610 

8000 IFX1=2THEN8340ELSEIFX1=7THEN8310ELSEIFX1=14THEN8280ELSEIFX1 

=15THEN8270ELSEIFX1=13THEN8260ELSEIFX1=30THEN8220ELSEIFX1=28THEN 

ei80ELSEIFXl=31THEN8140ELSEIFG (2,5) THEN8120ELSECLS : PRINT@89 , "BLA 

CK BOX" 

8010 PRINT@195,"THE OBJECT OF THE GAME IS TO LOCATE THREE, FOUR 

OR FIVE" 

8020 PRINT"RANDOMLY HIDDEN BALLS IN AN EIGHT BY EIGHT FIELD. vO 

U WILL" 

8030 PR1NT"L0CATE THEH BY SENDING RAYS INTO THE FIELD FROM THE S 

IDES." 

8040 PRINT"A BALL WILL ABSORB A RAY THAT STRIKES IT DIRECTLY, OR 

DEFLECT" 
8050 PRINT"A RAY THAT COMES WITHIN ONE SQUARE." 

FOLLOWING ARE SEVERAL EXAMPLES OF HOW RAYS WILL AC 



a RAY WILL EITHER BE A HIT, 



8060 PRINT" 
T WHEN 

8070 PRINT"LAUNCHED INTO THE FIELD. 
A" 

8080 PRINT"REFLECTION, OR BE DEFLECTED TO LEAVE THE MATRIX AT AN 

OTHER" 

8090 PRINT"POINT. PRESS ENTER EACH TIME FOR THE NEXT EXAMPLE." 

8100 GOSUB6420 

8110 CLS:B(2,5)=-1:B(4,5)=-1:B(6,8)=-1:G(2,5}— 1:G(4,5)=-1:G(6,8 
)=-l:GOTO5000 

8120 PRINT@99,"HERE IS A TYPICAL BALL" ;: PR1NT@163 , "ARRANGEMENT. 

A VECTOR SENT";:PRINT@227,"IN FROM 31 WOULD BE A HIT."; 
8130 GOSUB8420:X1=31:GOTO2030 
8140 GOSUB8420 
8150 GOSUB8410 

8160 PRINT@99,"A RAY PROM 28 WOULD"; :PRINT@163, "DEFLECT TO 21, A 
ND";:PRINT@227,"THE COMPUTER WOULD GIVE" ;: PRINT@291 , "BOTH NUMBER 
S A DOUBLE"; :PRINTg355, "LETTER MARKER."; 
8170 GOSUB8420:X1=28!GOTO2030 
8180 GOSUB8420 
8190 GOSUB8410 

8200 PRINT@99,"A RAY FROM 30 WOULD BE" ;: PRINT@163 , "REFLECTED BAC 
K TO 30,";:PRINT@227,"AND MARKED WITH AN R."; 
8210 GOSUB8420:X1=30:GOTO2030 
8220 GOSUB8420 
8230 GOSUB8410 

8240 PRINT@99,"RAYS SENT IN PROM 13 AND"; :PRINT@163, "15 WOULD AL 
SO BE";:PRINT@227, "REFLECTIONS, AND MARKED" ;: PRINT@291 , "WITH AN 
R. "; 

8250 GOSUB8420:X1=13:GOTO2030 
8260 X1=15:GOTO2030 
8270 X1=14:GOTO2030 
8280 GOSUB8420 

8290 GOSUB8410:PRINT@99,"A RAY FROM 7 WOULD"; :PRINTei63, "BE DEFL 
ECTED TWICE, ";:PRINT@227, "AND MARKED WITH A" ; : PRINTe291 , "DIFFERE 
NT DOUBLE LETTER. ";: PRINT@35 5 , "WATCH THIS ONE."; 
8300 GOSUB8420:X1=7:GOTO2030 
6310 GOSUB8420 
8320 GOSUB8410:PRINT@99,"RAYS ENTERED AT 1, 2, "; :PRINT@163, "OR 3 

WOULD FALL ALL THE" ; : PRINT@227 , "WAY THROUGH. HERE IS";:PRINTe2 
91, "2, FOR EXAMPLE."; 
8330 GOSUB8420:X1=2:GOTO2030 
8340 GOSUB8420 
8350 CLS:PRINT" YOUR SCORE IS THE NUMBER OF MARKERS TOTAL THAT 

YOU USE" 
8360 PRINT"TO LOCATE THE BALLS. THE OBJECT IS TO HAVE THE LOWES 
T TOTAL" 
8370 PRINT"SCORE.-:PRINT:PRINT" YOU MAY PLACE BALL GUESSES AND 

REMOVE BALL GUESSES AT ANY" 
8380 PRINT"TIME. WHEN YOU THINK YOU HAVE A CORRECT LAYOUT, STOP 

8390 PRINT"SCORE, AN INCORRECT BALL LOCATION COSTS FIVE POINTS. 

8400 GOSUB8420:CLS:GOTO50 

8410 FORI=1T012:PRINT@35+I*64,STRINGS(29," ") ; !NEXT:RETURN 

8420 PR1NT@803, "PRESS ENTER" ;: INPUTY: RETURN 



An 
innovative 

word 

processing 

system 

for 

TRS-80* 

iVIODI 

& 
IVIOD III 




Now accepting 

orders for MOD III 

version 



©1980 

by 

David 
Welsh 



MOD I - $125 
MOD III -$175 

'Requires 2 drives for 
conversion onlv. 



It is time to put your 

word processing program 

away and use a 

Word Processing System 

'Lazv Wnfer is the Drodocl o( ABC Sales 

LAZY WRITER Takes on Scripsit® by Radio Shack^ and Electric PenciF® 

Hctt all tn» things Ihert o*h»f word pfoc«»»lng programs should hovo. Easy to use. wrifTen all m mqchine code. / IT pefmits the inserting and deleting 
by characters, vvords, sentences and paragraDhs / Page scrolling up and down / Search ahead o( the cursor or behind the cursor tor any chof^ 
The cursor con be moved up. down, teft and right/ Vou can seek top of file and bottom of tile/ Block move of text, block delete of teirt/ Search and 
replace or search delete / Unlimited insert (to the limit of your n-tachines merrtory) / Permits use with lower case / 

Has things that olhor programs should hovo, but don't. Upper arxj kswer case output to your printer C'f your pnnter accepts lower case) without 
having your computer mod;(iecl. ON UPPER CASE ONLV MACHINES This program marks the capital letters so you con see which letters are CAPITALS and 
wnich are not / Will change oil upper characters text to lower case or all lov^r case to upper A SINGLE COMMAND / Will capitalize the first letter of all 
sentercesarxJ all proper noun I's. WITH ASNGLECOMNMND/ LOADS ANY ELECTT^lCPtNClL/ RLE. ASCII SAVED RLESEDTASMFILESof BASIC PROGRAMS 
SAVED ASCII /Permits installing special coritrol characters in your text for your pfintefs spec iol features, like double wide or condensed print /Definable 

screen ler>gth and definable print length to 255 characters wide / Screen editing that is not final till your command This means that you con edit your 
flteonfhescreenarvaifyoudohttikehowitreodsyoucancancelandleav©itttiewayitwas/YoucanaDpendflies(whichmeansthQt you can put one 
file to ttie end of arx3tr>er file) / No lost characters at the end of the line, even for the fastest typist / A directory of ail your files is available to fhe user 
wittiout leaving trie program / Saving programs to disk easy enough for the non-computer user / To save memory, not all the program modules are m 
merrvDry at one time but are called from tt)e disk as needed / You can set tab positions like on a typev^riter / 10 CUSTOM COMMAND KEYS for the 
experiervreduserthere IS a comma ry3 file thot permits many special functions that ore oil user defined(hot enough space for better explanation mad, 

send for complete overview) / Program has HELP file that is a short review of the commartds that are available / 

StarKiord Mnl»f Modulo. This printer module is provided for the user os a starvdard feature Optional special printer routines for custom printer will be 
available in the near future, in this originol release, it has the following printer drivers and will support the following printing devices RS232. TT;S232 and 
PARALLEL printer ports. You have the folkjwing format commands Justifies Text, Centers Text, Centers Title. Line Spacing. Line Length from 3-255 
cftarocters and Set Margins / Also sertd any ASCII 

code to any pnnter from fh\e text / Save formotted _^^^^^^^,^^^^^^mm^^^^^^^a^m^amm^m^^^^^mmmmmmmmmmmm 

text to ttie disk for spooling later / Intormation tor 
customer to load his own special printer driver / 
Printing can oe stopped and started by ttie user at 
any time arx3 tt^en restarted where you left off/ You 
can print entire file Of just print to bottom of the page / 
Communleatton Packago. RS232 COMMUNICA- 
TION TERMINAL PROGRAM permits you to communi- 
cate with other computers. Transfer files from one 
machine to anottier. Permits dumping menxjry a- 
cross the phone lines. Receive files from other TRS- 
80' s and "Stiake Hands" with larger computers. This is 
Ttw complete system called LAZY WRITER. There is no 
package written for the TRS-80' ttnat is as compre- 
hensive. This package is available for the 
TRS-80* MOD 1. 32K or larger with at least 
a single disk drive. List price is from 

$125.00 




D«al*r Inquiries lnvtt*d 



•OPTaaeTOHMAMKSTINa, ^516 

(MCOnPORATED 

0250 MIddlebelt • Garden City. M! 48135 
(313) 425-4020 

COD - Certified Check. MO. or Cash or-ly. Sorry, r^o CO.O. ewer 
SisOOOi Most orders sMoped next oay All orders must hove snipping 
;nauOed Please oOd 2% ex S2 50, swf^ich ever ^s h^her fcr sriiPP!"9 
Mtenioan residenls, please add d% Ka Add extra Si 50 for COD 
Personal checks take 3 v.eeks ro cleat Send Si 00 tor cataksg - get 
$2 00 credit on next order 



NEW FEATURES in Lazy Writer 
"The People Request, and David Welsh Delivers" 

Tho system pormits embedding ASCII commands mro the text of 

the program. NOW you can Oo SUPERSCRIPT and SUBSCRlPT(if your 

printer can handle ft) Underiimrtg and boldface, printing of a single 

word in o paragraph, is now possible, at no extro cost 

A key that romombors the cursor position. 

Usor dotlnaWo spoelal choroctor. for use with printers that have 

pnntable characters that the TT^S-SO keytxxjrd does not normally 

support 

Margin control Irom within text. This means that you can change 

the rrrargins of your pnntea text without stopping the printer routine 

and changing it 

Pago offset with odd/ovon hoodors & footers. This means that 

you can print one page offset to the left of center ana the next page 

offset re the right This is very nice when you are writing a book 

Printing chaining feature. This permits having more than one file 

on disk and creote one printed letter, contract, or booi* without 

having to reset the pnnter commands 

Mandatory space command. This is necessary when you are 

writing letters or papers that have certoin words that are not to be 

brokervup eg.John P Andhouser This name can be mode to be 

unbreakable to justitv routines m the program 

Disk catalog. New you con load your disk directory info memory 

and create a file of this information. 

Now loads Machine Languago extontlon programs fhot are 

wrifon for Lazy Writor. 



UTILITY 



An alternative to expensive Model II letter crunchers. 

Everyman's Mod II 
Word Processor 



Mike Kilroy. ACSV 
6213 Concerto Ct. 
Dayton. OH 45449 

Many good word processors are avail- 
able for the Model I from various mag- 
aztrtes, but to put your Model II to work as a 
word processor requires a substantial out- 
fay of cash. Instead of laying out many dol- 
lars for a Model II processor, I've modified 
an existing Model I program. The original 
program appeared in 80 Microcomputing's 
May, 1980 issue, written by Delmer 0. HIn- 
richs. 
The program performs the following: 

•Creates or adds to text 

•Right justifies 

•Compiles 

•Sets formats for letters and the printer 

•Deletes blank lines automatically 

•Deletes specified line<s) 

•Edits on a per line basis 

•Displays all legal functions 

•Inserts line(s) at any point in the pro- 
gram 

•Deletes whole texts from memory or 
disk 

•Saves/loads any text to/from disk com- 
plete with its corresponding format 

•Moves whole blocks of text 

■Replaces one whole line with a new 
one 

•Provides a table of contents of all let- 
ters or text 

•Titles and pages, if wanted 

What more could you want? The speed of 
this program in a standard 64K Model It is 
over 90 wpm. Could you keep up? The pro- 
gram has 17 commands, two of which have 
extensive subcommands. 

Featured Commands 

The Add command lets you add lines to 
text. An addition may t>e two lines or 100 



lines long. Available in the add mode are the 
following subcommands: 

Enter key Ends line and carriage re- 
turn. 

Control J Erases present line to 
start it over. 



Down arrow Ends line and page, adds 

end page marker (*-). 
Right arrow Moves line all the way to 

the right. 
Up arrow Centers, ends, adds, "do 

not justify marker" (/) to 

present line. 



Program Listing 



10 CLSiPRINTTAB<2e) "BASIC WORD PROCESSOR* 

30 DEFlNTfl-ZiCLEBR210eBiNL-36BiDIIifl«CNL),K»(3).S(2S).T(25) 

40 B«-CHR»(23) tC»-CHR«(U3)iF»-"#t« " 1N«=" V ! PN«="N" i Pit"" Y" 

50 S»« H»-StlLO— IlP"l:FP"l:PL-23iLL«60lLM"ie!U''32!G"lO!H«6iV«27 

£0 ONERRORGOTOt&A5iL-LfliIT-0iR>eiA«-"";PfiINT:iNPUT"COnnOND'';A«;IPO»>""GOTO80 

70 O-flSC(fi«)-64iIFfi)0THEN0NftG0TO90.ft8e.51O. 760. 790, 1220.80, 1328. 1330,1390. 1510. 1 

S22. 1580.80. SB. l&4e. 80, 1750. 1770. 152B. 80. 1830. SB. 19 

70 

SB PRINT"** ENTRY ERROR **":OOTO60 

9B CLStO«0iN»-"V"tlFLA<0THENL>etCOTD130 * Add 

tee IF NL-Lft*lTHEN21BELSEIFL)FL+12THeNB-L-12ELSEB'«FL 

1 10 FORI-BTOL! X'=LEN<Ot( I > i i D"D+INT< t K+6) /BB-. 0t > 

120 GOSuetgiOiNEXTHL-L+l 

13B C"(L-FL+D)*S0! IFC) 1760THENPRINTlPRINTiC"17Se 

140 PHINTaC.LJSIMGF«!L!!PRINTfl«tL)!!P-LEN«(»(L»l+liC«C*P*3:K«L+l 

150 PRINTSC. C»!CHH»(02> imt-INKEVS-.PRINT9C.5Sl : IFflt"""THEN15B 

160 GOSUB^90iONfl-7DOTO36a.41B 

17B IF«=13THENflS-S»iGOTO2l0ELSE!Fft-iaTHEN3SOELSEIFfl-31THEN4£a 

tSB IFO-29THEN438ELSErFfl-30THEN33BELSEIFB"2eTHEN3l0 

18B IFfl-27THENIFLR<L'THENLfi-LiG0T06aELSE6B 

20B PRINTSC. fit! :as(L>-'flS(L)*fit: IFP(=LLThENP-P*1 jC-C + I sGOTOlSB 

2 IB IFRTHE^4S0eLSEIFNL<«KTHENPRINT:PRINT"FILE FULL" JL0=NL-1 i G0TQ6O 

22B IFLENIAS(K> )THENL'=K:0OSUB13eB 

23B IFKILOTHENLa-'K 

24B IFfit-SSTHEN28ia 

25B F0RM=LL+lTO2STEP-l;fl«-mDtC«S<L).M. l>:IFftS<>SSTHENNEXTMJG0T02SB 

2GB fiSlK)"HIGHTSiat(L>.l,L-H*l( !OS(Lt "LEFTS ' fit <L> . M-l l 

27B PRINTaC-LL*l1-l,Sf, !L"KiC0T0130 

280 flS(L)«LEFTS<fl»tL>.LL> tL«K!G0TQl3B 

23B A-ASCi:nt) SRETURN 

31B IFP>LLTHEN21B 'd 

32B PRINTSC. CMRSf 92) ! !OttL> -OSf L>*CHRS( 1 7) : flt«SS! O0TD21B 

33B IFP>LLTHEN210 ' »-d 

3ii0 C=(L-FL + D)*'S0+ft! IFO 1764THENC"17E4 

35B GOSUBIlB0!P-i:At-St!OOTO2lB 

3G0 IFP-1THEN150 ■ I 

37B C-C-1! PRINTSC. Bt! i P"P- 1 ifltf L) -LEFTt(fiS(L> . P-1) tGGTOlSO 

38B !FP"lTH£Nt50 ' s- I 

39B flS(L>"""tP«iiC«(L-FL*D>*80»6tlFC>17&4THENC-17e4 

&0B PRINTac.BtnGOTOlSO 

41B IFP)LL-eTHEN15B 'r 

428 At<L)=0StL)+STR!NGtf5. St! !C=C+3! P»P+5iG0T0l50 

43B 1FP>LLTHEN21B 's-r 

44fl C"fL-FL+D)*eB*4!lFC>1764THENC«17ea 

450 GOSUB120e:P-i:nt-SSiGOTO21B 

46B IFP>LLTHEN21B 'cl 

470 PHINTaC. CHRt(95nlflS(L!-ftS(LI*CHRt(20Hfit-SStG0TO21B 

Progrtm continu*8 
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iiSB CLS:PRINT"DELETING 0LONK LINES" sFQRJ^LflTDOSTEP-l 'blank 

4-30 IFnt(J) = ""THENFDRI=JTDLft:ata)=R»a-H):NEXTI:fi*fLfi)= L0=LR-1 

500 NEXTJsIFRTHENRETURMELSElSSB 

510 INPUT-FIRST LINE TO COMPl LE" ?P! IFF<0THENF=0 'como.le 

520 INPUT"lR5T line TO COMPILE" ; Z : IFZ> LOTHFNZ=LO 

530 1FF)=ZTHEN8BELSECLS;PRINT"C0MPILING":F0RL=FTDZ-1 : K=l-H 

5i0 X=LENc:fl»(L) ) :X*= IFX { 2THENE20ELSEI FX (-LLGOTOGBB 

550 FDRl=XT01STEP-l!fi*=MID«'0S(Li , I, : ) 

5G0 IFH*<>S«TMENX«.=G»+X«:NEXTIiGDTOB0BELSEIFX«=""THENNEXTI 

57B fl=oscfRIGHT»(X*, 1) ) : IFfl:T:^30Rn=460HP=580Rft-63THENXt=Xt-*" " 

580 fl*aJ=LEFT«(P*CLi, I -11 : IFLENt ««l.K> ) =0THENfl*'K> =X*!GOTa5ft0 

590 fl*(K1=X*+St+fl«(K) :G0TO5iia 

GOfl X=LENffl»iL))!lFX(2THENG20ELBEFORI=XTO2STEP-l 

Gia IFRIGHT*1R*i:L>, l )=S«THENfit<Ll=LEFT«(fl»tL). I-l> jNEXTI 

620 NEXTL:FORL=FTaz-l!K=L+l 

630 X=LENtft*(L) 1 iY=LEN(n«lKI ) :X*= IFX=aDRY=0THEN750 

SA0 fl=RSCc.flIGHT«rfl»fL>. 1)1 

650 IFfl=330RR=660Rfl^5SaRfl=G3THEN0«'L>=0»(L)*" ":X = X + 1. 

660 FDRI = lTOV:R*=MID*(fi»(K), I, 11' 

670 IFfl»<>S»THENX*"X*-t-B*!NEXTIELSEIFX*=""THENNEXTI 

680 IFLt.-X<ITHEN710 

690 Y=V-l:!FY(aTHENY=0 

700 fltCLl^flt^D-tSttXtiRSiKI^RIGHTKaifKl-VJ :GOTO630 

710 X=LENCBt(L))!IFX<2THEN730ELSEFORI=XTO2BTEP-l 

720 IFRIGHT$(R*CL),l)=3«THENfl*<L)=LEFT*(flSfL). I-IUNEXTI 

730 IFY<2THEN750ELSEFOflI=YTO2STEP-l 

7i.B IFLEFT*Cfl*CK).ll=S*THENSt(K)=RIGHT*(R*n<). I-D = NEXTI 

750 NEXTL:X'=LEN(R«a)):GOTO90B 

760 INPUT"FIRST LINE TO DELETE" ! F! IFF (0THENF=B 'delete 

770 INPUT"LRST LINE TO DELETE" 5 Z ! IFZ> LfiTHENZ=LR 

7S0 IFF)ZTHEN80ELBEFORI=FTOZ:fl*a)= NEXTI :GOT01H3B 

79B INPIJT"EDIT LINE" sL! IFL(B0RL> LRORR*tL)=""THENS0 'edit 

800 c=a!P=i!X*(;0)=flta) :n»="Y" 

810 CLS!I=L;GDSUB19ia:N=l!C»="" 

820 MfSUBSlB! IFB>47flNDR<5BTHEN0«=G»+R*!N=VflLiO*) :GOTOS?0 

830 M=0!IFB=STHENY=-i:GOSUB940ELSEIFR=gTHENV=5:GOSUB940ELSElFfi=yTHENV=l:GOSUB94a 

840 IFfl=6STHENft*(L)=X«f0)!DOTO8B0 '« 

850 IFLEN(flt(L) )>=LLTHENS70 

860 IFR=29TMENDOSUB1200ELSEIFR=^30THENGOSUB11B0 

S70 IFfi) E&THENGNn-66GOBue960. 1B00. 1360. 1960. 1960, 1020, 1030 

SSB IFH=83THeNGOBUBi;20ELSEIFQ=BBTHENDOSUB1170ELSElFfl=7&THENGO8UB80a 

S9B IFM=lTHENN='l:Oi=""JGOTOB20ELBEIFRTheNPRI'JTa400. SELSESIB 

900 IFLL(XTHENPRLNT"l_IME";L;"HflS"!X!-CHOROCTFRS"!DOTOG0ELSE1830 

910 X»=irD*CO*iLl, P, 11 

920 PRINtaC. C»:CMRt{B2) ; :fi*=INKFY»! PRINTSC, X«; : IFfl*=" ■'THEN92a 

930 GO5UB290:X=LEW(R*(L)i:IFfl=l3THENR=l:RETLJRNF'-SERETURN 

940 m=l i FORI =1 TON: P=P-fY: IFPl XTHENP=X ; RETURN 

930 IFP<lTHENP=l:RETURNEi_SEC=C+Y: NEXT I! RETURN 

960 O=P:D=C:FORI=lTON:GGSUB910:IPRORR=27THENP=PiC=D!RETURN 'c 

970 PRINTHC. fl*! :DOSUB110a:P=P+l:GOSUBllia:R*(;Ll=Lt+R**-R* 

9Sa fl=U:C=C+l!IFP<=XTHENNEXTI 

990 P=Q:C=D!RETUPN 

laoa IFP+N-11 XTHENN=X-P+1 'd 

1010 GDSUB1100iO=P!P=P+N:GDSUe)l IB: R«f LI =L*+R*! P=G'! RETURN 

10213 GDSUBlllDa:R«iLi~Lt+StiPRINTaC.B* 'h 

1030 GOSUB310:IFRORfl=J'7THENRETURN ' : 

;B4a lF0=2STHENfi«i LI =flKL) +CHRt i 17 i ! R=l : RETURN 

1050 IFfl=31THENfl»(L)=fl*ai-CHR*i:2a)!R=l: RETURN 

1060 PRINTaC.O*-. :lFfi=STHENY=-l:GOSUB940:GOTDia30 

1070 IFR=9THENY=1SGOSUB940:GOTO1030ELSEIFP>XTHENX=P 

lOeO GDSUBllO0:GDSUBlll0iR»(L)=L*+R»'-Rt:PRINTaC,B»:R«*-R* 

1090 C=C+1!P=P+1:GOTO1030 

1100 L»-"":IFP(2THENReTURNELSEL*=LEFTt(R«fLl, P-t): RETURN 

1110 R»=" " ■■ IFP> XTHENRETURNELSER«=RIDHT*i:fl* 1.L) , X-P*l ) : RETURN 

1120 G0SUB9!B:P=P!D=C 's 

1130 FDRl=lTaN:F=a:FORJ=D*lTOXiD=Dti 

1140 IFMlD»<fl«fL). J. l)':R»THENF=l:D=J!J=X 

1150 NEXTJ!NEXTIiIFFTHENP=G!!C=D 

1160 fi=UiRETUSN 

1170 fl*(L)=R«(L)+S»!P=X+l:C=Pt3:G0T0ia3a 'x 

USO fl«(L)=STRING*aLL-LEN(R*CL))J/2'32l+flt(Ll+CHR*C171 ' s-d 

1190 PRINTaC.B«!LeFT*(R«(L),LENCR«(:Ll)-niCHR*'92) ;: RETURN 

1200 fl»CL)=BTRING»(LL-LEN(R»iLll*1.321*R«<L)+CHR*i:i3) 's-r 

1210 PRINTaC,B*ifl»tL)i:RETURN 

1220 CLS!PRINT"LINE LENGTH =" !LL. : INPUT"NEM ="!LL '-format 

1230 PRINT-LINE SPACES i^" !S, iINPUT"NEW =";S 

1240 PRINT"LINE NOS. ■= '"!N*i .IINPUT-NEW <Y/N)"iN» 

1250 PR1NT"FIRST LINE =" IFL, : INPUT"NEW ="?FL 

12E0 PRINT"LEFT MARGIN =" !LM, : INPUT"NEW =" iLM 

1270 PRINT"PfiGE LENGTH =" ; PL, ! INPUT"NEW =" ! PL 

12S0 PR1NT"PRGE NOS. = '"!PN»i ,!INPUT"NEW lY/N>"lPNt 

1290 PRINT-FIRST PAGE =" ;FP, : INPUT-NEW ="1FP 

130B PRINT-PRGE 1 NO. = '"iPlti ,:INPUT"N£W f.¥/N)"!P]t 

13BS PRINT"CHflR/INCH =" !G, = INPUT-NEW (S, 10, 16.5) -" ? G 
13B7 PRINT"L1NE/INCH =" 1 H, : INPUT"NEW (6. B) =" ;H 

1310 PRINT" HERDING = '"!H» ,:INPUT-NEW =" ;H»!GOTOG0 

1320 CLS-.PRINT"LEGOL COMMflNDS ARE :": PRINT! PRINT ' he I u 

1330 PRINT"fl flDD","B BLRNK"."C CO!iPILE">"D DELETE". -E EDIT", "F FDRI1flT"."H 

HELP". "I INSERT", "J JUSTIFY", "K KILL","L LORD" 
,"M MOVE","P PRINT", "R REPLRCe"."S SAVE", "V VIDEO". "X EXIT","T TABLE OF C 

1340 PRINTlPRINTiPRINT-PRESS <ESC> KEY TO RETURN FROM fl.E-I.H COMMRND M0DE"!DaTO 

60 

1350 INPUT-INSERT RT LINE" iLf IFL(0ORL>LflTHEN80 'insert 

13G0 IF NL=LA+ITHENPRINT"FILE FULL" :GOTO60ELSEIFRTHEN&0 

1370 F0RI=LAT0LSTEP-1!R»(I+1)=R*(I):NEXTI 

1380 (i*(.U= LA=LA+l:L=L-l:IFITTHENRETURNELSEIT=l:GOTa90 

1330 CLS!PRINT"JUSTIFVING"!FDRL=0TOLR;X=LEN(flH:Lll 'justi+y 

1400 IFX<2THENl5O0ELSEFORI=XTa2STEP-l!R=ASCfHIGHTt.(A*ai. 11) 

1410 IFA=UTHENR»<L)=LEFT»<fl»':L), I-l ): X=X-1 1 NEXTI 

142B IFXl=LLORR=17ORfl=2BTHEN15O0ELSEJ=0:K=l:FORI=lTDX 

143B IFMIDSfAtfL). I. 1) <) B»THENH:-0ELBEIFK=0THENK=1 :S( Jl =1 = J=J+l 

1440 NEXTI !IFJ=0THEN15B0 

1450 K=RNDCJ)-liIFINT<;j/2)=J/2DRJ=lTHENM=lELSEN=2 

Program confinues 



CONVENIENCE WHEN YOU WANT IT 
] SECURITY WHEN YOU NEED IT mmm 
•"•^•^l AT A PRICE YOU CAN AFFORD "^ 



TRS-80 MODEL I & III 




COMPUTER CONTROLIED REMOTE COMTROi 

Now an ineipensive anil Aiiecl caiiiet curiem iniertace tielwe^n in» 
ISfiBO and ihe BSH X 10 remole conliot moduies. The MICRO 
COMMANDER. X 10 modules mi your cnmiiutef tan conlroi »our 
lights appliances, molais 7V. iWec. heateis. alsims. lans. (iiiinps, etc. 

COMPUTER CONTROLLED SECURITY 
Add a new dunenoicn !o yoiiF secunly syslein Piacp laui hom^ under 
conlEol of yCKir computei real time clock whilp vou are i>n v^ctnofi- Add 
an input poit 10 VDUF compulei and inlelli^nce laams With snitclies on 
itoo's 01 wnJows voi" compulet can ivdcome guesn a Inghlen intnjdets. 

EAST TO USE NO WIRES TO RUN 
Total canirol cil all t 10 modules Uiiliie all 2b% house and unii ci^de 
combinaltcns. Oiiecl inmlace lo AC power (me No command console 
to puahase. No some link. Plugs diiectly inia THS 80 casselle lack 

NEW PORT C SOFTWARE INCLUDED ON TAPE 
Real time CONIflQL sofiwaie ler all [RS BOs iModel t and III, 
Minimum Level II or III 1BK T^e. 32K DiskI Conliol roui MERD 
COMMAHOfR 0' outpul pons with lespect to real titne and/or input 
psrt itiggefs Saire scheilules on tape a^ disk. 
MOO COMMANDER with PDflT C on casselle $59.95 
PDBTCondisk 10.00 

BSfl SYSTEM X 10 LAMP MODULE )4.49 

APPLIANCE Ofi NEW WALL SWITCH MODULE 15.49 

IL Res. add 6% TAX - COO O.K. - S AND H 3.00 

/* INTERFACE TECHNOLOGY ►'319 

/^r\ P.O.BOX 585, DCS Plalnes, IL 60017 

"^."U Pnone{312J 297-2265 

Ml '|4»ldl ■■»atr. 




KBJ-eO EPROM EXTENDER 

Enchanco your L)!3K <ir Lrvrl II ln^ii . '-y In ii.il I Im'. 
tlie KEU-en. Pai-kurf ir-luiii:; ,. — r i:.i|.[.U .i.iil 
nriOTBI-.' nuMilLo (SYBTAPE). Nu ii;-.;:.'i^l>ly ,-.|inr...nt 
FirnwBiT. ipo.luln oBn I'C J:;'-( m :ir,y kin:l oi' KFKOK 

ii7U>-iK) ADD1T:0N|IiL FIHIWARE MOIIULE PRICING. - 

SYST*PE ($39.95)- Adda 9 pernansnt utilities to Level 
II biaici aystBic tape Load/Punch ar.d Execute i 
Rcpsat lieysi Lower case; Abbr. keysi BeBp^ri 
Copy and Debounce. (Free with pjcchaac of KBJ-80) 

EFL-ao ($59.95)- Uatd in ooniiinction -ith 8C-0RAPHIX 
board provides Inverse video w/o usl.ig any rams, al30 
includes Debouncei fibbr. Keysi Repeat teys 
Lower lase. A (WiT FOR eo-GRAPHlX OWNERS' 

n from Dennie Kitszl 



KEEPII 1.Z ($39.95) -lateat 



1QOLKIT-B0 1$39.95)- Add 5 utilitiea 
basic 1 Renumben Appendi Repeat keys 
and step, lou [iBve been programming too 
thiG onei 

CI R 3 OR ($24,95)- Full 



a Level II 
Debounoi 
lon« w/i 



seen any Itiing like tbia before!! 

yjEDIAIE DELIVERY - CHECK/M.O. TC. 

COMFVTER ACCESSORY TECHNOLOGY 

P.O. BOX 2673, KOKOJilO, IHT:. 1.6901. 

T£L.017)-l.53-9715 

DEALERS INSl-'IBIES ITfVirEDIII 



'206 



^See List of Advertisers on page 306 
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^127 

D YESl Stgn tne up as a cnarcer 
subscriber . Enclosed Is ray 
$20.00 for 10 issues. ($24 
CO Canada. $30 elsewhere.) 

n Not sure. Enclosed is S2 for 
a sample issue. 



Name 
Addr, 



City/St. 



Zip. 



MANUFACTURING INVENTORY CONTROL 



15 reports for 



cCuring Inv»iHory Contr 
Ttory, purchislng, amd 



* Vfndor rfporta * Part reorder 

* "Piel; Lisf reports * *BC analysis 

* Scheduling simulation cupability 

* Pacts "al tocition" feature - prevent 

* Inquiry by part, vendor part, and des 



ription 



BOMP madul* - Bllt of Materials Processor 

• Indented BIW reports * Finisned goods reports 

• Obsolete parts report * "Where used" inquiry 

• Automatic 'Tick List" report generation 

• Work in process value reports 

• Process "lead tine" based on actual inventory, 
work in process, and reorder lead times 

All nodules for Model I, 32)L Business Systems 
Master menu driven - fully operator prompted 

MtCS-l 2 drives, 1000 parts, 200 vendors - (393 
MICS-2* 2 drives, 2003 parts, 300 vendors - S.1^5 
MICS-3 3 drives, 2000 parts, 200 vendors - $3J5 
MICS-a* 3 drives, 4000 parts, 400 vendors - t305 
BOWP {adds on to any MICS Module) - 1295 

Send for catalog of ELTSDH business modules 

ELTECH Associates ^*S6 

3466 Moreno Drive, Los Angeles, Ca O033S 

(213) 643-034'' 

•Requires double density. All modules upgradable 




(\^^ If You've WHtten an 

^^ Extraordinary Program- 

We'd Like to Publish Itl 
Programs needed for MANAGE- 
MENT appUcatlons: 

PERT ft CPH SCHEDULINO 
PREDICTIVE MODELING 
DECISION-MAKING SUflULATIONS 
PRODUCTION SCHEDULING 
EXPENSE ANALYSES 

Royalty checks may be In YOUR 
future. Write for our free Pro- 
grammer's Kit today. 

INSTANT SOFTWARE. INC. ^2 
Submissions Dept. 
Peterborough. NH 03458 



"Many good word processors are 

available for the Model I. . . but 

. . . require a substantial outlay of cash." 



Escape key 
Left arrow 



Tab key 
Backspace 



Ends adding session. 
Ends, adds "do not Justi- 
fy" marker to present 
line. 

Moves cursor five spaces 
to right. 

Backspaces and erases 
last entry. 



Though you can press Enter to end a line, 
thecomputerwillautomatlcailyenditwhen 
you type the specified maximum number of 
characters per line. The computer shifts the 
whole word, if it extends beyond the maxi- 
mum numberof characters, to the following 
line. 

The Blank command deletes all "no char- 
acter" lines from the text. A space Is a char- 
acter. If you want a blank line in the text, say 
between your paragraphs, simply put one 
space on that line, This places a character 
(ASCII 32) on that line, and the Blank com- 
mand will not touch it. As you will find out, 
this is a very useful command. 

The Compile command will ask you the 
first and last line number that you wish to 
compile. It then shifts words from line to 
line, fitting the maximum number of words 
onto each line. Spaces at the beginning and 
end of all lines but the first are deleted. {It 
does not touch paragraph indentation on 
the first line.) For this reason Compile Is 
best used on only one paragraph at a time. 
One space is inserted after each word, com- 
ma, and semicolon, Two spaces follow col- 
ons, periods, question marks and exclama- 
tion marks. Compiling only affects spaces 
after words and punctuation shifted be- 
tween lines. For this reason, it should be 
used before the justifying command, or 
spaces added by justifying will be unaf- 
fected. 

Use the Delete command to remove lines 
from the text. Delete leaves a blank line in 
place of the removed one. You can delete 
any numt>er of consecutive lines at one 
time. 

Now we get to the heart of the word pro- 
cessor: the Edit command. The edit mode 
works on one line at a time. Changes can be 
made with the following subcommands: 

Tab key Moves cursor five 

spaces to the right. 

n(Backspace) Left move of n spaces. 

n(C) Change next n char- 

acters to next n char- 
acters entered. 

n(0) Delete next n charac- 

ters. 

(X) Extend the line. 

(H) Erase from present po- 

sition in line to the end 
and enter extend mode. 

(I) Insert at the present 

position. 



(L) 


List the line and keep 




modifications. 


(A) 


Cancel previous 




changes and start over. 


n(S)c 


Search for the nth oc- 




currence of character c 


Escape key 


Quit H, 1, X modes. 


Right arrow 


Moves line all the way 




right, ends edit. 


Up arrow 


Centers line and adds 




"do not justify"; ends 




editing. 


Left arrow 


Adds "do not justify"; 




ends editing. 


Enter key 


Saves all changes and 




ends editing. 



The "n" above indicates the number of 
characters wanted. N is set at one if not 
entered. The left arrow key puts a "do not 
justify" character at the end of the line, and, 
as such, you must enter the extend mode 
first to add it to the line. Any editing 
changes before listing the line will be made 
permanent. Therefore, if you hit L, then de- 
cide you really didn't want to make a certain 
change, hitting A will not erase it. Most of 
the single character commands listed 
above are basically the same as the TRS-80 
Model II editing commands. 

The Format command allows you to set 
up the various format parameters of the let- 
ter and printer. They are self-explanatory; 

Number characters/lines 
Number spaces between lines 
Line numbers (Y/N) 
First line number 
Left margin indentation amount 
Number lines/page 
Page numbers (Y/N) 
First page number 
Numbers on page one (Y/N) 
Heading name 
Printer characters/inch 
Printer lines/inch 

There is a Help command to assist you 
when you are inebriated or just plain too 
tired to recall the program's legal com- 
mands. It simply lists all the commands. 

Insert is used to add those forgotten 
lines. After specifying the first line, the pro- 
gram goes into the add mode. All legal add 
mode subcommands are valid. Hitting the 
escape key will end the insert mode. 

The Justify command right justifies the 
text. Any lines which don't have a "do not 
justify" or "end of page" marker will be right 
justified. Indentations at the beginning of 
lines are not touched. This command 
should be used after all compiling and 
editing is done. 

Kill deletes the entire text on which you 
are working. It can also delete text that was 
previously stored on disk. A double check is 
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CLOAD MONTHLY 



'all the fit that's news to load' 



TRS-80 PROGRAMS ON CASSETTE 

CLOAD Magazine for your Model I or III! 



Goleta, Calif. — You can get 7 or 8 programs on cassette, each month, 
that CLOAD directly into your TRS-80 Model 1 or HI! 

A subscriber, too engrossed in trying lo save the world from invading 
aliens (March, 1981 issue) to give his name, stated, "I receive a 30 minute 
cassette by First Class Mail each month containing some of the best games 
and educational programs I have ever played. Some are even in machine 
language! "Another CLOAD subscriber, Claudine Cload, could now 
"tit the computer mto her schedule" thanks to the utilities and occasional 
disk programs she received from CLOAD. She was writing about it to all 
of the people on her mailing list (November, 1979 issue). 
Get the news firsthand. Get a subscription to CLOAD Magazine. 



The Rne Print: 

Overseas rates slightly higher— 

please write for them. 
Back issues available— ask for our list,* 
TRS-80 is a trademark of Tandy Corporation 
California residents add 6^ to single copies 
and anthologies. Programs are for Level II 
1 6K , Model 111 1 6K , and occasionally for disks. 

*24 Level I back issues also available. 



PRICES 

I year subscription . 
6 month subscription 

Single copies 

Anthology-volume 1 
Anthology-volume 2 

Mastercard/Visa Welcome 



HZOO 
$23.00 

$4.50 
$10.00 
515.00 



by Clyde Cload, star reporter 



S s--% 




■- MAGAZIINE IMC P.O. Box 1267 Goleta, CA 931 16 (805)964-2761 



01981 



COLOR COMPUTER OWNERS! 
CLOAD INC. ANNOUNCES 



CHROMASETTE MAGAZINE! 

A monthly magazine-on- cassette for your 
Extended BASIC Color TRS-80! 



Goleta California — With 
CHROMASSETTE 
Magazine, Color Com- 
puter owners can now enjoy 
the variety, economy, and 
easy entry of programs that 
CLOAD subscribers have 
enjoyed for 3 years. 




CHROMASETTE 

Magazine gets rid of the 

type-in-and-edit blues by 

putting a rainbow of ready-to-load programs on 

cassette, and sending them to you by First Class 

Mail each month. Educational, practical, utility, 

and game programs are delivered right to your 

mailbox. 




CHROMASETTE Magazine in its Prime Slate 



Put a rosy color in you and 
your computer's cheeks, 
stop reading these old 
cliches, and get a subscrip- 
tion to CHROMASETTE 
Magazine. 

Please write for rates and 
other info. 



Or send a blank check and 
your account balance. (Visa 
and MasterCard also accepted) 



CHROMASETTE MAGAZINE 

Box 1267B Goleta CA 93116 ^502 



"iA double check is 
provided to prevent 
killing something mistakenly." 



lUBB FORI=lT0LL-XiTCK)=TiKl+l :K=K+N: IFK> J-1 THEMK=K-J 

1670 NEXT I :FGRI=J-lTO0STEP-l:flt=STRINGHT( I j, St> :Tf D=0 

16S0 0«'L<=LEFT»i;R*:L): Bill )+«1.+RlDHTti;R*ILJ. LENlflHL) >-S' I) ) 

ligiB NEXT! 

1300 NexTLtGDTDlSTa 

1510 CLSi INPUT"REaLL¥ KILL 1 V/M " ; 0*= IFHt <> " Y" THENeB 'hiM 

1512 INPUT"KILL PRESENT LiTTTER i ¥/N> " ! fl* : rFfl*=" V'THENRUN 

I5ia INPUT"KILL ANY LETTER ON DISC ' Y/NI " ; P» : IFRt ( > '■ V" THENEH 

151B INPUT"NOHE OF LETTER ON DISC TQ KILL" ; R» : KI LLHiiGDTQEB 

1520 Z*-"T«BLE"!G0TD1S26 

1522 INPUT"WHfiT LETTER DO YDU WflNT";Z* 

152^ CLS!PfiINT"LDSDING FROM DIBCi " ; Z* 

1525 OPEN"I", 1. Zt 

153B INPUT»1,LR, LL. S, N», FL. Lfl. PL. PNl, FP, P11.,H» 

1540 F0RI=BT0L0STEP4i INPUTftl. X* t 0) . X*( 1 ) . X»c 21 , X* ' 31 

1550 FORJ=0TO3!L=I+j!X=LENCXti J) ) : fi*(L) =" " : IFK <1 THEN 1570 

1560 FQRK = lTOX:Rt(L>Kfi«(Ll+CHR*(,RSCCnlD*i X»iJ). K. ni-12S> :NEXTK 

1370 NEXTJiNEXTI:CL0SE:G0T06H 

15SB INPUT"FIHST LINE TO MOVE" ! F: IFF <0THENF=0 ■ move 

1590 INPUT"LftST LINE TO MOVE" ? Z : IF7) LflTHEMZ^LR 

IGBB IFF) ZTHEN80ELSEINPUT"FIRST NEW LINE" i Ni FORI=FTOZ 

lEia IFLEN(OtfN) iTHENPRINT"LINE" iNi"NOT EMPTY" : 00^060 

1620 A«(N)=0«lI ) ;B»(I ) = ""!N=N-H : IFN) LOTHENLfi=N 

163B NEXTl!G0T01B3a 

1S40 X"FP!ri=FL!GDTD1561 'onnt 

iea5 IF ERR=5THENPRINT"Ynu CRN' T tXl THST ' ' ' ' "■ : FORO=0TO4B00: NEX TQ: RESUMEEB 

lBa7 IFEflR=53THENPRINT''THfiT FILE DDES NOT EXIST RESUMEG0 

lE5a IFERR<>56THENONERRORGDTD0ELSEINPUT"PRINTER NOT REfiDY. OBORT <Y/N) " ifi» 
1B&0 IFfl»*"Y"THENRESU^'E&0ELSEINPUT"FlX PROBLEM RND PRESS ENTER" ! ft«: RESUME 1&4B 

1661 IFG=5THENW=31ELSEIFG=10THENM=30ELSEIFO=1S, 5THENW=29 

1 662 IFH=5THENT=54ELSEIFH=STHENT=56 

1G65 INPUT"WftNT TO BDJUST TO TDP OF POGE ' V/N) " Jfi»: IFR«=" Y"THENSY5TEM"FaftMS T" 
1E7B INPUT"WflNT TO CHECK FORM. »■ S, ETC. ( Y/N) " ! Zt! IFZ«=" Y"THEN 1220ELSER=1 ! GOEUB 
ii 80 iCLS: PRINT "PRINTING" 

Program continues 



provided to prevent killing something mis- 
takenly. If you ask for a letter or text that Is 
not stored on the disk, you will not get a 
"file not found" error; instead, you wiW be 
told "that letter does not exist" and the pro- 
gram will continue. 

Like the Kill command, the Load com- 
mand Is protected against loading a non-ex- 
istent text. It simply loads a specified text 
from the disk into the word processor. 

Move Is a very useful command which al- 
lows you to move as many lines as required 
from one position to another within the 
body of a letter. All necessary prompting is 
given to allow this command to be used. 

The Print command actually puts your 
work on paper. It asks first If you would like 
to adjust to the top of the page. It then asks 
if you would like to double-check the forms 
to be sure the line numbers are off. If you 
are printing more than one page, the pro- 
gram stops and asks you to press Enter 
when ready to print the next page (X). This 
allows you time to put in new paper before 
going on. 

Replace is the command that replaces a 



IbelMGDIrTRAl^lOOO 



A completely refurbished 
IBM Selectric Terminal with 
built-in ASCn Interface. 

•FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. AVAILABLE WITH 
CENTRONICS TYPE PARALLEL PORT. 



Features: 

• 300 Baud Serial 

• 14.9 characters per second 
' printout 

• Reliable heavy duty Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty— parts and 
labor 

• High quality Selectric print- 
ing Off-line use as typewriter 

• Optional tractor feed 
available 

• 15 inch carriage width 



Also works with Exa- 
tron's Stringy floppy, 
for fast loading of pro- 
grams. (Has RS232 
built in stringy) 

HOWTOOR0ER 
DATA-TRAXS 1000 

1 . We accept Visa, Master 
Charge. Make cashiers checks or 
personal check payable to: 

DATA-TRAIVS 

2. All orders are shipped 
F.O.B. San Jose, CA 

3. Deliveries are immediate 




Desk and table top models also available. 
For orders and information 

DATA-TRANS 

45277 Fremont Blvd., #7 .-274 
Freinont CA 94538 

Phone: (408) 263-9246 
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Hemfi^ 




PLUS 




LJLJLJLJQC3CJLJL J LJ O 

[QnaaaaatJLJ— 

El [Zl CD IZl CZl [Zl CD □! 



Pocket Computer $189 




Color Computer 4K $31 
W/16K Ext. Basic $489 




32K Exp. Int. $362 











MHH^E 




JH^^B^Htiisa .9*1= 




n^^i^s 




/ 


flgMH^jgHQ 


\ 


i^ T^=aa^|^ 

Model III 16K $859 





Here are Just a few of our fine offers . . . 
call toll-free for full information. 



COMPUTERS 




PERIPHERALS 




Model II 64K 


$3300 


Expansion Interface OK 


$249 


Model III 4K LEVI 


599 


Expansion Interface 16K 


359 


ModeMII16K 


859 


+ Expansion Interface 16K 


305.50 


Model III 32K 


981.50 


Expansion Interface 32K 


469.95 


+ Model III 32K 


915.50 


+ Expansion Interface 32K 


362 


Model III 48K 


1104 


16K RAM N.E.C 200 N.S. chips 39 


+ Modellll48K 


972 


MODEMS 




Model III 32K 




Lynx Direct Connect 


219 


2 Disc & RS232 c 


2100 


COMM 80 Interface 


159.95 


Color Computer 4K 


310 


Chatterbox Interface 


239 


Color Computer 16K 


432.50 


Telephone Interface II 


169 


+ Color Computer 16K 


366.50 


R.S. Modem 1 D.C 


130 


Color Computer 16K 




Atari 830 Modem 


159 


w/extended basic 


489 


Atari 850 Interface 


183 


Pocket Computer 


199 


PRINTERS 




VIDEOTEX 


310 


Line Printer tV 


849 


APPLE 48K only 


1279 


Daisy Wheel II 


1695 


ATARI 800 32K 


789 


Line Printer VI 


999 






Epson MX80 


499 


+ Computer Plus New Equipment. 


Line Printer Vli 


315 


180 Day Extended Warrantv 




Line Printer V 


1610 






Epson MX80 FT 


599 



PLUS real back-up warrantees — 



Factory warrantees on Apple and Atari equipment. Other 
equipment carries manufacturer's warranty or Computer 
Plus 180 day extended warranty. Combined warrantees 
carry Computer Plus 180 day warranty or original manu- 
facturer's warranty. 



Atari 625 

Pocket Computer Printer 130 

Centronics 737 737 

DISK DRIVES 

R.S. Model III IST-Drive 712 

TEAC40TrackMI 319 

R.S.I Drive Exp Mil 999 

R.S. 2 Drive Exp Mil 1518 

R.S. 3 Drive Exp Mil 2040 

Seimans8"MII 799 

Atari 810 Disk 499 

SOFTWARE 

R.S. Software 10% off list 
Atari Software 10% off list 

Newdos + (40) track Ml 88 

NewdosSOMIIi 149 

ST80I1I 149 

ETC. 
Verbatum 5" Double Density 32 

Verbatum 8 " Data Life 49.95 

Ctr-80A recorder 52 

CC Joysticks 22 



call TOLL FREE 1-800-343-8124 



com 



DEALER INQUIRIES ARE INVITED 

Prices subject to change without notice. 
Not responsible for typographical errors. 
TRS-80 is a registered trademark of Tandy Corp. 




Dept. D 

245A Great Road 

Littleton. MA 01460 

617-486-3193 



Write for your 
free catalog 



-S«e List ol Advertisers or] page 306 
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ADD DISK DRIVES ™^°"'' 
MODEL III AND MODEL I 

= $599 ll$299' 



Fully compatible with Radio Shack's operating system 
TRSDOS. 

• One, two. three, four drive configurations. 

• 134K to over 1 Meg of storage 

• 40 track and 80 track available 

• 90 day warranty, 100% parts and labor 

• Extended warranty available 

Complete upgrade includes one mini-disk drive, power 
supply, controller, and mounting fiardware. IMMEDIATE 
.DELIVERY. 

OUR RADIO 
PRICE SHACK 
Complete one drive kit $599 $849 

Additional internal drive 266. 399 

External drive 299. 499 

80 track drives (inc patch) add 195,ea N/A 
16K memory 

(required to use drives) 49. 119 59% 

Model III 32K w/VR Data 

two drive assembly 1812. 2380. 24% 

RS232 Adapter Board 75 99. 25% 



SAVINGS 

29% 
34% 
32% 



We've broken through the three hundred dollar barrier 

• Fully compatible with TRSDOS'" 

• Fully compatible with RS Drives 

• Easy plug-in installation 

• Rigid extender board 

• 90 day warranty — 100% parts and labor 

• Extended warranty available — $45/year 

• Choice of Tandon or MPI drives 

• Includes power supply, enclosure, single sided — 
40tk drive and EXTENDER BOARD 

1 sided80tk-$4i9 2sided40tk-S4i9 

2 sided eotk - $549 

^ MONTHLY SPECIALS " 

MX 80 $ 485 

Microline80 $ 425 

NEC5510w/tractor $2550 

PuBlished Prices A-e At.eady DiscoufHed Foi Cash 

VR Data, amanutaclurei ol mnovattvecompijlef p'oOucls iskno*n wo'idwide 

tot quality deperiaabilily and prompl pe'sonal service since 1972 



|To order call toll Iree (600) 345-8102, or (215) 461-5300 in PA. 

VR Data Corporation • 777 Henderson Boulevard • Folcroft, PA 19032 




^ 
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GET ORGANIZED 

With These Utility Programs From Instant Software 



FIND IT QUICK 



Pu( an end lo ihe Misplaced Inlorma- 
lion Syndrome! Here is a reliable, fasi. 
subject -oriented inrormalion locaior— 
UND IT QUICK! This inlormation in 
dexing and retrieval system is versatile and 
llexible— Ihe ideal tool for doctors, 
lawyers, engineers. businessirKn, educa- 
tors, anyone who needs to locale informa- 
tion. 

Designed with a journal /magazine for- 
mal, FIQ is versatile enough to be used to 
store and retrieve any type of reference in- 
formation including client lists, vendor 
advertisements, report bibliographies and 
more — even poems and famous quota- 
tions. Subjects can be indexed or called 
according to aulhur. journal and date or 
by up to nine keywords that you deter- 
mine. Keywords can be used singly or in 
combination during the search routii>es. 

hTQ can be used by anyone, H requires 
no special skill, just the abihty to type. ^- 



ticle references to be stored can be pre- 
selected and then entered into the system 
by a secretary or assistant. The contents 
of entire file cabinets can even be indexed 
and stored! 

FIND IT QUICK requires a minimum 
system consisting of a TRS-80 Model I 
Level II with I6K of RAM. an Expansion 
Inierfac-e with 16K of RAM and at least 
one disk drive. Up to 1080 items can be 
stored on one data disk. Instant Soft- 
ware's Tiny DOS operating system is in- 
cluded on the program disk so that you 
can use the program without fuss or 
bother. 

Make your computer work like your 
own personal librarian with KIND IT 
QUICK. Can you afford to wail another 
day? 
Order No. Q258RD S49.95. Disk 



MASTER DIRECTORY 



The MASTER DIRECTORY is a disk 
file storage program that reads the tiles on 
all your disks and stores the file nantes and 
extensions and even records the free space 
on each disk. All you have to do is number 
the disks in your library and the MASTER 
DIRECTORY wiU keep track of their con- 
tents. You can read the names, displayed 
alphabetically, search the DIRECTORY 
for file names and extensions, delete disks 
and search for free space. You can store 
5000 files or 320 disks, whichever comes 
first . 

Your disk storage problems are over now 
that the MASTER DIRECTORY is here. 
This package requires Ihe following 
minimum system: 

1. A TRS-80 Level 11 with I6K RAM. 

2. An Expansion Interface. 

3. One (or more) disk drives. 




Order No. SOOSRD (dkk-bvsrd versioii) 
$29.95 



Instant Software 



^532 



PETERBOROUGH, N.H. 03458 



TO ORDER: 



SEE YOUR LOCAL 

INSTANT SOFTWARE DEALER 

OR CALL TOLL-FREE 

1-800-258-5473 



232 • 80 Microcomputing, July 1981 



whole line at a time. You specify what line 
you'd like to replace and then replace it. 

You store a letter on disk with the Save 
command. Before you store it, you're 
prompted to save an updated version of the 
disk's table of contents. 

Video displays the present text just as it 
will appear when printed. I^^any times, for in- 
stance after changing a parameter, you'll 
want to see the entire text. 

Exit allows you to escape from the word 
processor program gracefully. The exact 
method used will be up to you. You may 
want to simply say end or stop on line 1980. 

Table of contents was added as an after- 
thought and has proven very helpful. I add- 
ed the table of contents to list all letters 
saved. That way you don't need to hit Break, 
System directory to find a letter. Entering T 
will get you the table of contents from the 
disk, which is just a letter named table 
stored on the disk. 

I've set up this system with a Microline 
printer and Radio Shack Line Printer I II. Un- 
doubtedly other modifications to the print 
program may be necessary to accommo- 
date other printers. ■ 



"The Blank command deletes. . . 
lines from the text. . . As you will 
find out, this is. . . very useful." 



IBSB LPRINTCHR»(W)- CHR»IV) !CHRHT) ! IIFPNK) " V"OR(Plt="N"RNDX = l ) THEN17BIB 

1B9B LPRINTTfiBfLM)H»iT0B(LL+Lri-7) "Page" 1 US ING"#i»" i X : LPRINT 

1700 FaBP=MTDM+PL-li IFP) LATHEN17iiB 

1710 M-M+l ilFSTHENLPRINTSTRlNGllS. IB) 

1720 LPRINTTPBILM) ? '■ IFN»=" V THENLPRINTUSlNGFtI P! 

1730 LPfiINTn«(P) ! IFOSCf RIGHT»(Bt(P1. 1) ) <) SBTHENNEXTP 

174B lFP>LfiTHEN60ELSE5VSTEf1"FORMS T" : PRINT" PRGE" J X+1 i " HEADY, IF SO PRES5 ENTER" I 

! INPUTEi X = X + 1 : GOTO 1 EBB 

1750 INPUT"REPLfiCE LINE" !L! IFL (BORL) LRTHENSB 'replace 

1780 R"]tfi»<L)- L=L-l!GDTD9a 

1770 TC»" INPUT"SPVE UPDATED TABLE OF CONTENTS CY/N) " !TC»i IFTC*=" Y"THENZ»="TfiB 

LE"ira]T01773 • s*v* 

1772 INPUT"PLEfiSE NAME THIS LETTER'-iZ* 

1773 CLS:PRINT"SflVIND PRESENT LETTER QN DISK AS: ";Z» 
1775 OPEN"D", l.Zt 

1780 PRINTtl, LA", "LL", "S", "Nt", "FL". "LM", "PL". "PN*", "FP", "Pit", "H*>FORL=BTDLASTE 

P4 

1790 FDRJ=BTD3: I=L+J! X=LEM.fi»(I) ) : X*C J) -" " ! IFX (ITHENIBIB 

1800 FDRK=lTOX!X».(J)=X*(J)+CHRK.OSCfMID»(fi»(n,K, n) + 12S) sNEXTK 

1810 NEXTJ:PHINTtll, X* (B) " , " Xtf 1 ) " , "X»(2)'-. "X»(3) : NEXTL: CLOSE IGDTOGB 

1830 CLS:X=FP-1 iFQRM=FLTOLfiSTEPPLiX=X+l ' v i d»0 

1840 lFPl*="N"fl^DX=lTHEN18&B 

1850 lFPN«="Y"THENPRINTH»lTfiB(LL-7) "Page" ! USING "«»#" !X:PRINT 

IBGB FORI=flTaH+PL-li IFI) LfiTHENlSSB 

1B70 IFSTHENPRINTSTRINGKS-1, IB) 

18BB GO3UB1910 

IB9B NEXT I ifi»-"" ilFI <=LHTHENINPUT" PRESS ENTER" !fi»: IFft*<> ""THENM=LA 

19BB NEXTMii,=LRiGOTDEB 

ISIB Y=LENfR*( I) ) ! IFYTHENft=flSC'RIGHT*(AttI), l))ELSEfl=0 

1320 IFNt="V"THENPBINTUSINDF*.! I ! 

1930 PRINTR*(I) ! iIFR=17THENPRINTCHR*(92' : 

1940 IFfi=2BTHENPRlrJTCHRtiS.3) ! ELSEIFB=UTHENPRINTCHR* i 95 ' ! 

1950 IFNK)"Y"ORY<)BBTHENPRINT 

I960 RETURN 

197B CLSrlNPUT-REALLV EXIT ' V/N) " ! A»: IFO* <> "Y"THEN60 'ex,X 

19eB CLS:CLEAR500JPR1NT"THE END" sUOBD" INLAND" . R 



EDfIS 



EDAS is a sophisticated Editor 
and Assembler for the '80 Model 
I or Model III. All commands 
and SOURCE text can be enter- 
ed in upper or lower case. Direct 
assembly for memory or mul- 
tiple disk files by means of 'GET 
assembler directives provides 
the capability of assembling 
huge source files with 30,000 
bytes of symbol table. Direct 
assembly to disk or memory for 
faster debugging operations. 
DOS functions DIR, KILL, and 
LIST are available from within 
EDAS. The Editor provides 
block move & global change 
withBASICsyntaxediting. EDAS 
provides power with ease of 
use. $79 + SSErH. 



DIJTIL 



DUTIL is a utility to examine, 
clear, initialize, move, and modify 
data in memory. Load, punch, 
verifySYSTEMtapes. Disk sector 
I/O. Morel $20. 



C^DfJLE 



Nowyoucanappendtwoormore 
CMDfilesand/orSYSTEM tapes. 
Perform transfer to & from disk/ 
tape of SYSTEM/CMD modules 
with offset capabilities, $20. 




LDOS is the latest generation of sophisti- 
cated operating systems for the TRS-80 
computers. LDOS is completely docu- 
mented in a 2S2-page reference manual. 
Total support is provided from some of 
the most knowledgeable people in the 
industry. You owe it to yourself to inves- 
tigate this system. Call or write for details. 
LDOS is priced at $149 plus $4 SErH. 



LDDS 5.Q 



Complement 
Z-80 disasserti 
cassette, or 
provjdi 
atic 



DS^BLH 



tools with this 
reen, printer, 
iss process 
8-bit rel- 
ated. 




MISOSYSfDept. MU2 ^221 

5904 Edglhill Drive 

Alexandria, Virginia 22303 

703-960-2998 MicroNET 70140,310 

Dealers Inquiry Invited 



DJEKiriQD 

Turn your Editor Assembler into 
a disk package. This 32K patch 
modifies EDTASM for DOS op- 
eration. Features? Add full disk 
I/O. block move, global change, 
printer pagination, sorted sym- 
bol table, print memory utiliza- 
tion, enhance DEEM expansion, 
protect memory, and recover 
after BOOT. From within the 
EDTASM you will have DIR, 
KILL, & FREE. Upgrade your 
EDTASM! $20. 

THE B00h 

THE BOOKS must tje a part of 
your tools. Volume I gives you 
access to all math operations in 
your Level II ROM. A symbol 
table of the entire machine not- 
ing over 500 addresses is includ- 
ed. Volume II tells you every- 
thing you wanted to know about 
the Level II I/O — printer, key- 
board, video, and cassette rou- 
tines are fully explained. Each 
volume has a fully commented 
listing of all the routines dis- 
cussed. THE BOOKS will save 
you hours of assembler pro- 
gramming. Each volume is priced 
at $14.95 or buy both for S24.95. 
Add $1.50 S&H per book. 



-See L/s( of Advertisers on page 306 
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GRAPHIC DIVERSIONS! 




GRBASIC 



3-D Adventures 

Our 3-D adventures combine the traditional word oriented 
adventure with full screen 3-D perspective graphics! Hallways, 
stairs, elevators, obiects, and even characters in Asylum, are 
represented m 3-D graphics as though you are actually there! 

. truly one of the best adventure games by any criteria, it 
borders on the unbelievable Believe it. Buy it," MJ.M , The 
Space Gamer 

This has got to be the most infuriating, irritating, aggravating, 
frustrating, angering, spellbinding game on the market." D.M., 
80 Microcomputing 

ASYLUM places you m the residence home for Deathmaze 
Survivors To leave, you must deal with guards, fellow survivors, 
doctors, the infamous crazed carpenter, and much, much more. 
TRS-80 Level II 16K or Model III 16K $14.95 

Model I DISK $19.95 

LABYRINTH places you in a huge maze of tunnels inhabited by 
gnomes, ghosts, witches, and an evil mmotaur. You must find 
the weapons and treasures needed to destroy the mmotaur 
before he destroys youi 

TRS-80 Level II 16K or Model III 16K $12.95 

Model I DISK $17 95 

DEATHMAZE 5000 places you in a gigantic five-story building 
There is only one goal. ESCAPE ALIVE! Monsters, dogs, 
vampires, and other vile horrors will plague your every step as 
you struggle to survive one of the most challenging adventures 
ever written 

TRS-80 Level II 16K or Model III 16K $12.95 

Model ! DISK $17 95 



GRBASIC extends Level II or DISK BASIC to mclude an easy to 
use graphics command set. A single BASIC command allows 
the user to draw a line between any two pixels on the screen in 
hundredths of a second! Coordinates can be chained to allow 
complex figures to be drawn by a single BASIC program line in 
less than a second! 

GRBASIC allows the definition of shapes. Once defined, a 
shape can be rotated, scaled up or down in size, drawn 
anywhere on the screen in less than a second, and can even be 
drawn totally or partially "off" the screen in extended space! 
And all with short, simple BASIC commands! Even multiple 
shapes are no problemi 

GRBASIC is not a string-packer or machine-language USR- 
called utility- GRBASIC is fully integrated into Level II and 
DISK BASIC. There is nothing on the market that offers its 
graphic features, except possibly the Apple II computer! 
Animation, scientific plotting, and professional data displays 
are now child's play! 

A new program, GRBASIC FUNCTION PLOTTER, allows the 
plotting of almost any function, including polar coordinate 
based figures and almost any wave form. Features include 
function definition and automatic screen scaling. REQUIRES 
GRBASIC! 

GRBASIC cassette $19.95 

GRBASIC TRS-DOS disk $24.95 

GRBASIC NEWDOS80 disk $24,95 

GRBASIC FUNCTION PLOTTER $14 95 



Examples of graphics 
produced with GRBASIC 
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MICRO-WORLD 



JOURNEY TO THE 
CENTER OF THE TRS-80! 

Micro-World is an adventure like no other. You are transformed 
into an electrold, and must travel through the circuits of your 
TRS-801 You will be required to solve many incredible problems, 
and in the process you will gain a knowledge of how a TRS-BO 
operates. 

Micro-World is one of the most advanced pieces of machine 
language programming Med Systems has published. A special 
encoding scheme has allowed a 21K adventure to fit in 16K 
Micro-World is verbose. Messages are frequent and fact filled. 
There are over 60 locations that must be explored 

Mtcro-World is an excellent educational simulation! It is 
supplied with a booklet containing a glossary and explanations 
of the electronic circuits inside the TRS-80. This does not in any 
way dimmish the challenge! If anything, the challenge increases 
since you must gain a working knowledge of your computer to 
gain access to the final circuit! 



Model I Level II 16K or Model II 
Model I disk 



16K cassette 



$19.95 
$2495 



The PlaySul Professor 

The Playful Professor has been a constant best-seller since its 
introduction in 1980. This program is a mathematical tutorial 
that provides instruction in addition, subtraction, multiplication, 
and division, with or without fractions. Problems are presented 
m a game format that gives a step-by-step tutorial for incorrect 
answers. 

The Playful Professor places the user in a 60 room mansion 
haunted by an intelligent ghost who holds the key to the only 
door out. Options include 3 difficulty levels, choice of problem 
type, 1 or 2 players, pass option, and split difficulty levels to 
allow 7 year olds to play competitively with 27 year oldsl 
Graphics are used extensively. 

"I'm so impressed with The Playful Professor. Money Master, 
and Deathmaze. At the Mead School we use these three 
programs daily." R.J., Greenwich, Conn. 

"My 7 year old daughter had a fun way to review her math . . . 
my 4 year old enjoys playing using the pass feature (what an 
experience it is to watch a 4 year old use a computer!)" S.C, 
Highland, Maryland 



Model I or Model III Level 
Model I DISK 



16K 



$12,95 
$16 95 



Med Systems Software 

P.O. Box 2674-S Chapel Hill, NC 27S14 
(919)935-1990 



^^^^ 




SATISFACTION GUARANTEED! 

If for any reason you are not satisfied with our products, return 
your order within 14 days for a prompt and cheerful refund. 



ORDERING INFORMATION 

Orders are processed within five working days. We pay all 
postage and handling within the U.S., Canada, and US. 
territories. European orders please include $3.00 for air post. 



D Asylum ($14.95) $ 

n Deathmaze 500 {$1 2.95) $ 

D Labyrinth ($12.95) $ 

Q Adventures on Disk (add $5.00) $ 

DGRBASIC Cassette ($19.95) $ 

DGRBASICTRS-DOS Disk ($24.95) $ 

DGRBASIC NEWDOS 80 Disk ($24.95) $ 

D GRBASIC FUNCTION PLOTTER ($1 4.95) $ 

DPIayful Professor ($12.95) $ 

D MICRO-WORLD ($19,95) $ 

□ MICRO-WORLD Disk ($24,95) $ 

Total $ 

Name 

Street 

City 



-Sfafe- 



Zip. 



Computer: 

□ TRS-80LII 16K 
Q Mastercard 

MC or VISA tt 

Expiration Date 



□ Visa 



□ Model III 16K 

□ check 
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REVIEW 



Archbold's Mod I 
Speed-Up Kit 



Model 1 Speed-Up 
Archbold Electronics 
Rancho Cordova, CA 
$37.S0 

Richard C. McQarvey 
221 HIrschfield Drive 
miiamsville, NY 14221 



Every computerist wants to do his com- 
puter work as fast as possible. Efficient 
programs are a good way to speed up your 
work. Compressing code or using faster 
code such as machine language also helps 
speed up your computer's operation. There 
are other tricks, but there Is always the ulti- 
mate (Imitation of the clock speed of your 
computer. No matter how efficient your 
code or how fast your accessories, you 
can't beat the built-in limitation of a slow 
clock speed. 

In the case of the TRS-80 fwlodel I, that 
clock speed Is based on the Z-80 CPU. The 
Z-dO is rated at two MHz but can function 
safely at about three MHz. Tandy, however, 
decided that for the best cassette I/O speed 
(and whatever other reasons) to limit the 
speed of the Model I to approximately 1.77 
MHz. (I say approximately because slight 
differences between machines exist.) This 
Is built-in slow down and not an insur- 
mountable problem, since the computer is 
not operating at Its maximum efficiency. 

No Electronic Qenlus 

I recently purchased a speed-up kit and 
installed It. I'm no electronic genius. In fact, 
I have trouble soldering, let alone accom- 
plishing anything major. For that reason I 
have put off making any changes to the 
computer that require hardware modifica- 
tions on a do-it-yourself basis. But t've had 
this computer for several years now and I 
get bolder as time goes on, so I decided to 
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give It a shot. Here are the results of that at- 
tempt (written on my operating and high 
speed TRS-80). 

The FIrat Hurdle 

When I order by mail I like to receive my 
order in a reasonable length of time. I usual- 
ly supply a credit card number to avoid the 
delay of processing personal checks, but 
with the recent increase in interest rates I 
have vowed never again to charge. For this 
reason I went to the bank and purchased a 
money order so the speed-up kit could be 
sent without delay. 

After four weeks I got nervous. After six 
weeks I wrote a letter to find out where my 
kit was. Eight weeks later to the day, my kit 
showed up In the mall. I don't know If there 
were any special problems, but eight weeks 
is a bit too long. 

The Second Hurdle 

The documentation leaves something to 
be desired. It includes 16 pages of Instruc- 
tion (the length Is due to the different types 
of logic boards in the TRS-80). There Is also 
a two page addendunn which has numerous 
changes to the instructions. From experi- 
ence I can tell you this: Read through the 
corrections and make them on the original 
instruction manual whether or not they ap- 
ply to your board, l^ls will help prevent di- 
sastrous errors later on. There is also a 
full-size photo of the computer's logic 
board that Is marked for easy location of 



Progrsm NaiDM 


Noimal Speed 


Minimum Speed-up 


Busy Work 


13 mln. 27 sec. 


5 mln. 3 sec. 


ANOVA 
Descripttvs Stats 






9 sec. 




forfNaxt Loops 


1min. 19 sac. 






Table 1. Time Comparisons of Some Pro-\ 


grams 




1 



every connection and trace. 

The documentation is a little confusing. 
Read and understand it before you start. 
This Is not the type of project you just jump 
Into and then tiack up to correct mistakes. 
Do it right the first time! If you are not 
familiar with soldering techniques, printed 
circuit boards and ICs, you should consider 
having the kit Installed by someone who 
knows what they are doing. It's not impossi- 
ble for a novice to Install the kit; 1 did it, but 
It was frustrating as hell. I could install the 
kit in about an hour now. At the time, it took 
me four hours of cursing and wondering. 

The Kit 

The Speed-up kit is composed of a small 
circuit board that is extremely well made. 
(See Photo 1 which shows the speed-up 
board as well as all of the accessory parts.) 
A twenty wire ribtwn cable extends from the 
speed-up board, and these twenty wires are 
connected to various points on the comput- 
er logic board. In the kit box are a few extra 
parts: one diode, one LED, one capacitor, 
one length of wire, a connector/coupler and 
one length of very fine solder. You may or 
may not need these parts, depending on 
board type and whether or not you have an 
expansion Interface and disk drives. 

I'm sure you've seen the ads for the Arch- 
bold speed-up kit In 80 Microcomputing. 
They are a little misleading. The ad doesn't 
mention that In order to pump up the speed 
of your computer to the maximum six MHz, 
you will need a Z-80B CPU to replace the one 
In your computer. The Z-80 is fine (in most 
cases) for the three MHz conversion, but 
you will most likely run into trouble if you go 
faster. If your Z-80 won't handle the 100 per- 
cent Increase, up to a $27 investment in a 
Z-80A will fix the problem. On the other 
hand, the Z-80B is rated at six MHz which 
makes it very fast compared to the Z-80, and 
the cost is around $30. Also note that pecu- 
liarities between computers may give you 



"So far I have found only 

one operation problem in the 

. kit modification: keyboard debounce. " 



better or worse results and you must re- 
member that all of the above times are sub- 
ject to those differences. 

They also fail to mention that in order to 
make the Z-80B operative you need a delay 
line. You can purchase it from Archbold or 
from a local supply store— either way it 
runs about $20. Also, if you have an expan- 
sion interface, you need a delay line for that 
too. Now you are up to about a $55 increase 
over and above the price of the kit. 

Installation 

The installation is not too difficult, but I 
would like to give potential users a few tips. 

1) Be careful soldering. Too much heat is 
a no-no. Also, too much solder can cause a 
run or even a thread to bridge between two 
points that are not supposed to be con- 
nected. That will not cause any permanent 
damage, but the computer won't work and 
those errors are a real pain to locate. 

2) Be extremely careful when you fold the 
keyboard unit away from the logic board. 
The connector is sensitive and rough han- 
dling can cause an expensive break. 

3) Be neat! Little bits of solder or wire in 
the unit may sit there for a long time. A jolt 
to the desk or keyboard, and the computer 
is suddenly down. If you take it to a repair 
shop they will dust it off and charge you an 
arm and both legs as well as your first born 
child. 

4) Have all the necessary tools ready 
when you start to work. You need to be or- 
derly when working with systems as compli- 
cated as printed circuit boards. 

5) Remember that your computer uses 
very little power. For that reason there is 
very little excess power available. When you 
add accessories that use computer power, 
you are straining the limits of the 
computer's regulator. Don't make 300 modi- 
fications that all use computer power or the 
computer will crawl away and die. Use only 
those that are most important to you. 

Does It Work? 

The kit does work and you can power up 
in either high or low speed (a simple modifi- 
cation to the kit board) and then change it to 
the opposite speed with a simple OUT 254,1 
(or 0, depending on which way you want to 
go). The LED that is included changes color 
to indicate what mode you are in. Red is nor- 
mal, green is high speed and yellow is 50 
percent slower than normal (50 percent 
below normal Is switch controlled). Also, 
the board automatically reduces speed 
when cassette or disk I/O is performed, and 
then returns to high speed (if that was 
selected) when the I/O is complete. Note 
that if manual switching is used, cassette 
automatic down speed will no longer occur. 

If manually switched into high speed. 



disk access will cause automatic slow 
down, but cassette access will require an 
OUT instruction (or manual switching) to 
slow the computer. This manual switching 
makes it possible to run 50 percent slower 
than normal or high speed. Switching can 
be done during program operation with no 
interference in the program's performance; 
however, the extra work for the minimum 
benefit seems to me to be a waste of time. 
The switch is not included in the kit but is 
readily available at your local supply store. 
I tested the speed-up with several pro- 
grams. See Table 1 for the results for com- 
parison. You will note a substantial in- 
crease in operating time between the nor- 
mal times and the speed-up times due to my 
100 percent increase. Not all the speeds are 
twice as fast, but that is due to the type of 
operation the computer is doing. The longer 
programs show 100 percent or better in- 
crease in operating time. 

Operational Problems 

So far I have found only one operational 
problem in the speed-up kit modification: 
keyboard bounce. I have the old style Level 
11, so I need a debounce program. DOS as 
well as Scrlpsit have a debounce routine 
built in. Level II provides numerous de- 
bounce routines. The problem is that de- 
bounce is accomplished by introducing a 
time delay in the keyboard scan. That 
means that if a key double strikes, the sec- 
ond strike will occur before the delay is 
complete and the keyboard scan is reimple- 
mented. Therefore, the second key strike 
(bounce) is ignored. 




Photo 1. The Archbold Speed-up kit with all 
accessories. 
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SPEAK-EAZY 

- the - 

HUMAN QUALITY 

-VOICE SYNTHESIZER- 

$29900 

for the TRS 80* 

16K Level II 
=Tape or Disk= 

- complete with - 
25CH- WORDS in ROM 
EXPANDABLE 
SOFTWARE 
USERS MANUAL 
POWER SUPPLY 
AUDIO AMP 
INTERFACE CABLE 



*TRS 80 is a TM of 
Tandy Corp. ^27? 

progressive' 
euectromics 

643 E. Chestnut St. 

Lancaster, OH. 43130 

Ph: 614-687-1019 



GOSGB 



MERCENARY FORCE 
A str«t«gy simulation 

You are in command of a mercenary army. You must 
decide thenumberotmen, type of weapons, armor, air 
support, medical aid and type of transports you will 
need when you engage the enemy forces on their own 
ground. Battle the enemy In the jungle, undenwater, on 
moons and in space (1-4 players) TRS-80 L2 16K.$16.95 

PRINTERS 

EPSON MX-80 $555 " NEWFROMGOSUB •• 

BASE 2 850 $749 EPSON MX-80/MX-70 

OKiOATA $569 FRICTION FEED KIT! 

$25.00 S/H ON PRINTERS $49.95 

SOFTWARE FOR TRSBO MODEL ) & ll»PMC-80 

WAOON MASTER $9 95 YAHTZEE I $10,95 

QUARTER HORSE $8.95 WARRIOR $9 95 

GAME PACK #1 

QUARTER HORSE + YAHTZEE $14.95 

GAME PACK K 

WARRIOR + SPACE MERCHANT $14.95 

GAME PACK #3 

HIGHWAY SKILUGUNNER WALK THE PLANK.$12.95 

GAME PACK #4 

STAR TREK II + SPACE TRAINER $14.95 

KANSAS RES. ADD 3% SALES TAX. 

ALL PRICES SUBIECT TO CHANCE WITHOUT NOTICE 

FREE CATALOG UPON REQUEST. 

fTRS-aO IS A TRADEMARK OF TANDY CORP ) 

SEND CHECK OR MONEY ORDER TO: 

GOSUB ^284 

P.O. BOX 275-G 
WICHITA, KS 67201 




^5ee LisI of Advertisers on page 306 
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"The speed-up manual states that 
the Archbold speed-up is the best. . 
the manual doesn't lie." 



Well, when you speed up the operation 
you shorten the debounce delay. As a result, 
I have noticed an occasional keybounce. At 
my speed-up rate it is not bad, and cleaning 
the Iteys seems to have eliminated it alto- 
gether. I do see a problem for those who 
jump up to six MHz, because the delay will 
t>e so short as to be totally ineffectual. If 
you know your debounce program you can 
increase the delay and solve the problem. If 
not, you will be stuck! With no debounce 
and the high speed mod it is likely that the 
key bounce problem will be magnified. (My 
experience and testing verifies this.) 

There is a bright side to this point that 
might interest users of Level II with the new 
ROM based debounce. I have heard com- 
plaints that this built-in debounce is too 
slow, and fast typists can easily outrun it. In 
that case the high speed will probably make 
the ROM based debounce a little easier to 
deal with. 

Unaxpscted Qcxxlles 

t have a disk system and I very seldom 
use my cassette at all. There are, however, a 



few games and applications programs that 
are not disk compatible, so occasionally I 
run the cassette. After installing the Arch- 
bold kit, I wanted to see how it affected an 
Invaders game. Well, the game ran super 
fast and posed a real challenge, but I no- 
ticed something strange. The cassette 
loaded the first time with no error. That sur- 
prised me because that particular cassette 
usually took several attempts to load. In 
fact, I thought that there was a problem 
with the first program copy on that cassette 
because it always gave me a checksum er- 
ror. I usually had to load the second copy 
and often that didn't work either. 

This bit of good fortune started me think- 
ing, so I pulled out some other difficult to 
load cassettes in both BASIC and System. 
They all loaded the first time! I won't guar- 
antee that the same will happen in your 
case, but i suspect that when the speed-up 
kit is in the normal mode it actually runs a 
bit slower than the original set-up. For that 
reason the data transfer is less likely to 
miss bits and less checksum errors will oc- 
cur. I may be off base with this conclusion. 



but I can say that all my cassettes load. 
Even ones that I had given up for dead now 
load fine. Also I have noted that BASIC and 
System tapes load at the same volume. 

Conclusion 

The speed-up manual states that the 
Archbold speed-up is the best available 
regardless of price. 1 haven't tried any of 
the others but I know people who have. 
Based on what they have said, the manual 
doesn't lie. I'm very satisfied with the in- 
crease speed of operation, and even though 
the installation was a bit tricky, it was well 
worth it. If you would like that extra speed, 
then buy Archbold— it works and it works 
right !■ 



Note: In all fairness to Archbold Electronics 
I should point out that I ordered my kit from 
an old advertisement. The March issue o^80 
Micro has a new ad which is more accurate 
and points out the Z-80A and B options. Al- 
so, the price is now up to $45.00. 



Combine accurate flight characteristics with the best In animation graphics 
and you'll have SubLOGIC's 

T80-FS1 night Simulator 

fortheTRS-80 



SubLOGICs T80-FS1 is the smooth, realistic 
simulator that gives you a real-time, 3-D, 
out-ot-the-cockpit view of flight. 

Thanks to fast animation and accurate repre- 
sentation of flight, the non-pilot can now learn 
basic flight control, including take-offs and 
landings! And experienced pilots will recog- 
nize how thoroughly they can explore the 
aircraft's characteristics- 

Once you've acquired flight proficiency, 
you can engage in the exciting British Ace 
3-D Aerial Battle Game included in the 
package. Destroy the enemy s fuel depot 
while evading enemy fighters. 

Computer and aviation experts call the 
T80-FS1 a marvel of modern technology. 
You'll simoly call it fantastic! 



Special Features: 

• 3 frame-per -second flicker free 
animation 

• Maximum transfer keytuard input 

• Constant feedback cassette loader 

Hardware Requirements: 

• Radio Shack TRS-80, Level 1 or 2 

• 16K memory 

• Nothing else! 

nly ^m^9 




Only 



See your dealer or order direct. For 
direct order, include $1.25 and specify 
UPS or first class mail. Illinois residents 
add 5% sales tax. Visa and Mastercard 
accepted. 








LXXalC 

Communications Corp. 
Box V, Savoy, I L 61874 
(217)359-8482 
Telex: 206995 v-i50 
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NEED A LETTER QUALITY PRINTER 
BUT DON'T WANT TO PAY THE PRICE? 

Then American Business Computers Has Just The Printer For You! 



tt pT'Hiiicfs r if> pHntiiftfe (f/timm The ^runtriter a^ftrmtrfHktin 

fiap^ utdlhi up ut iMi mm l ITf. 
/rtcHi'n feeding iimtlnwms f'trmi ^t 





' tfteniiiitnat fr^mt fn*net 
siAlichet. mnunrf^ 'M a PC. hntmt 



The Slarwriter Daisy Wheel Printer is designed to fill a distinct gap in the peripheral marketplace. A speed of 25 cps and its low price make it the 
ideal choice for today's systems designer interested in achieving superior price/ performance ratios. 

Incorporating the latest LSI technology, the Starwriter is built by one of the world's most respected computer peripheral manufacturers. The 
printer is furnished complete and ready-to-use, requiring no changes in hardware or software. Starwriter offers an industry standard parallel inter- 
face, as well as RS232-C interface. Total plug compatibility and a wide variety of interface matching capabilities help lower the system integration 
costs for OEMs and end-users. 

Using a 96^haracter wheel, the Starwriter produces letter-quality printing on 3 sharp copies with up to 136 columns. Starwriter offers the highest 
degree of vertical and horizontal positioning, resulting in the most precise character placement in the industry. The easy-io-change character wheel 
also makes our printer a perfect choice for international applications. Compatible with sheet feeders, starwriter accommodates paper widths to 
381 mm(l5")andusesindustrystandardribboncartridgcs. 

Along with a self-test capability and a programmable VFU (Vertical Format Unit), Starwriter furnishes the operator with all desirable status 
functions, commands and program selectable switches. Panel lamps indicate the current Paper, Select and Power status. 

The easy plug-in compatibility of Starwriter and its outstanding print performance makes the Starwriter perfect for TRS-80*, Apple*, and S-100 
users. 

Starwriter is backed up by a one-year warranty (3 months on parts and labor, 9 succeeding months on parts) and is further supported by a strong, 
fully trained and technically proficient service organization. The Starwriter is available for immediate shipment in any quantity desired. 

For more information, call American Business Computer. 1 1 8 So. Mill Street. Pryor, Oklahoma 74361 ; Telephone 918-825-4844. 

•TM of Tandy Corp "'' 

•TM of Apple Computer Corp. 



AMERICAN BUSINESS COMPUTERS 

1 18 So. Mill Street 
Pryor, Oklahoma 74361 
Telephone 918-825-4844 

Dealer Inquiries Invited 



-529 



AMERICAN 

1 18 SO. MILL STREET • PRYOR, OK 74361 
PHONE (918) 825-4844 



All LISTED PRiCES ARE CASH DISCOUNTED WE ACCEPT MC. VISA, AND COD (REQUIRES CERIIFIEO ChtCK, CASHIERS CHECK OR CASH). FOR CHARGE 
COD SERVICE PLEASE ADD 5% SHIPPING AND HANOl.^JG ARE FREE ON ALL ORDERS OKI AHOMA RESIDENTS PLEASE ADD J% SALES TAX 



ORDERS PLEASE ADD 3% FOR 



32K-EXPANSION INTERFACES 



SPECIAL OFFERING. 

Due to a very special purchase, 
American Business Computers 
is able to offer a limited number 
of Radio Shack* Expansion 
Interfaces at the lowest price 



For TRS-80* 
Model 1 

399" 



American Business Computers 
guarantees Expansion Interfaces 
to be Brand New — still in origi- 
nal documentation and in per- 
fect working condition. 



ever. 



ALL CABLES AND DOCUMENTATION ARE INCLUDED WITH INTERFACES. ^ 3m 



NEW PRODUCT FOR THE COLOR COMPUTER.. .MOON LANDER BY GREG ZUMWALT 

In this exciting new adventure for the Color Computer* you attempt to guide your lander to a safe landing. Watch 
out for the hills and valleys and don't run out of fuel! Tough, Challenging, and Exciting. You won't want to miss 
this one ONLY $14.95 
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PAPER FOR YOUR PRINTER 



9'/2x n 

3200 Sheets- 15 Pounds 

$39.00 



Prices Includes 

Shipping Within 

Continental 

United States 

Via Ups 



14x11 
3200Sheeis- 15 Pounds 

$44.00 



it • New Item • • 

Continuous Envelopes - Thai's Right - Fanfoid envelopes with tractor perforations down 
either side. 

ENVELOPE SIZE 4 '/zx 10" with tractor perforations 4'/^ x 11" 



PRICE 59 '^ per thousand. 
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TEAC DISK DRIVES 



We are pleased to an- 
nounce that we are now 
able to offer TRS-80 
compatible mini disk 
drives. These drives are 
fully compatible with 
TRSDOS, NEWDOS. 
and NEWDOS 80 PLUS. 
The TEAC DRIVE is one 
of the first lapanese disk 
drives to appear on the 
American market. In 
many ways il is quite su- 
perior to its American 
made counterparts. 



$275.°° 



$570 



Dud Drive In One Endosure 
(Cabinet) 

Two Drive Cable - $29.95 
Four Drive Cable - $39.95 



A high -precision lead 
screw method is used for 
positioning the head to 
the correct track. Four 
motor steps are used for 
move the width of one 
track. This improved 
positioning accuracy 
greatly reduces the pos- 
sibility of data error. 



Attention: 

CORVUS 
OWNERS 



American Business Computer NOW offers a 
fully compatible TRSDOS* operating system. 
Our System, called CORDOS. runs all 10 MB. 
Revision B Corvus drives. The Progfam in this 
package contains a Master Program which will 
converta user's operating system disk (Version 
2.0) Id an enhanced system capable of the fol- 
lowing: 

— Completely transparent use of the Corvus 

Hand Disk Drive 
-Complete compatibility with existing 

programs 
-All utilities (except Format and Backup, 

which should not be used) will operate 

normally. 

Price: i3U.0B with manual 

- DEALER INQUIRlEStNVITED - 

COROOS Author - AndyFrederickson 

"TM of Tandy Corporation 

*TM of Corvus Systems 



BUSINESS 
COMPUTERS 



■¥■ 





THE MX-80 NOT ONLY 

DOES EVERYTHING, IT 

DOES EVERYTHING 

WELL. 



This is the new Epson MX-80 dot matrix printer. It does just about everything you could 
ask a printer to do. Quickly. Quietly. Reliably. In fact, for OEM installations, the MX- 
80 may be the single best, ail-round printer you can buy. But that's not the best reason 
to buy it. 

The MX-80 prints bidireclionally at 80 CPS in a user-defined choice of 40, SO, 66 or 132 
colunms. And if that's not fast enough, its logical seeking function minimizes print head 
travel time. The MX-80 prints % ASCII, 64 graphic and eight international characters 
with a tack-sharp 9x9 matrix. For a long time. Epson printers are known for reliability 
and the MX-80 is no exception. But that's not the best reason to buy it cither. 
The print head has a life expectancy of up to 100 x 10* characters, and when it wears out, 
just throw it away. A new one costs less than $30 and the only tool you need to change 
it is attached to the end of your arm. The MX-80 is compact weighs only 12 lbs., and the 
whole unit, including the two stepper motors controlling carriage and paper feeding 
functions, is precisely controlled by an internal microprocessor. But even that isn't why 
you should specify the MX-80, 

The best reason is this: because Epson Cflll For TlnhpllPvnhlv 

makes more printers than anyone else in " "*-»" I" "f <-* nUCIievaOiy 

the world, we can afford to sell each one 'T ,nw Prir** 

for a little less. "^""^ rriLC 
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AW... WHAT THE HECK 

RAM Memory Chips for the TRS-80 



It is the policy of American 
Business Computers to offer 
merchandise at the lowest 
price possible. Serveral 
months back we began sell- 
ing RAM Memory Chips for 
the TRS-80 for $45.00 
per set. Someone else sold 
chips for $44.00. We sold 
them for $38.00. They sold 
them for $37.95. So we say 

"AW WHAT THE 

HECK!" Let's see the other 
guys beat this price. 



$22 



PER 16K SET 



These chips are brand 
new "4n6's". These 200 
nanosecond chips are 
fully compatible with all 
TRS-80 produces. In- 
structions for insertion 
are included, however 
the dip shunts required 
for converting a 4K 
Model I to a I6K Model 
I are not included at this 
low price. 

^526 



This is the Epson MX-70. The lowest priced dot matrix printer you can buy. Now, that in itself 
should make it very attractive to a lot of people. Bat you ain't heard the half of it. 

To begin with, the MX-70 has a lot more in common with our now-famous MX-80 than just 
the name. Like unequalled Epson reliability. And technological breakthroughs like the world's 
first disposable print head. But frankly, the MX-80 packs a lot more power than some people 
need. So Epson bjiit the MX-70 to be a no-frills printer. At a no-fnils price. 

But the MX-70 is still a great little printer. They give you 80 CPS unidirectional printing. 
Top-of-form recognition. Programmable line feed and form lengths. Plain paper printing. An 
easy-lo-read 5x7 matrix. Self test. And an adjustable tractor feed. 

That's what you'd expect from a basic little printer. But here's something you wouldn't ex- 
pect: the finest graphics package on the market today. Free, 

They call it GRAFTRAX II. And it means 480 dots across the page, resolution to 60 dots per 
inch, and a graphic image free of the jitter and overlap that plagues other printers. You get 
cleaner grays and finer point resolution. 

So now you've got a choice. You want more power and extra functions, you buy the MX-80. 
You want a basic litiie printer that prints, and keeps on printing, you buy the MX-70. They're 
both at American Business Computers. 

Call for unbelievably low price. 



•TM TANDY CORP. 



OXIDATE MICROLINE 80 
PRINTER - $479 

The Microline is built on a rugged cast alumi- 
num base to withstand the rigors of continuous 
business use. It is driven by two motors and 
wUl run all day with no duly cycle limitations. 
Microline printers use a dense 9 x 7 dot pattern 
to produce crisp, dean copies, first copy uj lut. 
The seven pins in the head arc "fired" using 
energy stored in tension members. This tech- 
nolt^ permits the use of short, low mass pins 
made with an extremely hard alloy. The head 
produces less heat, thereby extending its life. .^ 52* 



• Check it Out! • 

EPSON MX-80FT 

That's right — MX-80FT. 
The FT on the end means Friction 
and Tractor. The Fantastic MX-SO 
Printer is now available in a version 
which wii! accept letterhead-type 
paper And tractor-type paper. Call 
or write for our (as always) un- 
believable low price. 
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Epson. 

This printer costs less than $450. 
just how much less we can't tell 
you - But if you will give us a call 
we think you will be pleasantly 
suprised. , 
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GO BOLDLY .— 

Where No TRS-80* Program Has Gone Before! 




DANGER IN ORBIT 

DATE: 2S.OZ.2M7 

LOCATION: 270 million miles from 

Terra 
MISSION: Maintaining Terra's Space 

Lanes 



Briefing will follow: 

1.1 Your mission is to destroy any 
asteroids in your sector and lo prevent 
alien spacecraft from infiltnuing the Ter- 
ran Defoise Network. 

1 . 2 Your ship is armed with an anti-matter 
cannon. You can shoot large asteroids. 
but this turns them into many smaller 
asteroids, each capable of destroying your 
ship. 

1.3 In addition, alien ships can make in- 



jtantaneous hyperspace jumps into your 
area and start firing on your ship. 
1.4 You'll need lightning reflexes and 
nerves of steel to survive Danger In Orbit. 
We have no use for iton-survivorsl 

Danger In Orbit, a real-time, madiine- 
languagc game, features variable levels of 
difficulty, superb high-^^eed graphics, 
sound effeas and automatic score keep- 
ing. (Tl or T2) 

Order No. 0237R 
$14.95 Tape. 
Order No. 0247RD 
$19.95 Disk. 



BALL TURRET 
GUNNER 

For years the Petro Resource Con- 
glomerate has attacked our photon collec- 
tion stations and strangled our deep-space 
trade routes. The PRC Exxoncrator Class 
light fighters (code name: Gnat) have 
been their main weapon. Now you can 
strike back, by joining the Ball Turret 
Gunner Service. 

Imagine yourself at the contr<ri console 
of an LW-1417 Siratoblazer (Type B 
Str»^ic Laser Weapon). Your Hindsight 
Director informs you that a Gnat fighter 
is coming in for an attack. You pivot your 
gigawatt laser turret until you can see the 
target on your monitor. The Range Indi- 
cator shows him coming in fast. The 
Targeting Computer studies his course 
and speed as your fmger tenses ovct the 
firing key. You know you'll have only a 
fraaion of a second in which to react. The 
Gnat fighter's evasive maneuvers cause 
him to dance in your sights. Suddenly, 




you see the FIRE Conunand and you 
react instinctively. Your laser beam lashes 
out and reduces the Gnat to an expanding 
ball of ionized gas. Mission accom- 
plished! 

BaU Turret Gunner, with your choice 
of multiple levels of difficulty, optional 
souitd effects and superb graphics, is 
more than just a game. It's an adventure. 
Experience it! <T1) 

Order No. 0051R $9.95. 





COSMIC PATROL 

WARNING: PLAYERS OF THIS 
GAME SHOULD BE PREPARED FOR 
A STATE OF REALISM HITHERTO 

UNAVAILABLE ON THE TRS-80 

Skilled players soon master many diffi- 
cult computer games, but COSMIC 
PATROL is in a world all its own. The 
challenge intensifies! Supporting graphics 
and sound (optional) make eadi en- 
counto- an exciting new experience. It all 
adds up to a Super 3-S package. . .skill, 
si^t and sound. 

Soenario: The Cosmic Patrol pro-am 
puts you in the command chair of a small 
interstellar p^rol craft. Your mission is to 
defend Terran space and prey on the Que- 
ton supply ships which carry essential 
parts and lubricants for that implacably 
hostile robotic force. The drone freighters 



are fairly easy pickings for the accom- 
[dished starship pilot, but beware of the 
l-Fi^tCT escorts. They're armed, fast and 
pnloted by intelligent robots linked to bat- 
dc computers. They never miss. 

The Cosmic Patrol program is not just 
another search and destroy game. With its 
fast, real-time action, impressive sound 
option and superb graphics, this machine- 
language program is the best of its genre. 

Don't keep putting quarter after quar- 
ter into arcade games or spmding big 
bucks for video game cartridges. Cjct 
Cosmic Patrol from Instant Software- 
aid get the best for less! (Tl or T2) 

Order No. 0223R 
$14.95 Tape. 
Order No. 0224RD 
$19.95 Disk. 



ALIEN ATTACK 
FORCE 

The INVADERS are coming! Eanh's 
defenses are dead except for your Laser 
base. Your assi^unent is to destroy the 
^proaching INVADERS before they de- 
stroy Earth. Before Eanh's sensors failed, 
diey detected 550 armed invaders in 
space, speeding toward us in 10 attack 
formations of 55 in each group. The sai- 
SOTS detected four different types of at- 
tack craft: Large, Medium, Small, and 
short profile craft which is the most dif- 
ficult to destroy. If you cannot stop these 

space attackers they will stop Earth 

for good. (Tl) 

Order No. 0240R $9.95. 



Instant Software 



PETERBOROUGH, N.H. 03458 
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(Tl). TRS-80 Model 1, 
Level II. 16K RAM. 

(T2)» TRS-80 Model I, 
Level II I6K, expansion 
interface I6K + 1 disk 
drive. 



TO ORDER 

See Your Local Instant 

Software Dealer or Call 

Toll-Free 1-800-258-5473 

(OrdenOnly) 

In NH dial l-«0>924-7296 



242 • 80 Microcomputing, July 1961 



APPLICATION 



Pony programs for the Pocket Computer. 



Nag Analysis 



Dave Crosby 

300 Windsor Drive 
Oak Brook. IL 60521 



'T/7e way to make a 
small fortune at the 
race track is start 
with a large fortune." 

— Anonymous. 

With this in mind, lofferyou 
a program for the pocttet 
computer to handicap the nags. 
The program considers the 
following: days between races; 
distance; class; stretch, gain; 
call positions; jockey weight; 
speed rating; and earnings. 
The computer takes certain 



1. Type R, lo start program. 

2, Fof Today's Date and Last Race 
Day, |U9t enter the day, i.e., 10, 15, 
20, elc. tor "days In previous 
month". 

3. For dislance, enlef 6 for six fur- 
longs, 1 for one mile, 1.16 for 1 1/16, 
etc. The same holds lor both dis- 
tance inputs. 

4. For the stretch gain question 
Y = yes, N = no. 

5. Post call Is for last three races. 

6. When you gel the total score for 
one post position, press Entof for 
the next post position. 

7. When all post positions have 
been entered, enter for P.P.# 
question. 

8. It you wish horses ranked, an- 
swer Y lo sort question. 

Table 1. Program Notes 



facts into consideration in help- 
ing you to bet. if the horse has 
not raced in the last 15 days, it is 
eliminated and you go on to rate 
the next post position. If it has 



been 15 days or less, the horse 
is awarded 10 points. If the dis- 
tance on today's race is the 
same as the last time the horse 
ran, another 10 points are 




160 IMPUT 
17B INPUT 



5 "HANDVCAP PROGRAM FOR TF)S-B0 POCKET COMPUTER 

la CLEAR 

20 INPUT "TODflVS DATE "SA 

3Q INPUT 'DAVS IN PREVIOUS MONTH "iC 

40 INPUT "TODAYS DISTANCE "IBiJ^BJL^l^ 

50 INPUT 'POST « "IE:!? E=0THEN 465 

55 IF €- 15 THEN 50 

60 D-^a:IF E J LFT J^E 

fi IF E L LET L=E 

70 PAUSE "DAYS BETWEEN RACES ■ 

B0 INPUT -LAST RACE DAY ■;F:G=A 

?0 ir F-5 LET G=GtC 

IBB IF (G-F)>13 PAUSE * CL IM 1 NftTED " ■ A 1 £'27 1 r9 ' A ' E* I 2 ' "E > GOTO SB 

110 I=10:GOSUB 440 

i;0 INPUT -DISTANCE LAST RACE "iF 

130 IF F^B LET I - 10 !GOSUB440iGOTO 150 

140 G05UB 460 

i:i0 PAUSE -CLASS CHECK" 

■TODAYS CLAIM- ;F 

-LAST CLAIM "sG 
180 I=INT ( (S-P)/10O*.5) JGOSUB 440 
I9B INPUT -GAIN IN STRETCH^ (V/Nl-iK* 
200 IF K*--Y-LET I = 10:G0SIJB 440:GOTCi 220 
210 GuSUB 460 

220 PAUSE "RUNNING POSITION" 
230 INPUT -IST ANY CALL "iP 
240 INPUT 'INC ANY CALL "JG 
250 I=Fi>ia-'G»5!GOSUB440 
260 PAUSE -ASSIGNED WEIGHT" 
270 INPUT-UEIGHT THIS RACE "iF 
280 INPUT "WEIGHT LAST RACE •;G 
290 IF F=GLET I=10:GOSUB 440!GOTO310 
300 GOSUB 460 
310 PAUSE "LAST 3 SPEEDS ' 
320 INPUT -FIRST - sF 

■SECOND •!& 

■THIRD ■ !H 

■: (F*G+H»/3*.5i :G0SUB 440 

■AVERAGE EARNINGS" 

"YEARS EARNINGS ■;F 

"NUMBER OF STARTS "iGilF G=0 LET I=0!GOTO 400 
390 I=INT (F/G*. 1 1 !D=D*I 
400 PAUSE "AWARD ■ a 
410 PRINT -SCORE PP« ■:£■■■ IS ";D 
420 A(E*12)^EiA(E*27)=D:GOT0 50 
440 D=D+l:PAUSE ■AWARD ";! 
4:^0 PAUSE "SCORE NOW -!D:RETURN 
460 PAUSE 'NO POINTS AWARDED" : RETURN 

465 K«=--!lNPUT "SORT' (Y/Nl- :K*:IFM«="N'THEN 53a 
470 FOR F-L2 TO JIB-B: FOR 6-L TO J-F 
480 IF A(G*-271> = AIG<-2S)THEN 5J0 
490 H-AlG-'27) :A(G'-27)=-A;G»2B5 ;AIG+2S)=M 
500 H^A(6*-12) !A<6-12)=A(G-H3) :A(G+13)=H:B=1 
510 NEXT G:1F B=0 THEN 530 
520 NEXT F 

530 FOR F=L TO J: D»F '12 !E=F-i-27 

540 IF A(EI':>0 THEN PRINT F!" PPd -JAfD)!" POINTS-" lA(e ) 
550 NEXT F: INPUT- REPEAT' (V/N) "iK«!lF «•=•¥- THEN 530 
560 GOTO 40 



330 INPUT 
340 INPUT 
350 I=INT 
360 PAUSE 
370 INPUT 
380 INPUT 



Program Listing 1 



awarded. Any stretch gain in the 
last three races gives the horse 

10 points. 

Call positions are totalled for 
the last three races and then 
entered. For example, if the 
horse was first five times {at any 
call) in three races, enter 5, The 
second call works the same 
way. The computer awards 10 
points for a first call, five for a 
second. Ten points are awarded 
if the jockey's weight Is the 
same for this race as the last. 
Enter the speed rating for the 
last three races and the com- 
puter will average them and 
award points accordingly. The 
last characteristic is earnings: 
enter earnings for the year and 
the number of starts the horse 
made. 

The computer keeps a run- 
ning total and gives a total for 
the post position you are work- 
ing on. When all horses have 
been rated, you enter for post 
position and the computer will 
rank the horses by score. You 
may want to remove program 
lines with a pause, to speed 
things up. 

Bet on the horse with the 
highest rating. ■ 

Note: The basic idea for the 
handicap system used in 
this program was from 
the book The Horse- 
players Guide to Winning 
System by Alec MacKen- 
zie and Bert Randolph 
Sugar, published by Cor- 
win Books. 
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UTILITY 



Generate assembly listings of machine code with this BASIC program. 

A BASIC Disassembler 



Frank Detfine 

26 Oceanview Ave. 

Farmlngville. NY 11738 



The cjisassembler presented 
here generates assembly 
listings of machine code resid- 
ing in high memory (approxi- 
mately 31300 or higher). The pro- 
gram also helps examine the 
Level II PROMS so we can take 
advantage of the TRS-80's 
BASIC routines. 



The disassembler Is written in 
BASIC and occupies just under 
11K of RAM. Strings and other 
variable space required to run 
the program bring the total RAM 
requirements to about 13K, leav- 
ing about 2K of high RAM in a 
16K system to load the machine 
code to be disassembled. 

The program drives a line 
printer; if you have no printer, 
the LPRINT statements in pro- 
gram line 190 must be changed 
to PRINTS to send the listing to 
the. screen. The number of lines 
per page in line 205 should then 



be changed from 50 to 15 so as 
not to scroll the listing off the 
screen before it can be read. 

To make the program more 
flexible and less aggravating to 
use, some little extras have 
been included. The program lets 
you declare blocks of memory 
within your specified disassem- 
bly range as data so the pro- 
gram will not try to disassemble 
them. To make it easier to locate 
these data blocks within the pro- 
gram code, an auxiliary program 
is included (Program Listing 2) 
which displays any block of 



memory in ASCII on the CRT. An 
entire machine coded program 
can be scanned in a few minutes 
before disassembly. Data tables 
are usually easy to recognize 
when the data Is presented in 
this format (i.e., data such as let- 
ter strl ngs used for CRT prompts, 
sequential number strings, pat- 
terned data, etc.). The ad- 
dresses of these tables can be 
written down and typed into the 
disassembler later. 

If a table is missed by this 
method, it can usually be spot- 
ted in the disassembly listing as 



Program Listing 1. DISASM 




1 CLE;AR(1000) :DIM IS(255) ,BL(255} :H=0:M=0:GOTO8000 


180 IF Ll>=10 GOTO260 




10 CLS:C"0:PRINTTAB(15)"* * * Z-80 DISASSEMBLER * • * 


182 L1S=STRS(L1) :L1S=HIDS(L1S,2,1) 




" 


185 IF L2>=10 GOTO270 




20 PRINT: INPCT"DUHP TITLE";PS 


187 L2S=STRS(L2) :L2S=MIDS 1L2S, 2, 1 } 




3B PRINT: INPUT'START ADR (IN DEC)";A 


190 LPRINTQ;;LPRINTTAB(10);:LPRINTUSING"% %!!!!";" ", j 


40 INPUT"END ADR (IN DEC)";B 


H1S,H2S,L15,L2S;; 




42 PRINT: INPUT-DECLARE AMY DATA SEGMENTS";VS 


LPRINTUSIN'G"! %!!!!m!";" ",D 




43 IF VS="Y"GOSUB25000 


HS,DLS,EHS,ELS,FHS,FLS,GHS,GLS; : 




50 PRIN'T: IKPUT"TURN ON LP THEN 'ENTER'";BS 


LPRINTTAB(30) IS{D 




60 LPRINT" " :LPRINTTAB ( 20 )FS: LPRINT" " 


) 




7 9 Q=A 


200 A=A+l!C=C+l:IF A>=B+1 GOTO 400 




80 H1 = INT (A/4096) !lJ2=INT ( (A-Hl*4096)/256 J 


205 IF C=50 GOTO500 




90 L1=INT((A-H1*4096-H2*256)/16) 


210 IFGHS="T"THENIS(D)=TS 




100 L2=A-H1*4096-H2*256-L1*16 


211 GOT07 9 




111 IF MO0 G0T0113 


240 X=H1-10+65!H1S=CHRS(X) :GOTO170 




112 GOTO120 


250 X=H2-10+65!H2S=CHRS{X) :GOTO180 




113 IF A>=A(N)ANDA<=B(N)G0T0115 


260 X=L1-10+65:L1S=CHRS(X) :GOT0185 




114 GOTO120 


270 X=L2-10+65!L2S=CHRS(X) :GOTO190 




115 D=PEEK(A) ;GOSUB50090:FHS="D":FLS="A";GHS="T":GLS="A 


400 PRINT"* • DUMP COMPLETE * * 




" ; 


410 INPUT"AGAIN (¥/N"}";BS 




TS=I$(D) :I5(D)=-- 


420 IFBS="Y"GOTO10 




116 IF A=B(N)THENN=N+l:M=M-l!GOTO130 


425 GOTO530 




in GOTO130 


500 PRINT:PRINT"* * * • END OF PAGE 


» * * *■ 


120 D=PEEK(A) :GOSUB600 


510 INPUT"EELOAD THEN 'ENTER' " ;BS:C=0 


:GOT07 9 


130 V=D:GOSUB30000 


530 END 




140 DHS=HS:DLS=LS 


600 IF D<64 OR DM27 GOTO740 




160 IF Hl>=10 GOTO240 


605 IFD=118TBEKRETURN 




165 H1S=STRS(H1} :H1S=MIDS(H1S,2,1) 


610 DH=INT(D/16) :DL=D-DH*16 




170 IF H2>=10 GOTO250 


620 G=DLAND7!F=( (DAND56)/8) 




17 5 H2S=STRS(H2) :H2S=MIDS (H2S, 2,1) 


640 IS(D)="LD "+JS(F)+"," 


Program Qontinues 
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720 IS(D}=IS[D)+JS(G) :GOSUB50090: RETURN 
US IFD<128ORD>191GOTOia0O 
750 DH=I^fT(D/16) :DL=D-(DH*16) 
760 G=DLAND7!F=((DAND120)/8) 
780 IF F=0 IS(D)="ADD A," 

IF F=l IS(D)="ADC A, " 

IF F=2 IS(D)="SUB 

IF F=3 IS(D)="SBC A," 

IF F=4 IS(D)="AND 



790 

800 

810 

820 

830 IF F-=5 IS[D) = "XOR 

840 IF F=6 IS(D}-"0R 

850 IF F=7 IS(D)="CP 

860 IS(D)=IS(D)+JS(G) :GOSUB5fl090:RETURN 

1000 IFaL(D) =1GOTO1030 

1010 IFBL (D) =2GOTO1040 

1020 IFBL (D) =3GOTO1060 

1025 IFBL(D)=4GOTO15000 

1026 IFD=221ORD=253GOTO26fl00 
1030 GOSUB50090:RETURN 

1040 A=A+1:Z=PEEK(A) ;GOTO200B 

1060 A=A+l!Z=PEEK(A) : A=A+1 ! Z1=PEEK(A) 

2000 V=Z:GOSUB30000:EHS=BS:ELS=LS 

2070 IP BL(D)=3 GOTO 3000 

2080 GOSUB5010tr:GOTO4000 

3000 V=Z1:GOSUB30000:FH$=HS:FLS=LS 

4000 P1S=FHS+FLS+EHS+ELS:P2S=EHS+ELS!GHS="":GLS="" 

4001 f=dand7;g=dand56:g=g/b 

4002 IFF=6AND(DAND192}=0THENGOTO5010 

4003 IFF=2AND(DAND192)=192THEN GOTO5030 

4004 IFF=4 GOTO5050 

4006 IFF = 0AND(G<>2)TIiENGOTO5020 

4008 IS(33)="LD HL,"+P1S 

4010 IS(34]="LD ("+P1S+') ,HL" 

4030 I5(50)="LD ("+P1S+"),A" 

4040 IS(205)="CALL ■+?!$ 

4050 IS(195)="JP "+P1S 

4060 IS(58)="LD A,("+P1S+")" 

4070 IS(254) = "CP "-t-P2S 

4110 IS142)="LD HL, (■+P1S+") " 

4123 IS(49)="LD SP,"+P1S 

4129 IS(17)="LD - DE,"+P1S 

4130 IS(16)="DJNZ "+P2$ 
4132 IS(1}="LD BC,"+P1S 
4135 IS(198) = "ADD A,"+-P2S 
4138 I5(206)="ADC A,"+P2S 
4140 IS(211)='0UT ■+P2S+",A" 
4142 IS(214) = ''SUB "+P2S 
4144 IS{219}="IN A,"+P2S 
4146 I${222)="SBC A, "+P2S 
4149 I$(230) = "AND '' + P2S 
4152 IS(238)="X0R "+P2S 

4155 IS(246)="0R "+P2S 

4156 RETURN 

5010 IS[D)="LD "+JS(G)+","+P2S!RETURN 

5020 IFG=3THENIS(D)="JR "+P2S:RETURN 

5022 G=G-4:IS(D} = "JR "tSS (G) +", ■•+P2 S : RETURN 

5030 IS(D)="JP "+SS(G)+","+PlS:RETURN 

5050 1S(D)="CALL "+SS (G) +" , "+P1S:RETURN 

8000 FORS=0TO63:BL(S}=1:NEXTS 

8010 FORS=192T0255:BL(S)=l:NEXTS 

8020 BL(118)=1:BL(6)=2;BL(14)=2:BL(16)=2:BL(22)=2:BL{24 

)=2: 
BL(30)=2:BL(32)=2:BL(3B)=2iBL(40)=2:BL(46)=2: 

BL(48)=2:BL(54)=2: 
BL(56)=2 
8030 BL(62)=2:BH19e)=2:BL(206)=2:BL(211)«2!BL(214J = 2:B 

L(219)=2 
;BL(222)=2:BL(230)=2:BL(23e)=2:BL(246)=2: 

BL(254)=2 
8040 BL(1)=3:BL(17)=3;BL(33)=3:BL(34)-3!BL(42)=3!BL[49) 

= 3: 
BL(50)=3:BL(58)=3:BL(194)=3:BL(195)=3:BL(196)= 

3:BL(202)=3: 
BL(204)=3:BH205) = 3:BL(210)=3:BL(212) 

=3:BL(218)=3!BL(220)=3 
8050 BL(226)=3:BL{228)=3:BL(234)=3:BL(236)=3:BL(242)=3: 

BL(244)';3:BL[250) = 3!BL(252)=3!BL(203)=4:BL{237)=4 

:BL(221)=0 
!BL(253)=0 
807 0JS(0)="B":JS(l)="C":JS(2}i"D":JS(3)="E":JS(4)="H": 

JS(5)="L" 
8080 JS(6)="(HL) ":JS{7)="A" 
8090 SS(0)="NZ":SS{1)="Z":SS(2)="HC":SS(3)="C":S5(4)="P 

0": 
SS(5)«"PE":SS(6) = "P":SS(7)="M'' 



PS(1)="ADC HL," 
PS(3)="ADC HL," 
PS(S)="ADC HL," 
NS(0)="BC":NS[1)="BC"!NS(2}. 



8100 PS(0)="SBC HL," 
8110 PS(2}="SBC HL," 
B120 PS(4}="SBC HL," 
8130 PS(7)="ADC HL," 

"DE" 

8140 NS(3)."DE":NS(4)--HL"!NS(5)="HL"!NS{7)-"SP" 
8150 LS(0)="N":LS(l)="I":MS(0)="0"!HS(2)="l":HS(3)-"2" 
8160 OS(0)="I,A":OS(1)="R,A":OS(2)="A,I":OS13)="A,R" 
817 QS(0)="LD*':QS(I) = "CP":QS(2)="IN":QS(3)"="OUT" 

9000 lS(a)="N0P":lS(2)="LD (BC) , A" : IS (3) ="INC 

BC" 

9001 IS(7)="RLC A'':IS(8)-"EX AF,AF'" 
9B02 IS(9)="ADD HL,BC"!lS(10)="LD A, (BC) 



9003 IS(11)="DEC BC-ilSClSj-'-RRC A" 

9004 IS(18)="LD {DE),A":I5(19)=-INC DE" 

9005 IS{23)="HLA"!lS(25)="ADD HL,DE" : IS (26)-"LD 

A, (DE)" 

9006 IS(27)="DEC DE" : IS (31) = "RRA" s IS (35 ) =''INC 

HL" 

9007 lS(39}="DAA"ilS(41)-"ADD 

HL" 
I$(47)-"CPL":IS(51)="INC SP" :IS (55 ) ="SCF' 



HL,HL":IS(43)="DEC 



9008 
9009 

9010 
9011 
9012 

9013 

9B14 
9015 
9016 
9017 
9018 
9019 
9020 
9021 

9022 

9023 
9030 
9040 
9050 
9060 
9070 
90B0 

9090 

9100 

15000 

15020 

15040 

15050 

15060 

15066 

15070 

150B0 

15090 

15100 

15110 

15120 

15130 

15140 

15150 

15160 

15170 

15180 

15190 

15200 

15210 

15360 

15390 

15400 
15410 
15420 
15430 
15440 
20000 
20010 
20020 
20040 
20050 
20130 
20140 
20150 
25000 
25010 
25020 
25030 
25040 
26000 
26002 
26004 
26010 
26020 
26025 
26027 
26028 
26029 
26030 
26040 
26050 
26 060 
26070 
26080 
26090 
26100 
26110 
26120 
26130 



HL,SP-:IS(59)-"DEC 


SP":I$( 


HL" 




NZ":IS(197)="PUSH 


BC" 


0"!lS[200)=-RET 


Z":IS(207 


NC"ilS(209)="POP 


DE" 


DE":IS(2151="RST 


10H" 


C'':IS(223)""RST 


18H" 


PO":I$(227}«.'EX 


(SP) ,HL" 


20H":IS(232)="RET 


PE" 


(HL) ":IS(235)="EX 


DE,HL" 


28H":IS(240)="8ET 


P" 



AF";IS(243)=''DI":IS(245) = "PUSH 



30H":IS{a48)="RET 

SP,HL'':IS(255) = "RST 
BC" 

BC":IS(229)="P0SH 
HL" 



M":IS(2 



38H" 



HL" 



"+JS(L) :L=L+ 

"+JS1L) :L=L+1 

A":GOTO10 



IS(57)='ADD 

63)="CCF" 

IS(43)="DEC 

IS(192)="RET 

IS(199J="RST 

)="RST 

ISt208)=-RET 

IS(213)="PUSH 

I5(216)="RET 

15(224)="RET 

1S(231)="RST 

IS(233)="JP 

IS(239)="RST 

IS(201)="RET" 

IS(241)""POP 

AF" 
IS(247)="RST 
51)="EI" 
IS(249)="LD 
IS(197)="PUSH 
IS(193)="POP 
IS(225}="POP 
IS(217)="EXX'' 
IS(118) = "HALT'* 

L-0:FOR D=5T045STEP8:IS(D)=''DEC 
IsBEXT 

L=0: FOBD=4T044STEP8: IS (0) »="INC 
:NSXT 
IS (6 0}=" INC A"!lS(61)="DEC 

IFD=203GOTO15040 

IFD=237GOTO40200 

A=A+1:2=PEEK(A) 

EH = IM(Z/16) :EL=Z-EH*16;G=EL AND 7 

F=INT((EL AND 8 ) /6) ! F=F+ (EH*2 ) : GOSUB1507 

GOTO153 80 

IFF=0IS(D)="RLC "iRETURN 

IFF=1IS(D)="RRC ": RETURN 

IFF='2IS(D)="RL ": RETURN 

IFF=3IS(D)="HR ": RETURN 

IFF=4IS(D)="SLA ": RETURN 

IFF=5IS(0)="SRA ":RETURN 

1FF=7IS(D)="SRL ":RETDRN 

IFF>=8ANDF<=15GOTO151B0 

IFF> = 16ANDF<'>23GOTO15200 

F=FAND7:FS=CHRS(P+48) 

IS (D) ="SET "+FS+" , ": RETURN 

F=FAND7:FS=CHRS(F+48) 

is (d)>="bit " + fs + ", ": return 

F»^FAND7:FS=CHRS(F+48) 

IS (D) ="RES "+FS+" , ": RETURN 

IF EH>=10 GOTO15430 

EHS=STRS(EH} :EHS=HIDS[EHS,2,1) 

IF EL>=10 GOTO15440 

ELS=STRS(EL) :ELS=HIDS{ELS,2,1) 

GOSUB50100!lS(D)=lS(D)+JS(G} ; RETURN 

X=EH+55!EHS=CHRS(X) :GOTO15400 

X=EL+55:ELS=CHRS(X) JGOTO15420 

IFDAND7=SGOTO20B40 

IFDAND7=4GOTO20040 

GOTO1030 

L=DAND56 

G*L/8 

IFDAND7=5THENIS(D)="DEC ■+JS(G) :GOTO20150 

IS(D)="INC "+JS(G) 

GOSUB50 090: RETURN 

N=l 

INPUT'START ADR»" ;A(N) ! INPUT'END ADR=";B(N) 

INPUT"ANOTHER SEGMENT" ;VS 

IF VS="Y"THEN NbN+1!GOTO25010 

M=N:N=1:RETURN 

IFD=221THENVS="IX":GOTO26004 

VS="IY" 

A=A+1:Z=PEEK(A) 

IF Z=203 GOTO27000 

IFZ>=70ANDZ<=190GOTO40000 

IFZ=33ORZ=34ORZ=42GOTO26160 

IFZ=52ORZ-53GOTO26 280 

IFZ-54GOTO26350 

V=Z:GOSUB30000:EHS=HS:ELS=LS:GOSOB5B10e 



IFZ"9 IS(D)=°ADD 

1FZ=25IS{D)="ADD 

IFZ=35IS(D)-"INC 

IFZ=41IS(D)="ADD 

IFZ=43IS(D)-"DEC 

IFZ=57IS(D)-"ADD 

IFZ=225IS(D)="POP 

IFZ=227IS(D)="EX 

1FZ=229IS(D) = ''PUSH 

IFZ=2331S(D)""JP 

IFZ-249IS(D)="LD 



■+VS+",BC'' 

"+VS+",DE" 

"+VS 

"+VS+",'+VS 

"+VS 

"+VS+",SP" 

"+VS 

(SP) ,"+V$ 

•+vS 

(-+VS+')" 

SP,"+VS 



Program continues 
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26150 RETURN 

26180 V=Z:GOSUB30000 

26190 EHS=H$:ELS=LS 

26200 A=A+1:Z1=PEEK(A) : V=Z1 :GOSUB30000 

26210 FHS=HS:FLS=L5:A=A+1 

26220 Z1=PEEK(A1 :V=Z1:GOSUB30000 

26230 GHS=HS:GLS=LS 

26240 IFZ=33IS(D)="LD "+vS+" , "+GHS+GLS+FHS+FL$ 

26250 IFZ=34IS(D} = "LD ( "+GH5+GLS+EHS+FLS+" ) , "^-V? 

26260 IFZ=42IS(D)="LD "+vS+" , { "+GHS+GL$+FHS+FLS+ 

26 27 RETURN 

26 28 V=2:GOSUB30000:EHS=HS:ELS=LS 

26 300 A=A+1:Z1=PEEK(A) !V=Z1 :GOSUB300a0 

26 310 FHS=HS:FLS=L$:GHS=""!GLS="" 

26320 IFZ=52IS(D)="INC ("+VS+"+"+FHS+FLS+") " 

26330 IFZ=53I$(D)="DEC (■+V$+"+"+FHS+FLS+') " 

26 340 RETURN 

26 3 50 V=Z:GOSUB30000;EHS=H$:ELS=LS 
26370 A=A+1:Z1=PEEK(A) : V=Z1 : GOSUB30e00 
26380 FHS=HS:FLS=LS:A=A+1 

26390 Z1=PEEK(A] :V=Zl:GOSUB30000 

26400 GHS=HS:GLS=LS 

26410 IS{D)="LD {"+VS+-+-+FHS+FLS+") ,"+GHS+GLS 

26420 RETURN 

27000 A=A+1:EHS'=CHR$(67) : ELS=CHRS (66) 

27010 V=PEEKIA} :GOSUB30000 

27020 FHS=H$:FLS=L$ 

27 050 A=A+1 :Z2"PEEK(A) : 0=Z2AND 248 : 0=0/8 
27055 QS="('+VS+"+"+FHS+FLS+"l " 

27060 F=O:GOSUB15070 

27070 IS(D)=IS(D)+QS 

27080 V=Z2:GOSUB30000:GHS=HS:GLS=LS! RETURN 

3B000 H=INT(V/16) :L=V-(H*16) 

30010 IFH>=10 GOTO30060 

30020 HS=STRS(H) :HS=MIDS(HS,2,1) 

30030 IF L>=10GOTO30070 

30040 LS=STR5(L) :L$=MIDS (L$, 2, 1) : RETURN 

30060 X1=H+55:HS=CHR$(X1) :GOTO30030 

30070 X1=L+55:LS=CHRS(X1) :RETURN 

40000 V=Z:GOSUB30a0B!EHS=HS:ELS=LS:GaS="":GLS="" 

40920 A=A+l:Zl=PEEK(A) 

40030 V=Z1:GOSUB30000:FHS = E]S:FLS=LS 

40050 IF Z=126THENIS(D)="LD A, ( "+VS+"+"+FHS+FLS+ 

") ": RETURN 
40B60 P=ZAND240 
40070 IF P=112GOTO40140 
400B0 IF P>=128 GOTO40170 
40090 P=ZAND56:P=P/8:GOSUB50000 
40120 IS(D) ="LD '' + GS + ", ("+V$+"t"+FHS + FLS+") "iRET 

URN 
40140 P=ZAND7 :GOSUB50000 

40150 lS(Di="LD ("+VS+"+"+FHS+FLS+") , "+GS : RETURN 
40170 P=ZAND56:P=P/e:GOSUB50000 
40180 lS(D)=lS(D)+V&+"+"+FHS+FL$+') " 
40190 RETURN 

40 200 A=A+1:Z=PEEK(A) : V=Z : GOSUB30000 : EHS=HS : ELS=LS 
40 210 IFZ=67ORZ=7 5ORZ=B3ORZ=91ORZ=115ORZ=123THEN4045fl 
40 220 GOSUB501O0!F=ZAND24B:G=ZAND7 
4023D IFF-160GOTO40410 
40240 IFF=168GOTO40420 
40250 IFF=176GOTO40430 
40260 IFF=184GOTO40440 
40270 F = ZAND56:F = F/8;G'=ZAND7 
40280 1FF=6IS(D)="SBC HL ,SP" :RETURN 
40290 IFG=0I$(D)="IN "+JS (F) +" , (C) " iRETURN 
40300 IFG=llStD)="OUT (C) , "+JS (F) ;RETURN 
40310 IFG=2IS(D)=PS(F)+NS(F) : RETURN 
40320 IFG=4ISID)="NEG":RETURN 
40330 IFG=5IS{D)="RET"+LS[F) : RETURN 
40340 IFG=6IS(D)="IM "tMS (F) iRETURN 
40350 IFG<>7IS(D)="* • *" rRETURN 
40360 IFF<"3GOTO40400 
40370 IFF=4IS(D)="RRD":RETURN 
40380 IFF=5IS[D)="RLD":RETURN 
40390 GOTO40350 

40400 IS(D)="LD "+OS(F} :RETURN 
40410 IS(D)=QS(G)+"I":RETURN 
40420 IS(D)=QS(G)+-D":RETURN 
40430 I${D)=OS(G)+-IR";RETURN 
40440 IS iD)=QS (G)+"DR"' :RETURN 
; 40450 A=A+l!Zl=PEEK(A) :V=Z1:GOSUB30000:FHS=HS:FLS=LS 
404 60 A=A+1:Z1=PEEK[A) : V=Z1 :GOSUB30000 :GHS=HS:GL5=LS 
40470 GGS=GHS+GLS+FHS+FLS 



( ''"" ) 



{''+GG$+") ,BC":RETURN 
BC, ("+GGS+") ":RETURN 
(°+GGS+") ,DE":RETURN 
DE, ("+GG$+") ": RETURN 
("+GGS+") ,SP":RETURN 
SP, ("+GGS+") ":RETURN 



40480 IFZ=67l$(D)="LD 

40490 IFZ=75IS{D)="LD 

40500 IFZ=83IS(D)="LD 

40510 IFZ=91IS(D)="LD 

40520 IFZ = 115IS1D) = '*LD 

40530 IFZ=123IS(D)="LD 

50000 IF Pt0 THEN GS="B 

50010 IF P-1 THEN GS="C 

50020 IF P"2 THEN GS="D 
IF P=3 THEN GS^"E 

IF P=4 THEN GS="H":IS(D)="AND ( " 
IF P=5 THEN GS="L":lS(D)="XOR [" 

50060 IF P=6 THEN GS="***" : t S (D) ="0R ( 

50070 IF P=7 THEN GS=" A" : IS (D) = "CP (" 

50080 RETURN 

50090 EHS="":ELS="";FHS="'':FLS=""!GHS="":GLS= 

50100 FH$="":FLS="":GHS="":GLS="": RETURN 



50030 
50040 
50050 



: IS(D)="ADD 
:IS{D) = '*ADC 
;I$(D)="SUB 
;IS(D)="SBC 



A,(" 
A, C 
(" 
A,(" 



LOIO ALL BL<[» 
LOAD «LL SINGLt 
BITE ItlDl'l 
PUT JP SCREEN 
HEADINaS 





CALL "0IS»SM" 



PHINtOJI 

ADR a UNEHONIC 

STRINGS 




C "° ) 




READ BVTE 




Fig. 1. 



a run of instructions that don't 
make much sense in a particular 
section of the program. With 
practice, these things can be 
spotted quicl^ly. To make print- 
out paging easier, the program 
wiii stop after printing 50 lines 
and prompt you to reload the 
printer before continuing. 

Once the machine code to be 
disassembled is loaded into 
memory, you may generate a 
listing by running the program 
and answering the following 
questions: 

DUMP TITLE:?— You can 
specify a title for the first page. 

START ADR(IN DEC):?- 
Specify the first address to 
disassemble (in decimal form). 

END ADR(IN DEC):?— Specify 



the last address to disassemble 
(in decimal form). 

DECLARE ANY DATA SEG- 
MENTS?— Answer Y or N. If Y, 
the following message will ap- 
pear. 

START ADR = ? — Answer 
with the first address of the 
code you wish to declare as 
data. 

END ADR =?— Answer with 
the end address of the data seg- 
ment 

ANOTHER SEGMENT?-lf 
you respond with Y the START/ 
END ADR messages will repeat 
for another data segment. If you 
answer with N the following 
message will appear. {This is 
where the program would have 
gone had you entered N to the 
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(JED- 





STUIP Off BESisies 
DOOE a 400 TO "lD" 
UMCUONIC TO 
CREATE t|(DI 




STRIP OFF neeiSTER 
a MNEMONIC TTPE 
CODE- COMBINE 
TO FORM lt(0> 




coite Hem to 
haudlc all sihslc 
arre insthuctiohs - 
*LL simeiE arre 

!t'OI't »-tVf B€£/i 

LO'oeo IN rue 
imriALiitrion block 
or rne uain wop 



■GO 



BUH<> *DR PTR 
OtT MEIT BTTt 
CONVERT TO HE« 



CLEftR UN 

OPERftNO 

STRINGS 





BUUP aOR PTR 
GET 2ild BVIE 
CONVtHI TO HEX 
SUMP ADR PTB 
BET Ird B'TE 
CONVERT TO KEX 



STRIP OFF 

RES a UNEHONIC 

TTPE CODE 



BUUP aOR PTR 
CONVERT TO HE> 
STRIP OFF REG 
a TYPE CODE 
IFROH Ind BTTEI 



DO IIIOI TIBLE 
LOOKUP -CLC»R 
UNUSED OPERIND 
STRINQS 



BUUP *0R PTR 
CONVERT TO HEX 

STRIP OFF 
BEO CODE 



4-BrTg LO IVSTHUCTIOIS 



j-Brre IMC, oec 



ADD TO ItID) 



4-arje to -/ oiSFLACCtttnij 



AOO TO itlDI 



l-BYTf ADD, inc. OfC, PUSH. fOF 
€X. JP. LB 'MOeX pes IHirBUCTIOIIS 




2- BYTE 

'SO' 

INSTRUCTIOHS 




TH€Sg iPt THC 
4-BfT[ INSTRUCTIONS 
FPOM THC '€0' SROOP 



BRINO IN NEIT 
I - BYTES 
COHVERT TO HE 



DO :t(01 LOOKUP 
USING HtO COOE 
FROM Ind BITE - 
iOO D»TA FSOM 
NEXT 2 B<TES 
TO lt(0> 



00 itiD) 
TABLE LOOKUP- 
CLEAR UNUSED 
OPERAND STRIHQS 



LOOKUP lIlOl • 



FiQ. 2. 
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DECLARE ANY DATA SEG- 
MENTS question.) 

TURN ON LP THEN 
'ENTER'?— Be sure the printer 
is on, then press the Enter key. 
The listing will then be directed 
to the line printer. 

To keep program length to a 
minimum, unnecessary spaces 
are deleted and many instruc- 
tions are crammed onto a single 
line. This makes the program 
difficult to read, so take care 
when you type the code In. A bit 
more memory may be conserved 
If the number of spaces between 
the instruction mnemonic and 
the operand are reduced in all 
the instruction strings (I.e., all 
l$(D) strings). This will crowd the 
printout, but may be worth it if 
you need the extra space. 

The addresses in the listing 
are in both hex and decimal to 
make it easier to go back and 
POKE different values into a lo- 
cation for experimentation or 
debugging of modified soft- 
ware. This program can be used 
in conjunction with EDTASM or 
a similar Z-80 assembler to relo- 



cate machine code programs. 

Program Description 

The program is divided into a 
main loop and a large subrou- 
tine called DISASM {see flow 
chart). The main loop sequences 
the address pointer through 
memory, prints the disassem- 
bled code and decides whether 
the pointer is within a declared 
data segment. DtSASM does the 
actual disassembly. 

The output statement is for- 
matted as in Table 2. 

DISASM determines values 
for EH$,EL$,FH$,FL$,GH$,GL$ 
and l$(D) while the main loop 
handles Q,H1$,H2$,L1$,L2$,DH$, 
DL$. All single byte instruction 
mnemonics are loaded Into 
memory during the initialization 
of the main loop. At this time an 
array called BL(D) is also load- 
ed, This array holds a value for 
each op-code (0-255) which is 
used by DISASM to route the 
program to the proper routine 
for disassembly. In most cases 
this value corresponds to the In- 
struction byte length, but there 



Software. 
For the 80s. 

Pensadyne Computer Services. The organization that has brought 
affordable software to hundreds of users in the over 40 of the United 
States and 16 countries around the world. The organization with the 
people, the support, the service and the expertise to bring you the 
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Pensa-wrlte 1 ~ Our BASIC word processing system for the 
owner who requires performance at low cost. Many of the features 
of more expensive word processing systems at a fraction of the cost. 
Comes complete with mailing list capable of handling 300 names. 
$19,95 (Specify Model I or Model III). 

Pensa-wrlta 2 -- A machine language word processing system for 
the TRS-80 Model I or III with the power and speed that Is really 
needed in a word processing environment. Word wrap around, 
unlimited Insert and delete, blocii moves, chaining of flies, 20 user 
definable commands, ASCII control code generation for printed 
output to allow subscripts, superscripts, underlining or any other 
feature your printer supports, and much more. All this In a package 
that costs Just $79.95, Manual $10.00 Deductable. (See full page ad 
In Apri^, 1981 80-Mlcrocomputing for a full description). 

Software publishing - Pensadyne is now publishing software for 
independent software authors. Send SASE for complete details, or 
send machine readable copy of your program with any 
documentation. TRS-80 Mode) I, II, III and Colour Computer fully 
supported. Subject material unlimited. 

Now, with that kind of record, and these products and services, 
aren't you just a little curious aL /.it Pensadyne Computer Services? 

Visa and Mastercharge orders welcome. Phone orders welcome 
or write, specifying system configuration, and product desired. 
Please add $1.00 for first class shipping. 

PENSADYNE ~ Giving you the power to think. 



i^;K''//; 



,-207 



COMPUTER SERVICES 
4441 WEST FIRST AVE. VANCOUVER, B.C.. V6R4H9 604-224-3107 



are exceptions (mainly in the 
DD,ED and FD instructions 
which are variable in byte 
length). 

A few smaller arrays (J$(0-7), 
S$(0-7), P$(0-7), N$(0-7), 0$(0-3) 
and Q${0-3)) are also loaded at 
this time and are included in 
order to make some of the other 
values of l$(D) more universal. 
They contain some common 
suffixes which are concatenat- 
ed with the same l$<D) value to 
form a number of different in- 
structions, thereby saving l${D) 
string space. 

The program is rather long 



and therefore does not leave 
much space for machine code 
programs over about 2K (in a 
16K system), it resides in low 
RAM which is where a lot of Ra- 
dio Shack's canned programs 
are written (i.e., EDTASfvl and 
T-BUG) so unless these pro- 
grams are copied to higher 
memory they cannot be disas- 
sembled by this program. 

Another point to consider 
which may or may not be objec- 
tionable is execution speed. 
Since the program is in BASIC 
and a lot of string operations are 
being performed, some instruc- 



A ADDRESS POINTER 

B END ADDRESS POINTER 

C LINE COUNTER 

D 1ST DATA BYTE (CAN BE OP-CODE OR DATA) 

F,G USED TO STORE REGISTER MNEMONIC TYPE CODES 

L,M,N GENERAL COUNTER VARIABLE 

P USED TO HOLD REGISTER CODE 

TEMP STORAGE FOR DECIMAL VALUE OF ADR PTR 

S GENERAL COUNTER VARIABLE 

X TEMP STORAGE IN HEX CONVERSION ROUTINES 

Z USED FOR TEMP STORAGE OF 2ND DATA BYTE 

H1.H2 HEX VERSION OF HIGH ORDER ADR BYTE 

L1.L2 HEX VERSION OF LOW ORDER ADR BYTE 

Z1 TEMP STORAGE OF 3RD DATA BYTE 

Z2 TEMP STORAGE OF 4TH DATA BYTE 

A[N) START ADDRESS ARRAY FOR DATA SEGMENTS 

B(N) END ADDRESS ARRAY FOR DATA SEGMENTS 

BUP) INSTRUCTION BYTE LENGTH ARRAY 

B$ GENERAL PURPOSE STRING 

Ft DUMP TITLE STRING 

H$ HOLDS ASCII VERSION OF MSB IN HEX CONV ROUTINE 

LS HOLDS ASCII VERSION OF LSB IN HEX CONV ROUTINE 

0$.V$ GENERAL PURPOSE STRING 

DH$ MSB OF 1ST BYTE (ASCII REPRESENTATION) 

DL$ LSB OF 1ST BYTE (ASCII REPRESENTATION) 

EHJ MSB OF 2ND BYTE (ASCII REPRESENTATION) 

ELS LSB OF 2ND BYTE (ASCII REPRESENTATION) 

FH$ MSB OF 3RD BYTE (ASCII REPRESENTATION) 

FL$ LSB OF 3RD BYTE (ASCII REPRESENTATION) 

GH$ MSB OF 4TH BYTE (ASCII REPRESENTATION) 

GU LSB OF 4TH BYTE (ASCII REPRESENTATION) 

Hit MSB-OF HIGH ORDER ADDRESS (ASCII REPRESENTATION) 

H2t LSB OF HIGH ORDER ADDRESS (ASCII REPRESENTATION) 

L1S MSB OF LOW ORDER ADDRESS (ASCII REPRESENTATION) 

L2t LSB OF LOW ORDER ADDRESS (ASCII REPRESENTATION) 

PIS CONCATENATION OF FHt -t- FLS + EHt + EU 

P2S CONCATENATION OF EHt + ELS 

l$(D) INSTRUCTION MNEMONIC STRING ARRAY 

JS(N) ARRAY HOLDING ASCII VERSION OF REGISTER CODES 

L$(N) HOLDS ASCII "N" AND 'T' 

M$(N) HOLDS ASCII "O", "1" AND "2" 

NS(N) ARRAY HOLDING ASCII VERSION OF REGISTER PAIRS 

Ot(N) HOLDS ASCII "l,A'VR.A"/"A,l'VA,R" 

Pt(N) HOLDS ASCII MNEMONICS FOR "SBC HL-&-ADC HL" 

QS(N) HOLDS ASCII '■LD'T'CP'TIN'T'OUT' 

St(N) ARRAY HOLDING ASCII CODES FOR CONDITIONAL INSTRUCTIONS 
(I.E. ■■NZ", ■■Z",-NC", ETC) 

Table 1. Variables and Arrays 



VARIABLE; Q 
DESCRIPT: DEC 
ADR 



H1,2S/LI.2S 
4 CHR HEX ADR 



DH.LS/EH ,Lt/FH , Lt/G H.LS 
1st-4Ih DATA BYTES 
(I9t byte = OP-CODE) 



WD) 

MNEMONIC 

STRING 



Table 2. DISASM Output Statement 
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HARD DISK 
MULTIPLEXOR 

FORTRS-80*Modll 




NOW YOU CAN HAVE THAT LARGE COMMON DATA BASE!! 

• Allows up to 4 Mod ll's to connect to a single controller — up to 4 hard disk drives per controller. Users may access the same file simultaneously (first-come 
first-served), 

• Uses Cameo controller and standard 10-megabyte cartridge (hard) disk drives along with RACET Hard/Soft Disk System (HSO) software Removable Disk 
Pack Backup! 

• Access times 3 to 8 times faster than floppy. Mixed floppy/hard disk operation supported, 

• Compatible with your existing TRSDOS programs — you need only change filenames! All BASIC statements are identical, 

• A single file may be as large as one disk. Directory expandable to handle thousands of files. 

• Includes special utilities — XCOPY for backup and copies, XPURGE for multiple ijeletions, DCS directory catalog system, and Hard Disk Superzap, FORMAT 
utility includes options tor specifying sectors/gran, platters/drive, logical disk size, etc. 

HARD DISK DRIVE AND CONTROLLER $5995 RACET HSO Software S400 Call tor multiuser pricing. Dealers call for OEM pricing, 

• * NEW* • DISCAT (32K 1 -drive Min) Mod I, III $50.00 

This comprehensive Diskette Cataloguing/Indexing utility allows the user to keep track of thousands of programs in a categorized library. Machine language program 
works with all TRSDOS and NEWDOS versions. Files include program names and extensions, program length, diskette numbers. Iront and back, and diskette 
free space 

• * NEW* * KFS-80 (1 -drive 32K Min — Mod II 64K) Mod I, III $100.00; Mod II $175.00 

The keyed file system provides keyed and sequential access to multiple tiles. Provides the programmer witti a powerful disk handling facility for development of 
data base applications. Binary tree index system provides rapid access to file records. 

• * NEW* * MAILLIST (1 -drive 32K Mm - Mod II 64K) Mod I, III $75.00; Mod II $150.00 

Thib ISAM-based maillist minimizes disk access times. Four keys — no separate sorting. Supports 9-digit zip code and 3-digil state code Up to 30 attributes. 
Mask and query selection. Record access times under 4 seconds!' 

• *NEW* * LPSP00L(32K1 -drive Min) Mod I $75.00 

LPSPOOL — Add multi-tasking to permit concurrent printing while running your application program. The spooler and despooler obtain print jobs from queues 

maintained by the system as print files are generated, LPSPOOL supports both parallel and serial printers, 

BASIC LINK FACILITY 'BLINK' (Mod I Mm 32K 1-disk) Mod I $25.00; Mod II $50.00; Mod III $30.00 

LinK from one BASIC program to another saving all variables! The new program can be smaller or larger than the original program in memory. The chained program 

may either replace the original program, or can be merged by statement number. The statement number where the chained program execution is to begin may 

be specified! 

INFINITE BASIC (Mod I & Mod III Tape or Disk) Mod I $50.00; Mod III $60.00 

Extends Level II BASIC with complete MATRIX functions and 50 more string functions. Includes RACET machine language sorts! Sort 1000 elements in 9 seconds!! 

Select only functions you want to optimize memory usage. 

INFINITE BUSINESS (Requires Infmite BASIC) Mod I & III $30.00 

Complete printer pagination controls — auto headers, footers, page numbers. Packed decimal arithmetic — 127 digit accuracy +, -, ', /. Bmary search of 

sorted and unsorted arrays. Hash codes, 

COMPRQC (Mod I & Mod HI — Disk only) Mod I $20.00; Mod III $30.00 

Command Processor Auto your disk to pertorm any sequence of instructions that you can give from the keyboard, DIR. FREE, pause, wait for user input. BASIC, 

No. of FILES and MEM SIZE, RUN program, respond to input statements, BREAK, return to DOS, etc. Includes lowercase driver software, debounce and screenprint! 

GSF (Mod I & Ml Tape or Disk - Specify Memory Size) Mod I $25.00; Mod II $50.00; Mod III $30.00 

Generalized Subroutine Facilities, The STANDARD against which all other sorts are compared! Machine language — fast and powerful! Multi-key multi-variable 

and multi-key character string. Zero and move arrays. Mod II includes USR PEEKS and POKES, Includes sample programs. 

OSM (Mod I Min 32K 2-drive system. Mod 11 64K 1 -drive. Mod III Min 32K 1 -drive) Mod I $75.00; Mod II $150.00; Mod III $90.00 

Disk Sort/Merge for RANDOM files. All machine language stand-alone package for sorting speed. Establish sort specification m simple BASIC command File. 

Execute from DOS, Only operator action to sort is to change diskettes when requested! Handles multiple diskette files' Super fast sort times — improved disk I/O 

times make this the fastest Disk Sort/Merge available on the TRS. 

UTILITY PACKAGE (Mod II 64K) $150.00 

Important enhancements to the Mod II. Jhe tile recovery capabilities alone will pay for the package in even one application! Fully documented in 1 24 page manual! 

XHIT XGAT XCOPY and SUPERZAP are used to reconstruct or recover data from bad diskettes! XCOPY provides multi-file copies, 'wild-card' mask select, 

absolute sector mode and other features. SUPERZAP allows examine/change any sector on diskette including track-0, and absolute disk backup/copy with I/O 

recovery DCS builds consolidated directories from multiple diskettes into a single display or listing sorted by disk name or file name plus more. Change Disk 

ID Witt! DISKID, XCREATE preallocates files and sets 'LOF' to end to speed disk accesses, DEBUGII adds single step, trace, subroutine calling, program toopmg, 

dynamic disassembly and more!! 

BASIC CROSS REFERENCE UTILITY (Mod II 64K) $50.00 , _ „,^,^ ^„ ,.^ 

SEEK and FIND functions for Variables, Line Numbers. Strings, Keywords. 'All' options available tor line numbers and variables. Load from BASIC — Call with 

'CTRL'R. Output to screen or printer! 

DEVELOPMENT PACKAGE (Mod il64K) $125.00 ., ., , ^ , , ,. 

Includes RACET machine language SUPERZAP. Apparat Disassembler, and Model M intertace to the Microsoft 'Editor Assembler Plus software package including 

uploading services and patches for Disk I/O. Purchase price includes complete copy of Editor Assembler + and documentation tor Mod 1. Assemble directly 

into memory, MACRO facility, save all or portions of source to disk, dynamic debug facility (ZBUG), extended editor commands 



CHECK, VISA. M/C.CO D.. PURCHASE OflDEfl 
TELEPHONE OROfRS ACCEPTED (714) 637-5016 



^ RACET COMPUTES -^ 



CIRCI F READER REQUEST FOR FREE 24-PAGE CATALOG 

•TRSBOISATRADEMARKOFTANDYCOflPORTION TELEPHONE ORDFRS ACCtPiEDirM) 63/-b016 1330 „ GLASSEL, SUlIE 'M'. OHAHGE, Cft 92665 

BACET SORTS - RACET UTILITIES - RACET compuies - RACET SORTS - RACET UTILITIES - RACET computes - RACtT SORTS RACET SORTS — RACET UTILITIES - 



^Sea List of Advertisers on page 306 
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CAPABILITIES NEVER BEFORE POSSIBLE 
FOR MODELS I & III TRS-801 

Expert programmers Wfth a Fortune 500 company have 
revolutionized what you can do with your TRS-80 Since 
we're already well-paid by our employer, we can ofter you 
our unexcelled quality software at exceptionally low prices. 
Check our features and order today. You won't be 
disappointed! 

Sort/CMD. . .all this and more for Just $19.95. 

• integrates easily into any Basic program or any other 
machine language program 

• designed (or disk and non-disk operations 

• sorts up to 14 fields deep and can carry along up to 14 
additional fields 

• sorts any combination of any variable type ($/%/!/ #} 

• Sorts 35K of information in under 5 seconds 

Price includes program and documentation. If you prefer, 
order the dumps and documentation only (or $12.00. 

Modifications $4.95 each 

to allow use of Sori/CMD in existing Radio Shack" programs. 

• General Ledger I • Accounts Payable • Payroll 

• Business Mailing List ♦ and many others 

Patches for Model in 

• LWOFFSET/CWD S SUPERZAP/CMD*- Both for $5.95 

• RSM 2D/CMD*-* FOR 16K, 32K, and 48K All 3 for $5,95 

Helpful, Interesting Books $19.95 each 

Hundreds of pages filled with specifications, routines, 
tables, entry addresses, explanations, and much more to 
help you enjoy your Model IN. 

• Mystery of the ROM • Mystery of the Diskette 

• Mystery of the DOS 

SPECIAL! All three for $49.95. 

Send certitied check or money order (Kansas residents 
add 3% sales tax) to: Twenty-First Century Software 
1607 Nortt) Coctiran Hutchinson, Kansas 67501 
Call 316 663-1047 for additional information. ^i8 




•Registered tiaOemark of Tandy Corp ■•Regisieied iradema'k of Appatai 
Inc "Registered trademaik o( Small Sysiems Software 



tions can take several seconds 
to be processed. These difficul- 
ties could be minimized were 
the program written in machine 
code. However, I'll leave this for 
another time. I have included a 
list of the variables used for 
those who would like to experi- 



ment or try to make the code 
more compact. If an 8080-only 
version of the program is all that 
is necessary It can be made con- 
siderably shorter. The program 
presented here will generate 
mnemonics for 697 instruc- 
tions.! 





10 


CLS:C=0:INPUT-f:N 


PER START ADDRFSS(DEC)- 


;A 




20 


INPUT-ENTER END 


\DDRESS(DEC) 


";D 






30 


CLS 












4B 


Z=PEEK(A) 










41 


IF z<3; 


GOTO 50 










42 


IF 7,>91 


GOTO 50 










43 


PRINTA 


CHRS(Z) 










44 


GOTO70 












50 


A=A+1:IF A>=B GOTO100 








55 


GOTO40 












60 


PRINTA, 


CHRS(Z) 










70 


IF A>=E 


GOTO100 










80 


A=A+1:C 


=C+1;IF C=15 GOTO120 








9B 


GOTO40 












10C 


PRINT" 


RUN EUDED 


" 








lie 


END 












12E 


INPUT" 


PAGE FULL 


..HIT ANY KEY TO CONTINUE" : SS 




13E 


C=0:GOTO40 












Program Listing 2. ASCII Display Program 









0000 


F3 


DI 




1 






0001 


AF 


XOR 


A 


2 






0002 


C37406 


JP 


067 4 


5 






0005 


C30040 


JP 


4000 


8 






0008 


C30040 


JP 


4000 


11 






000B 


El 


POP 


HL 


12 






000C 


E9 


JP 


(HL) 


13 






000D 


C39F06 


JP 


06 9F 


16 






0010 


C30340 


JP 


4003 


19 






0013 


C5 


PUSH 


BC 


20 






0014 


0601 


LD 


B,01 


22 






0016 


182E 


JR 


2E 


24 






0018 


C30640 


JP 


4006 


27 






001B 


C5 


PUSH 


BC 


28 






001C 


0602 


LD 


B,02 


30 






00IE 


1826 


JB 


26 


32 






0020 


C30940 


JP 


4009 


35 






0023 


C5 


PUSH 


BC 


36 






0024 


0604 


LD 


B,04 


38 






0026 


181E 


JR 


IE 


40 






0028 


C30C40 


JP 


400C 


43 






002B 


111540 


LD 


DE,4015 


46 






002B 


18E3 


JR 


E3 


48 






0030 


C30F40 


JP 


400F 


51 






0033 


111D40 


LD 


DE,401D 


54 






0036 


18E3 


JR 


E3 


56 






0038 


C31240 


JP 


4012 


59 






003B 


112540 


LD 


DE,4025 


62 






003E 


18DB 


JR 


DB 


64 






0040 


C3D905 


JP 


05D9 


67 






0043 


C9 


RET 




68 






0044 


00 


NOP 




69 






0045 


00 


NOP 




70 






0046 


C3C203 


JP 


03C2 


73 






0049 


CD2B00 


CALL 


002B 


76 






004C 


B7 


OR 


A 


77 






004D 


C0 


RET 


NZ 


78 






004E 


18F9 


JR 


F9 


80 






0050 


0D 


DEC 


C 


81 






0051 


0D 


DEC 


c 


82 






0052 


IF 


RRA 




83 






0053 


IF 


RRA 




84 






0054 


01015B 


LD 


BC,5B01 


87 






0057 


IB 


DEC 


DE 


88 






0058 


0A 


LD 


A,{BC) 


89 






0059 


lA 


LD 


A, (DE) 


90 






005A 


08 


EX 


AF,AF' 


91 






005B 


1809 


JR 


09 


93 






005D 


19 


ADD 


HL,DE 


94 






005E 


2020 


JR 


NZ,20 




Program Listing 3. Sample Disassembly Listing 
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UTILITY 



Get Level I 

printouts from Level IL 



LList 

For Level I 



Everett Ogden 
16 Herber Ave. 
Delmar. NY 12054 



One of the many shortcom- 
ings of Level I is the diffi- 
culty of obtaining a printout of a 
program. Radio Shack has a 
screen printer, but the image 
leaves a lot to be desired. The 
method described here requires 
you have access to a Level il 
with a printer. That may not be 
an insurmountable obstacle. 

If you belong to a computer 
club you probably know some- 
one with that equipment. 
Schools that use the TRS-80 for 
training are likely to have txjth 
systems and, if you can't find a 
Level II and printer any other 
way, you may be able to talk 
your local Radio Shack store in- 
to letting you use theirs. 

Using Level ll's CONV, you 
can convert Level 1 programs to 
Level II, but that will expand ab- 
breviated statements and 
change PRINT AT to PRINT @. 
it's easy, however, to get a true 
listing of the Level I version. 

CX)NV checks a list of Level i 
statements to see which of 
them are used )n the program. If 
the part of the program it is 
working on is not on the list, it 
leaves it intact and goes on. At 
the end of the list is a jump ad- 
dress if no match is found. If this 

^Sm List of AOv^niaws on page 306 



address is moved to the head of 
the list, no match will ever be 
found and no conversions per- 
formed. 

When you have found your 
Level II do the following: 

"Load the Level I/Level II con- 
version program, but do not 
Jump to it. Return to the BA- 
SIC monitor. 

■Enter the following instruc- 
tions: 

POKt 32468, 251 
POKE 32469, 222 

This puts the "no match" ad- 
dress at the head of the list. 
•Now jump into CONV and 
follow the normal conversion 
procedure. The entry address 
is 31478. 

When you list the program 
you will find that It is still in Lev- 
el I format. You can now LLIST 
it. Don't try to run it, though, be- 
cause Level II will hang up on 
the abbreviations and PRINT AT 
statements. Statements that 
were written out in full will have 
been properly converted to Level 
11 tokens because that is done in 
another part of the program. 

I discovered this idea while 
converting a program that used 
the abbreviation M. (MEM). It 
hung up on that line, and when I 
listed it I saw M. had not been 
converted. When I disassem- 
bled CONV, t found out why: Ra- 
dio Shack left that word outlH 



TIME 



METHUSELAH" has time for you 
and your TRS-80 



ITie name Mt^thuselflh has aiwaya been Lifiarx:iiit<-<i with lunn htr The Methuselah 
computer clock hoard with its 24 hourrlock nnd its pfrpetuai ralrnd^ir us indEed worthy 
uflhe title, Methuselah imts state of the art terhrinloBy into urtion with '.;■:?■ on board four 
year lilhiurn battery bark-up to keep it ruunitix e<.e:i whpn your ((unjjutiT la off. That 
meaiiM no mnre fooling around with the softwarf or hardware "Elocks' thiit bprome Elip 
\'an Winkles when the romputer la reset or turned off , 

Meth 11 wish hHs many other timely features. Software ,..itiht.s.kt^p the DOS and hASIC 
bme and tli-rk rommandB ticking. Only two screws mount Mrthuaelah inside Iheenpan- 
Hion mterface without .■ioldennn, clipping, LUttiriB, or jumpirinj; There is even a spare 
1/0 port and four different interrupts available for pefiple who love Lo tinker 

SPECS: MM/llD/YY, HH MM SS anii day of the week. Four year lithium battery 

hark-up. Crystal controlled timinK (arijiistahle ,S2-7Bfi osciilalort. Twenty four 
hour rlfM-k and perpetual caicndar. 



L^- , 



^U 



M-Sl. , . 
(add$4.50PandHi 

S-SI 

(add $2.:.0PandH) 
(If you wish to uae Methusel 
and the HS 2.12 hoard (2MI 
tonether, order this option »h 
includes a new cover and e 



1 1 7..'".U 



NDM DESIGNS ^135 

S33n W North Avb 
I 414 I 259 1 JO 



\M 



idfntf. add -l' 



htai 



MFTHUSEIAH le a 
Is mark □( NDU Dssigns 




ZIP UP YOUR 
MODEL I 



SPEED-UP UNIT ' in easy to install Bleclronic device that enables prosrams 
to run Z to 3 times faster. It's the fastest and finest quality speed-up unit 
on the market. 

• guaranteed to double processing speed- no additional 
purchases required. 

■ programs will run up to 3 times faster (5.3 mhz) by adding 
a Z80fi microprocessor and delay line - not supplied. 

• returns automatically to normal speed during disit and 
cassette operation - no software patches required. 

• Iteyboard power-on light changes coior to Indicate operating 



$45.00 



VIDEO I. Reverses the video display to provide blacit characters and 
graphics on an all white screen tor a much easier to read presentation. 
Software controlled. Cures pulling and distortion problems commonly ex- 
perienced with TRS-aO monitors. For use wtth TRS-80 monitors only. 
Assembled. 

$24.00 



■SATISFACTION GUARANTEED" 



Add S2.D0 postage & handling • California residents add 6% sales tax 
-Foreign orders add 15S. 



ARCHBOLD ELECTRONICS 

10708 Segovia Way Ranoho Cordova, C A 95670 

(916) 635-5408 

Dealer inquiries invited 
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SAVE 

10% OFF 

Any Software Purchase 
From This Ad. 

- This iVIonth Oniy - 



■iitiMiss uvmMADc 


Program 


litodki 


MochiM 


Pries 


-OZV Winter 
azv Vme' 


D 


Modi 


S125 00 


D 


Mod 111 


SI 75 00 


=t>sirnar Do 'a Handle' 


D 


Mod i 


S12500 


>,,raDhn 


D 


Moa 1 Of III 


Sd9 95 


.,[itpat>i 


D 


Mod 1 


S60000 


^r'oath 


D 


Mod (11 


S75O0O 


-Ornpieat LG'O's BooKeeoer 


D 


MCX) 1 or III 


Sd9 95 




UTILITY SOFTWARE. 




auoer Utiii-v 


D 


f/ioa : 


5-19 95 


Super U'li '■y 


D 


Mod i 


Coll 


^uici- f." 


D 


McxJ 1 


SW96 


C^a^n Maier fo' \!.; Si oiiv 


D 


Mod 


51-195 


'ope Cpdv ■ 


D 


^•,'C, Mod 1 


';id 95 


■ ope CoDv . 


D 


'.V>1 '■ and 1 


S1d95 


D 


Mod ■ 


39 95 


B^g + 


D 


Mod 1 and II 


5 Id 95 


■-'a«e 3C 


D 


Mod ' 


.14 95 


.xiuDieZap ■ ND-Si, 


D 


Mod 1 


C^9 95 


DouO^Zao' iDOf 


D 


Mod^ 


330 05 


''asv ^errr^ 


SAMES 


Mod or 'I' 


559 95 


space Colony 


C 


Modi 


$1496 


TRS Super Invaders 


c 


Modi 


SI 9.95 


Super Vaders 


QO 


Mod It) 


$19.96 


Attack Force 


c 


Mod t or III 


115.95 


Galaxy Invasion 


c 


Mod 1 Of ttl 


$15.95 


Super Nova 


c 


Mod 1 or III 


$15 95 


Meleor Missior^ II 


c 


Mod 1 or III 


$15.95 


Cosmic Fighlef 


c 


Mod 1 or III 


$1595 


Symon Capture 





Mod 1 or III 


$12.96 


RIppV 1.3 


c 


Mod 1 or lit 


$14.95 


A ''e g^-'ie c '95 are 'o' rr.e 


.O^ERATINO SVST 

D 


i"« d 5« version is 
MS 


exito Coll tor pr:ce 


NFWDOS'aO 


Mod 1 


51d9 95 


.DOS 


D 
■TMMn 


Mod 1 


S130 95 


Mi>.1 Hi Tom Commented 


SPCCIAI 


Mod K 


522 50 
+ 2 50 Shipping 


If you purciose NEWDOS;60 receive CHAIN MAKt^; or new 


extro Charge' 




Only $149.00 






pKjS S2 50 shipp.^g arid handling 





Purchase LAZV WRITER 8. POSTMAN DATA HANDLER (Mod I vetSKjn only) 
for $250.00 

RECEIVE POSTVWITER AT NO EXTT?A CHARGE 
This month only 



.SUPER SPECIAL Of THE MONTH 



Purcr>ase any Dusrr^ess pockoge from Soft Sector MarVetmg. 'nc this month 

and receive OutCK Fix tor only $25.00 

Ihisisd 534 05 value 



iCND FOR OUR NiW FREE CATALOG) 

Or Cdtoiog rs ncluded with a'l orders 



VISA* 



$•• lort month't M Micro for mora dvlaltt on our Mriwar* or Mftd lor ov»rvl«w>. 




GRAPHS 



■y Steve SklndeH 

The Super 

Graph & Chart 

Package for 

Screen or Printer 



By Sieve Skindell* 1961 This Is a program itiat Is lor the person who does reports or 
requires some sort ol plotted output to show gains or losses, or any type of output 
that needs graphs. This program puts to the screen or to a printer theplotled points in 
bar graph format and plots the mean, and the averages of input. This is a very impor- 
tant program for accountants, CPAs and the average businessman to evaluate, at a 
moment's glance where he is. was, or where he is going. Files saved to disk can be 
recalled at any time to be reexamined, modified, or jusi reprinted. An exira feature: il 
you have the Microline 80 printer, by Okidata or Epson MX-80, your output is in true 
graphics. Ihlormalion is supplied for the user so he can nrodlf y this program for other 
printers. Comes complete and ready to run. Requires MOD I or MOD III 48K disk 
Printer optional (132 col.) Only $49.95 

MK.ao PACKAOf SPtCIAU 




MX-80* - New 

You Pay Only $599.00 

Save Up To $162.95' 

Hkiffy - Supply Limited' 
And At No Extra Cost To You 

1 Bo* of Popef (2700 sheets 20# white) 2 Extra Ribbons - 1 Extro Print head 
and Shipping included lor oil UPS in U S 
'Compor«d to all MMns ol IM pdeol 

■for MX-80 (/I add 5150 00 

Sorry no C O D on this special To receive this discount you must prepay 

« you don t requite oil these exira items, call for price 

HOW TO ORDER_ 



SOFT SECTOR MARKETINQ, 

INCORPORATED 

6250 Mjddlebelt • Gorden City, Ml 48135 • 1 (313) 425-4020 

Doolor IrtqirirtM Invtiod. -'516 

COD . certified check MO orcoshoniy Sony noCOD over $150 00' MosioraersstiiDpeo 
next day AilorOen must tiove shipping included Pteaseoad2%o'S2 50 whrchevens r.igfier 
tor sliipping (unless ottierwise stated) Outot-country orders pteose odd 510 00 oddilionot 
shrpoing ofx3 tionaiing bokjnce relumed upon shipment 

■TRS-80 IS o product ot Radio Shock division o' tt>e Tondy Corporation 
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More Outstanding Products from . 
SOFT SECTOR MARKETING, INC. 
& Victor Andrews 



.^434 



BOSS ill 

®1981 Soft Sector Marketing, Inc. 
for Mod III 



The 

BASIC 

OPERATED 

SINGLE 

STEPPER 



This Machine Language utility is designed to 
aid you in creating and debugging programs 
written in BASIC. The utility allows you to trace 
the program flow, to single step the BASIC 
program, to observe the conditions of varia- 
bles during program execution, and to push 
your BASIC program on the stack during 
program development. The utility is l<nown to 
operate with Mod III, TRS-DOS or Mod 111 Rom 

BAblO. Original corceotDyVB. Hestef. 

Cassette (goes to disk) $18.95 

- New Lower Price - 

Also Boss 2.1 version 2.2. ®1980 V.B Hester for 
Mod I Cassette (goes to disk) $18.95 



Larry Ashmun Is Back . . . 
and Brings You . . . 

SUPER VADERS 

With Sound - Mod I & Mod III 
®1981 Soft Sector Marketing, Inc, 

The third in the evolution of the 
most popular space invaders games 
for Tandy machines. Nov^ for 1 or 2 
players, 10 levels of play. '''^^^,^: 



Cassette or Disk 



$19.95 



Ask for upgrade information for TRS-Super 
Invaders or Invaders-Plus. 



TAPE COPY 2 

®1981 Soft Sector Marketing, Inc, 

This program will load most any TRS-80 
500 Baud system tope (standard) Mod I 
speed) and load it into memory and save 
itoteithierSOO or1500 Baud on the Mod III. 
NO KNOVVLEDGE OF MACHINE LANGUAGE 
NEEDED. Now it gives you a way to back 
up a machine language program that 
loads at the lower speed and makes 
cassette loading into your new Mod III a 
much faster and more reliable process. 
Works with Mod I* & Mod III. 



Only 



$14.95 



"Mod I loads arxl ioves at 500 Baud oniv 



MOD III ROM 
COMMENTED 

®1981 Soft Sector Marketing, Inc, 

Only $22.50 

+$2.50 Shipping & Handling 

Notjust a rehash of old informatioa 
but detailed comments on the ROMS 
in the latest machine from Tandy. 

Now In its 3rd printing! 
Over 150 Pages! 



See previous page for ordering info, 
■ 



DATA MANAGEMENT 



If the curve fits, snare it! 



Regression And Correlation 



C, Brian Honess 
22 Shaftesbury Lane 
Columbia, SC 29209 



The techniques of regression 
and correlation are used for 
forecasting, predicting, deter- 
mining the degree of relation be- 
tween variables and how well 
some equation describes that 
relationship, etc. We'll develop a 
program to find the best fitting 
straight line in a set of plotted 
data values, the degree of corre- 
lation between the variables, 
and look at the problem of fitting 
a parabolic curve to the data. 

I'll use two variables, consid- 
ering the traditional problem of 
height and weight. We'll test a 



group of people to determine 
what the relation of height to 
weight is, and use the results to 
predict the weight of someone 
with a known height. Collecting 
data from ten people, we pro- 
duce Table 1. 

Use the variable X for the 
height, and the variable Y for the 
weight. Also, attach a subscript 
to each data value or pair of val- 
ues, so that Xj will correspond to 
the height of the fifth person, 
and the height and weight of the 
third person can be represented 
as X3,Yj. 

The next step is to plot each 
pair of points. Since we want to 
determine a person's weight, 
given his or her height, we'll call 
Y the dependent variable, and 
plot it on the Y axis. The set of 
plotted points forms a scatter 
diagram. 





Subl«ctNo. 


HeigMOn) 


WfflghtObs) 




1 


54 


100 




2 


72 


160 




3 


60 


150 




4 


74 


195 




5 


62 


110 




e 


re 


180 




7 


66 


135 




8 


57 


135 




9 


66 


150 


"1 


10 


60 


120 




Table 1. 


Height-weight Chart 



We don't need to plot a scat- 
ter diagram to find the best fit- 
ting straight line through the 
data points. The scatter dia- 
gram will be useful when deter- 
mining if a straight line is the 
best curve to fit. 

A straight line appears to fit 
the scatter diagram in Fig. 1 
about as well as any other curve. 
I've drawn one In, guessing at 
where it would be. This free- 
hand method won't be good 
enough for all applications, and 
we'll want to code a program to 
find the best fitting line. 

The equation for a straight 
line is Y = a + bX, where a Is the 
Y intercept (the place where the 
line crosses the Y axis), and b is 
the slope (the angle the line 
makes with the X axis). 

The Y intercept Is difficult to 
guess at, since our scatter dia- 
gram is not drawn so the origin 
is in correct perspective. 

We'll guess that the Y inter- 
cept is about -90. The slope 
will be easier to estimate, since 
our "guess line" goes through 
two data points in the scatter 
diagram. One point has an X val- 
ue of 54 and a Y value of 100, the 
other point has an X value of 66 
and a Y value of 1 50. Therefore: 



slope = ^=ViY,^ 150-^00 ^^,gee^ 

run X,-X, 66-54 



The method we'll use to find 
the best fitting line is called the 
method of least squares. We'll 
take the sum of the distances 
between each point and the line, 
squared, move the line around 
until the sum is minimized, and 
call this the best fitting line. The 
resulting line is also called a 
regression curve of Y on X, since 
Y is the dependent variable in 
this example. 

Now code a BASIC program 
to calculate a and b. First deter- 
mine the maximum numtjer of 
data values so we can code the 
DIMenslon statement. We'll use 
100 valid data points; if you have 
more, raise the vector sizes in 
the DIM statement. We'll usethe 
trailer principle, so we'll have to 
DIMenslon an additional stor- 
age location to hold the trailer 
value. 

10 DIMX(101), Y(101) 

Key the data pairs into a pro- 
gram statement, and get into a 
loop to read the values. You may 
alter the program so that you 
can enter the X values all at 
once, then enter the Y values. 
I'm going to enter the data val- 
ues as pairs (X,, Y,; X„ Y^; X,, 
...,Y,). 

Inside the loop we'll deter- 
mine whether the first number In 
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220 

200 ^ 

ISO 
160 -1 

140 

120 ■ 

100 ■ 

80 ■ 

,11 




M^ 



— 1 1 ] r 1— 1 T r— 

50 54 58 G2 66 70 74 78 82 



Fig. 1. Plot Diagram 



a pair is negative. If it is, we've 
found the trailer, and can exit 
the loop. Subtract one from the 
loop index after exit. The result 
will be stored in variable N, and 
tells us Uov/ many pairs of data 
values we have. 

Let's assume our data is al- 
ways positive. If your data 
doesn't fit this assumption, 
change thevalue of the trailer so 
that it is "more negative" than 
your smallest data value. You 
may want to set up a permanent 
trailer value of some very large 
negative number. 



20 FOR 1 = 1 TO 101 
30 READX(I),Y(I) 
40 IFX(IKDTMEN60 
50 NEXT I 
60 N = l-1 

70 DATA 54,100,72,160,60,150,74,195 

71 DATA 62,110,75,180,66,135,57,135 

72 DATA 66,150,60,120, -1,-1 



Data statements can go any- 



where in the program, but there 
is one trick. You'll notice that 
I've used two trailer values; the 
READ statement in line 30 ex- 
pects to read two values— if it 
doesn't, it won't go to line 40 to 
check for the trailer. The second 
trailer value could be any num- 
ber. 

The program, thus far, will 
have loaded the first 11 loca- 
tions of the X and Y vectors with 
their data values, and returned a 
value of 10 for N. (The eleventh 
value in each of the two vectors 
will be the trailer value, a -1.) 

Next Step 

The next step is to calculate 
the values of a and b in the equa- 
tions given earlier. 



NIX' - (LXf 
^. NZXY-dXKIY} 
NIX' - (IXf 



Note: I've used some shortcut 
notation: Every time you see the 
S symbol, it means to sum all 
values of the corresponding var- 
iable. In other words: 



IX Y means: 



I XiYj. 
1 = 1 



The formulae indicate that we 
need to find four sums: the Y val- 
ues, the X values, the XY values, 
and the X' values. The formulae 
don't show the sum of the Y' val- 
ues, but we're going to find it 
anyway, to use later. 

Name the variables and then 
code the summation process: 



Sum of X values 
Sum of V values 
SumofX' values 
Sum of V' values 
Sum otXY values 



SX 
SY 
X2 
Y2 
XY 



BASIC automatically puts a 
value of zero into each variable, 
so you can skip lines 80 through 
64 if you wfsh. 



80 


SX 


^0 




SI 


SY 


= 




82 


X2- 


::0 




83 


Y2- 


^0 




84 


XY 


= 




90 


FORI = 


1 TON 


100 


SX 


= SX 


+ X(I) 


110 


SY 


= SY 


+ Y(t) 


120 


X2 = 


^X2 


+ X(I)-X(I) 


130 


Y2- 


:Y2 


+ Y(I)'Y(I) 


140 


XY 


= XY 


+ X(I)-Y(I) 


150 


NEXTI 





The denominators are the 
same in the equations for calcu- 
lating a and b. We have to calcu- 
late this only once, and call the 
results D. We then continue to 



calculate a and b. 

160 D = N'X2-SX-SX 

170 A = (SY«X2-SX-XYyD 

180 B = (N«XY-SX-SY)/D 

190 PniNT"Y-INTERCEPT='; A 

200 PRINT ■SLOPE =";B 

210 PRINT 

220 PRINT "EQUATION OF 

BEST FITTING LINE:" 
230 PRINT 

240 PRINT " Y = "; A; " + "; B; "* X" 
250 PRINT 

If you key in the program with 
the test data, you should get a Y 
intercept of -84.4519 and a 
slope of 3.52867. The Aquation 
is: Y= - 84.4519 -H 3.52867 X. 
We weren't too far off with 
guesses of -90 and 4.16. The 
best fitting line is one that is ro- 
tated slightly clockwise from 
the guess line we drew. 

Now that we know the equa- 
tion of the best fitting Hne, we 
can use it to predict values of Y 
(weight) when given values of X 
(height). For example, assume 
someone is 5'10" tall. This is 70 
inches: we'd enter the equation 
with an X value of 70. 

Y= -84.4519 + (3.52867-7(q 
- - 84,4519 -h 247,007 

= 162.555 lbs. 

We can get the computer to 
do this for us with a little more 
coding: 



260 INPUT-WANTTOPREDICTYVALUES 

?(1=YES,0 = NOV; K 
270 IF K = 0THEN320 
280 INPUT "ENTER AN X VALUE "; XX 
290 YY = A + B'XX 
300 PRINT " PREDICTED Y IS; "; YY 
310 GO TO 260 
320 



Note: I used XX and YY in this 
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X X X 

Fig. 2. Positive, Negative and Uncorrelated Variable Diagrams 
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z 
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10 



T 



4 6 8 10 12 X 

Fig. 3. Scatter Diagram of Quadratic Curve 



segment, since X and Y have 
been used for other purposes in 
the program. In fact, they are 
each dimensioned variables, 
and have 101 locations each. 

Correlation 

in our example, the vaiue of Y 
increased as the value of X in- 
creased. This is a positive, or di- 
rect, correlation. If the value of Y 
decreased as the value of X in- 
creased, it would be a negative, 
or inverse, correlation. If there 
didn't seem to be any relation 
between the two variables, this 
would suggest no correlation 
(uncorreiated). These cases are 
illustrated in Fig. 2. 

We can go one step farther, 
and say that each of the first two 
examples has a linear correla- 
tion—there is a linear relation- 
ship between the variables, and 
a straight line would be the best 
choice for a regression equa- 
tion. 

A popular way to measure the 
degree of correlation is by calcu- 
lating the coefficient of correla- 
tion r which can assume any val- 
ue between -land -fl. A value 
of - 1 indicates a negative cor- 
relation in which all data values 
lie on the regression line. A val- 
ue of + ^ indicates a positive 
correlation in which all data val- 
ues lie on the regression line. An 
r value of zero indicates an un- 
correiated relationship. In our 
example we'd expect an r value 
somewhere between zero and 
+ 1, since there is a positive cor- 
relation between height and 
weight, but all values do not He 
on the regression line. 



NIXY-gXHTY) 



V (NSf - ffXn-fNIV - (lYft 

This won't be nearly as bad as 
it seems, because we've already 
found all the sums we need to 
substitute into the equation. 

The thought of keying that 
equation into one line scares 
me; let's do it in pieces. Do the 
numerator first, call it NU; then 
do the two major terms in the de- 
nominator, calling them T1 and 
T2. Finally, we'll put it all to- 
gether and find r. 

320 NU = N-XY-SX*SY 
330 T1=N-X2-SX-SX 
340 T2 = N*Y2-SY-SY 

350 R = NU/SQRCT1-T2) 

360 PRINT "CORRELATION COEFFICENT 

(R) = "iR 

When you run this with the ex- 
ample data, you'll find r = 
.856481 , indicating a strong pos- 
itive correlation. 

The next program will do non- 
linear regression. In other 
words, we'll be fitting curved 
lines to a set of data points. 

Consider the following set of 
values: 



X 


Y 


3 


2 


5 


3 


6 


4 


8 


6 


9 


5 


11 


B 



Once again, Y Is the dependent 
variable. We'll again plot a scat- 
ter diagram. Fig. 3, to aid our vis- 
ualization of the relation be- 
tween X and Y. This time It Isn't a 
straight line, but a parabola, or 
quadratic curve. The general 



equation for a parabola Is: Y = a 
-t-bX-t-cX'. We'll calculate the 
values of the coefficients a, b, 
and c. 

The coefficients a, b, and c 
can tie found by solving the fol- 
lowing set of simultaneous 
equations: 

iX = aN + bIX + clX' 
IXV = alX + bXX' + cIX" 
IX-Y = aZX' + bXX' + cZX* 

This time we need seven sums; 
name them and start coding the 
program. DIMenslon the X and Y 
vectors as we did before, use the 
trailer principle to read In the 
values, and initialize each of the 
sums to zero, if you like. 



Sum in formulas BASIC V«riabl« Nama 

« SX 

IX- X2 

aC X3 

«• X4 
I- 

XY XY 

lY SY 
X- 
X- 

'Y YX 

10 DIM X(101), Y(101) 

20 FOR I = 1 TO 101 

30 READ X(l), Y(l) 

40 DATA 3.2,5,3,6,4,8,6,9,5,11.8, -1,-1 

50 IF X(IKO THEN 70 

60 NEXT I 

70 N = l-1 

80 SX = 

90 X2 = 
100 X3 = 
110 X4 = 
120 XY = 
130 SY = 
140 VX = 
150 FOR 1 = 1 TON 
160 SX = SX-t-X(l) 
170 X2 = X2 + X(I)-X(I) 
180 X3 = X3>-X(I)-X{I)-X(I) 
190 X4 = X4 + X{I)-X(I)-X(I)*X(I) 
200 XY = XY + X(I)-Y([) 
210 SY = SY + Y(I) 
220 YX = YX-t-X(l)-X(l)-Y(l) 
230 NEXT I 



I added a temporary PRINT 
statement to the program, 235 
PRINT SX;X2;X3;X4;XY;SY;YX, 
and got the following values: 

42 336 2940 27300 226 28 1994 

You can check your keying to 
this point. 

If we substitute these values 



Into the three simultaneous 
equations, we have: 



28 = a6-^b42 + c^^6 
226 = a42 + b336 + c2940 
1994 = a33e -► b2940 -^ C27300 



Written in a more conventional 
form: 



6a + 42b + 336c = 28 
42a -)- 336b + 2940c = 226 
33ea + 2940b + 27300c = 1 994 



We'll now have to solve three 
simultaneous equations with 
three unknowns (a, b, c) using 
determinants. Determinants will 
seem complex at first, but the 
method will be easy to code, and 
will automatically produce an- 
swers. 

Determinants 

The determinant of a square 
matrix of order two is defined in 
Fig. 4. Find the product of the 
two numbers on the diagonal 
sloping down to the right, and 
then subtract the product of the 
two numbers on the other diago- 
nal (Fig. 5). Try finding the solu- 
tion to a determinant with some 
numerical values, as in Fig. 6. 
We have to solve determinants 
of order three, however, which is 
a matter of solving three deter- 
minants of order two, and multi- 
plying (Fig. 7). 

(f we write down the coeffi- 





5 8 
-2 4 



= (5-4)-(8--2) = 20-(-1^ = 36 

Fig. 6. 
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Poor 

Man's 

Floppy 



HIGH SPEED CASSETTE SYSTEM 




JPC products 

csssttit* sysivms 



TC-B 



Now tha widely acclaimed 
JPC Cassette System is available 
tor your TRS-flO* computer. 
The price is only $90.00 

TC-8 Cassette S>steni 
JPC Products 
Albuquerque, NM 
Kit: $90 
Assembled: SIZO 

by Cart A. Kollar 

I guess I don't have to tell any TRS-80 owners 
how frustrating the cassette system that 
comes with the computer can be. Even with the 
factory mod that's available, the annoyance of 
loading and checking programs becomes just 
barely tolerable. 

If you're like me, after you've just plunked 
down a chunk of money for a Level 11 16K ma- 
chine, '"you ain't got nuttin left" for even one 
disk drive at 500 bucks apiece. So you suffer. 

A reasonable alternative is the Exatron 
Stringy Floppy (ESF). This will cost you about 
250 bucks and totally eliminates your loading 
and saving problems, automatically and fast. 
I've had one of these for about six months and 
love it! 

But, if the price is still too steep, have I got a 
device for you! 

ITie Device 

The February 1980 issue of Microcomputing 
had an ad thai intrigued the hell out of me. It 
was a high-speed cassette system by JPC Prod 
ucts acclaimed as a "poor man's floppy." It 
made all sorts of seemingly ridiculous claims 
such as "loads five times faster," "stores 50,000 
bytes on a 10-minute cassette," "less than one 
bad load in a million bytes with the volume con- 
trol anywhere between one and eight," 

All this for a measly |90! bucks? How could 
this be? A call to Albuquerque answered a few 
questions: Yes, it had its own power supply, 
and, it stored programs five times faster be- 
cause it utilized higher density data. The com- 
puter outputs the information at a higher rate 
out of the rear keyboard connector. 

The ad had even claimed anyone could build 
it even if you have never soldered before. JPC 
would make it work, if you couldn't— for free, 
I was sold. I placed my order, and it arrived 
about two months later (parts shortage). 

1 work in electronics, so I found the unit ex 
ceptionally easy to build. It took about an 
hour. The manual is supierb. ("Iliai's better than 
great.) It was clear, concise and exact with no 
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ambiguities. Important parts placements are 
stressed (fx)larity markings on electrolytics, 
bands on diodes, etc.). 

JPC was right! With these instructions, you 
couldn't go wrong. The board quality is excel- 
lent. It is double-sided and parts locations are 
clearly marked on the component side of the 
board. There are no jumper wires to install. 
JPC utilizes PC traces and plated-thiough 
holes for connections to traces on the other side 
of the board. 

Also, there are absolutely no adjustments or 
settings to bother with. 

The documentation is a sheaf of 8 Vi x 1 1 pa- 
pers stapled together. It is written in the nicest 
format I've seen in a while. Each command 
and/or subjects is covered on its own sheet in 
large type. All explanations are in easy to read 
English- not computerese. 

Commands and Features 

SAVK"filename": Saves your BASIC pro- 
gram on cassette, 

LOAD: Reads the next B.ASIC program from 
the cassette. 

I.OAD"filename": Searches for and loads the 
specified file from cassette. 
LOAD? and I.OAD?"rilename": Reads file 
from cassette, and compares contents to mem- 
ory. 

LOADN: Prints a list of all the programs on a 
cassette, until interrupted by the "break" key, 
LOADN"filename": Same as above except the 
taf>e will stop at the end of the program named, 
KIIX: Removes the file manager program 
from memory so that the extra memory can be 
used by large programs. 

RSKT: Allows the operator to rewind and posi- 
tion the tape on tape recorders that have these 
functions tied to the motor control jack, 

RUN'Tilename": TC-8 searches for a specified 

program and runs it immediately, 

PLT"rilen8me": Same a.s SAVE "filename", 

except it is for use with system tapes. 

GFT: Same as LOAD, except it is for use with 

system tapes, 

C.ET'Tilename": Same as LOAD "filename", 

except it is for use with system tap)cs. 

GET? and GET?"niename": Same as LOAD? 

and LOAD?"filename", except it is for use 

with system tapes, 

GETN and GETN"fllename": Same as 



LOADN and LOADN"rilename". except it is 
for use with system tapes, 
OPEN: Required before cassette input or out- 
put of a data file can be attempted. 
CLOSE: Required to end a ca.sst-tre data file, 
PRINT*: Allows numerical or string data to be 
output to a cassette file, 

INPUT*: Allows numerical or siring data to be 
ir.p;il from a cassette file, 

I haven't counted them, so 1 don't know 
about the "one load in a milhon bytes" claim, 
but my son, Anthonv (age 1 1), loaded about 30 
of his programs from his Radio Shack formal 
tape 10 anew TC-8 format tape. He's lun them 
all and found no bad loads. 

Unlike the standard tape system, you can po- 
sition your tape anywhere before the program 
you want and not have to look for a blank spoi 
between programs. The TC-8 patiently waits 
for the program you wani and then starts load- 
ing without getting confused by the portion of 
the previous program you just fed it. 

Try that on your regular cassette system; 
you'll wear out the reset button ■ 

ORDER NOW 

To order your TC 8 kit, send your check or 
money order lor S9() (KJ plus $3,50 posiage 
and handling to JPC PRODLC I S CX)., 12021 
Paisano Ct,. Albuquerque, NM 87112 (New 
Mexico residents add 4% sales tax). Credit card 
orders accepted by phone or mail. Personal 
checks will delay shipment. We will otherwise 
immediately ship you the TC-8 kit, the cabinet, 
the ribbon cable, the F>ower adapter, an instruc- 
tion manual, and a cassette containing the 
software. 



ly JPC PI 



^190 



JPC PRODUCTS CO, 
Phone (505) 294-4623 
12021 Paisano Ct. 
Albuquerque, N.M. 87112 



^S99 List of AOvaniatrs on page 306 
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cients of a, b, and c from our 
three simultaneous equations in 
determinant form, we have Fig. 
8. 

I've made a column vector of 
the three values to the right of 
the equals signs in the equa- 
tions, to the right of my 3 x 3 ma- 
trix, just for reference 

Here's the trick: the 3 x 3 ma- 
trix is going to become the de- 
nominator in three division op- 
erations, each of which will find 
a, b, or c. The three numerators 
will be formed by substituting 
the column vector to the right 
for each of the three columns of 
the 3 X 3 matrix, in turn. In other 
words, we calculate as shown in 
Fig. 9. 

On the left are the values for 
the example we're working with, 
and on the right are the variable 
names for the general case. The 
six 3x3 matrices on the right 
are the ones we'll code a pro- 
gram to solve. Each of the six 
will be solved using the general 
method for a 3 x 3 determinant. 

The denominators are all the 



same, so let's begin by writing 
the code to find the determinant 
of the denominator: 

240 D1=X2'X4-X3'X3 
250 D2 = SX'X4-X3-X2 
260 D3 = SX-X3-X2*X2 
270 D ={N-D1|-(SX-D2)-H(X2-D3) 

If you want to check your prog- 
ress, put in the temporary PRINT 
statement 275 PRINT D, and you 
should get a value of 63504. 

Now write the code for calcu- 
lating the other three determi- 
nant values, and solve for a, b, 
and c, using the same methods 
we used for the denominator. 



280 A1=X2'X4-X3-X3 

290 A2r-.XY-X4- X3-YX 

300 A3 = XY-X3-X2-YX 

310 A = ((SY-A1)-(SX-A2) + (X2-A3)yD 

320 B1=XY'X4-X3-YX 

330 B2 = SX'X4-X3-X2 

340 B3 = SX'YX-XY-X2 

350 B = ((N*BI)-(SV-B2) + (X2'63))/D 

360 C1=X2-YX-XY'X3 

370 C2 = SX'YX -XY-X2 

380 C3 = SX-X3-X2'X2 

390 C-((N-C1)-(SX-C2) + (SY-C3)VD 

400 PRINT 

410 PRINT "A = ";A 

420 PRINT "B"; B 

430 PRINT ■■C= -.C 



28 42 336 
226 336 2940 
1994 2940 27300 



SY SX X2 
XY X2 X3 
YX X3 X4 



6 


42 


336 




42 


336 


2940 




336 


2340 


27300 




6 


28 


336 




42 


226 


2940 




336 


1994 


27300 





N 


SX 


X2 


SX 


X2 


X3 


X2 


X3 


X4 


N 


SY 


X2 


SX 


XY 


X3 


X2 


YX 


X4 



e 


42 


336 




42 


336 


2940 




336 


2940 


27300 




6 


42 


28 




42 


336 


226 




336 


2940 


1994 





N 


SX 


X2 


SX 


X2 


X3 


X2 


X3 


X4 


N 


SX 


SY 


SX 


X2 


XY 


X2 


X3 


YX 



6 42 336 
42 336 2940 

336 2940 27300 



N SX X2 
SX X2 X3 

X2 X3 X4 



Fig. 9. 



440 PRINT 

450 PRINT "BEST FITTING PARABOLA:" 

460 PRINT 

470 PRINT"Y= ■',A;" + ",B;'-X + '';C;'- 

Xt2" 
480 PRI^^■ 
490 END 



Key this in, adding it to the first 
part of the program, run it, and 
you Should get: 



A = .666667 
B = . 380952 
C = . 0238095 



The equation for the best fitting 
parabola, therefore, is: 

Y = 0.666667 + 0.3e0952X + 0.0238096X' 

You can use this equation for 





6 42 336 




28 






42 336 2940 




226 






336 2940 27300 




1994 




Fig. 8. 



making predictions of Y after 
keying in X values, just as we did 
with the linear regression mod- 
el. Check lines 260 through 310 
In the previous program. Lines 
260, 270, and 280 should be the 
same. Line 290 would become: 
YY = A + B*XX-l-C'XXt2 and 
lines 300 and 310 would be the 
same. Of course, you'd have to 
adjust the various line numbers 
to correspond to the later place- 
ment in the program. ■ 



"THIS IS DIGITALKER*" 
OUT 127,0 



This is all it takes to say this or 143 other expressions with MICRO- 
MOUTH*. Absolutely no software drivers or subroutines to kiad. 
MICROMOUTH", the latest Circuit Cellar project can be used as an 
emergency annunciator, as an aid for the handicapped, for process 
control and automatic monitoring, and to add new dimensions to 
computer games. 

Sampie phrases that can tie programmed are' 
■THE TIME IS 4 HOURS 23 MINUTES . . (BEEP)'' 
"NUMBER 4 IS 3.47 VOLTS" 

THE SPEED IS 100 METERS A SECOND . . SLOW DOWN" 
Thousands ol expressions can be added by changing the ROM chips. 

MICROMOUTH' is plug compatible with APPLE II and TRS-80* com- 
puters. Directions are included for S100, H8 and parallel 

port operation. -DIGnAlKER is a uademarti o( Nauonal SemiconBucIot Cofp 




Complete Kit (as Shown) $120.00 
Assembled and tested: 

Apple II $150,00 

TRS«) Modal I w/power 

supply and cable $170.00 

TRS«) Model Mi $200.00 

•MICROMOUTH is a trademark ol Microminl 'rr 

The MicfoMint Inc. t^3io 
917 Midway 
Woodmere, NY11S98 
Dialer inquiries 
invited. 



call: 

1-800-645-3479 

lnN.Y.516-374'6793 
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UTILITY 



It does just that! 



The Variable Lister 



John L. Webster 
9606 Todd Mill 
Huntsville. AL 35803 



On several occasions, I have 
vi/ished that my TRS-80 
would list out the variables used 
in a program. This wouid help in 
documenting softvtfare and se- 
lecting variables during the de- 
velopment of a new program. 
After waiting a few months for 
someone else to publish an 
answer to my wish, I gave in and 
worked out my own solution. 
Surprisingly, it was easier than 
anticipated. 

PEEKing at the storage area 
after entering a variety of vari- 
ables led to the discovery that a 
numerical flag such as two, 
three, four, or eight is used to 
signal which type of variable fol- 
lows. A flag two signifies an in- 
teger variable, a three indicates 
a string variable, a four indi- 
cates single precison (unspeci- 
fied TRS-80 variables fall into 
this category by default), and an 
eight signals a double precision 
variable. 

The next character in se- 
quence is the ASCII value for the 
subscript or second portion of 
the variable name. The third 
character is the ASCII value of 



the first portion of the variable 
name. 

The contents of addresses 
40F9 and 40FA {16633 and 
16634) give the starting address 
for the variable storage areas. 

My Variable Lister program 
begins by PEEKing at 16633 and 
16634 then goes to the indicated 
memory area and PEEKs and 
tests for the numerical flags 
two, three, four, or eight. I used 
odd-ball variable names (ZV 
through ZY) in the Variable List- 
er program so that it would not 
make use of variable names nor- 
mally found. Line 10015 in the 
program tests for the first of 
these odd-balls, "ZV". and tells 
us when the searching of vari- 
ables has reached the searching 
program's own storage area. At 
that point we branch to line 
10070 and print out the results 
of the variables found. 

Using Variable Lister requires 
that it be entered at the end of 
the program whose variables 
are to be searched out and 
listed. Since it is only an 18-line 
routine, this might be tolerable; 
however, it can also be merged 
with any program using smaller 
line numbers. As an experiment 
I merged the Variable Lister with 
Radio Shack's Backgammon 
demo program using the follow- 



ing procedure: 

• Enter and CSAVE Ihe Variable Lister on 
cassette. 

• CLOAD the program whose variables are 
to tie found and listed. 

• Do a PRINT PEEK(1 6633), PEEK(1 6634). 
Write down the resulls. 

• If PEEK116633) was equal to or greater 
than two go to step six. 

• POKE 16548, PEEK|16633) + 254:P0KE 
16549,PEEK(16634)- 1 go to step seven. 

• POKE 16548,PEEK(16633)-2;POKE 
16549,PEEK(16634) 

• CLOAD the Variable Lister. 

• POKE 16548,233;POKE 16549,66 

• Bun the program. (This is an Important 
step!) 

• Break and then GOTO 10000. 



I have observed that when the 
Variable Lister is appended to a 
target program, the target pro- 
gram must be run before the 
GOT0 10000. Otherwise, the var- 
iables are not found. 

To those of you who have 
t»en waiting for someone else 
to publish a variable listing pro- 
cedure, I hope that this simple 
program will satisfy your wish. It 
doesn't do the array variable but 
they are usually flagged by ttieir 
DIM statement. ■ 



5000 REM ••* INSTRUCTIONS •■' 

5010 CLS:PRINTTAB(10)!"VARIABLE-LISTER INSTRUCTIONS 

6020 PRINTiPRINT'THIS PROGRAM MUST BE APPENDED TO THE TARGET PRO 

GRAB 

5030 PRINT'BY THE FOLLOWING METHOD:' 

5040 PRINT'd) CLOAD THE TARGET PROGRAM," 

5050 PRINT"(2) PRINTPEEK(16633) ,PEEK(16634) WRITE DOWN RESULTS.' 

5060 PRINT-(3] IF PEEK[16633)->2 THEN SKIP STEP 4 AND DO STEP 5. 
5070 PfiINT"[4) POKE16548,PEEK[16633)+254:POKEl6549,PEElt(16634)-l 

5075 PRINT"JUMP TO STEP 6," ^ ,,,,,,, 

50B0 PRINT"15) POKE16548,PEEK{16633)-2!POKE16549,PEEK(16634) 

5090 PRINT* (6) CLOAD VARIABLE LISTER PROGRAM" 

510 PRINT" (7) POKE1654e,233!POKK16 549,66* 

5110 PRINT"(8) RUN THE TARGET PROGRAMI ( THIS IS ESSENTIALl ). 

5120 PRINT"(9I 'BREAK' AND 'GOTO10000' TO EXECUTE LISTER.' 

515 END 

10000 REH •** VARIABLE LISTER *•* 

10005 ZV=PEEK ( 16633 j+256*P£EK( 16634) 

10010 ZW=PEEK(ZV) :ZX-PEEK(ZV+1) : ZY=PEEK ( ZV+2) 

10015 IF ZY''90 AND ZX=86 THEN 10070 

10020 LPfilKT CHRS(2¥1 ;CHBS(ZX); 

10030 IF ZW-2 THEN 10080 

10040 IF ZW=3 THEN 10090 

10050 IF ZW-4 THEN 10100 

10060 IF ZW=8 THEN 10110 

10070 LPRINTjLPRINT'VARIABLE SEARCH ENDED":STOP 

10080 LPRINT" * I(JTEGER":ZV=ZV+5:GOTOie01B 

10090 LPRINT"S "iPEEK(ZV+3) ," CHAB . LONG" i ZV=ZV+6 jGOTOlBSlfl 

10100 LPRINT' I SINGLE PRECISION" ! ZV-ZV+7 :GOTO10alB 

10110 LPRINT' I DOUBLE PRECISION" : ZV=ZV*11 iGOTOieBlB 

10200 PRINT'ARRAY VARIABLES ARE NOT INCLUDED' jEKD 

Program Listing 
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STARHGHTER 

by SPARKY STAKKS 

010-0120 TAPE $24.95 

TRS-aO Model l/IH and PMC-80 16K fc up 

012-0120 DISK $29.95 

Trs-80 Model I — 32K and up 
Disk supplied on protected media 



StarFighter 

Od any LANDBASE CENTRAL - in any part of the 
known universe - on any morning - a very meaty 
looking craft can be seen standing witli its control 
console visible: waiting. If one watclies for s 
while, a ngure In unique garb will approach the 
console of liis Combat Computer, Insert hit pilot 
record end begin yet another joomey into the 
deep dark reaches of space . . . 
The SC-7B503 STARFIGHTER cratt is Ihe most 
Bophisticalad ship known to man. You. ae its pilot, are in- 
Blnicted that the current Blate of relations with ths Petro 
Resource Conglomerate Is a state of war. As such, ymi are 
charged with ridding the galaxy of dreeded P.R.C. craft, to 
Insure Ufa ai we know 11 In the Solar Galactic Authority. 

A STARFIGHTER tour of duty lasts anywhere from twenty 
mlnulei to six hours. You must track down, and Identify 
craft. LANDBASE CENTRAL frowns on destrucUon of 
friendly craft. Identincatlan la critical — STAR PIRATES 
and MARAtniERS frequently disguise themaelvei as 
friendly craft. Only by monitoring their mavemenls and 
learning thslr habits can you hope to survive. Once iden- 
tified aa a foe. the dogright can begin. 

You start out as a NEW PILOT, hoping after many hours of 
play to reech the coveted rank of STAR LORD. (As a NEW 
PILOT, you also have access to the enclosed SC-78S03 
Training Simulator, which can help you to hone your identi- 
fying and fighting abilities.) Destruction of enemy craft can 
be used for consideration for promotion, or in trade for 
bounty necessary to keep you in Hypercharge and 
Maneuvering fuel. Your SC-78503 STARnGHTER induction 
peckage includes two cassette tapes [one for Main Misaion 
■one for the 5076503 Simulator) or one self-booting disk. 
Also Included is the top secret STARFIGHTER induction 
manual - 32 pages In length, which will guide you step by 
step through your initiation into this fascinating new world, 
. . . The pilot leaving duty will head for LANDBASE 
CENTRAL to tally and clear his craft hit record. 
Review complete, he inserts his record tape (or 
disk] and records Us precious Action File. File In 
hand, he steps out of his craft - glad tor earth bet- 
ween his feet - but anxious for his next chance at 
STARFIGHTER duty. Meanw hile, the SC-7BS03 sits 
- welting for some VETERAN or NEW PILOT to 
slide twhind its console and sift stars for the 
de^*en^nh^jRX^^^^^^^^^^^^^ 



COMMBAT 

A strategic and tactical battle game that allows you. 
with your computer's assistance, to pit your sldll and 
dexterity against another player and their computer 
in a real time battle to the death! 



You and your opponent are located in a 4096 square 
kilometer corotwt reservation with exactly the same 
resources avaUable to each, the outcome will be 
governed by the skills of each player and a little 
luck. As soon as you have established serial 
communications with your enemy {110 to 9600 baud 
modem or direct comiectian). the battle is joined. 
You decide wtiich weapons to carry, load them onto 
and manuever up to eight remote controlled tanks 
with the primary goal of finding and destroying your 
enemy's base before he can do the same to you. Each 
enemy tank that you can defeat in combat lessens 
his chances of finding you. 

Offensive and defensive weapons available to you 
include: Rockets, L.Bsers. Shells. Mines, Decoys, 
Drone Reconnasiance Aircraft and one Nuclear 
ICBM. All but the last two items may be loaded onto. 
cerried by and fired or dropped by your tanks, up to 
their maximum load carrying capacity. 



by Bob Schilling 




COMNfBAT 

by KOBEKT SCHILLING 

010-0123 TAPE $19.95 

TRS-80 Model I/III — 16K & up 

012-0123 DISK $24.95 

Trs-BO Model I — 32K and up 



Your computer displays current resource status, a 
map of the combat reservation updated by tank, 
base and decoy sensors and handles all 
communication chores, freeing you to make the 
strategic decisions and prosecute the tactical battle 
situations that arise. 

COMMBAT requires as a minimum a computer 
system with RS-232 port and a 300 baud fijll duplex 
modem, or if the combatants are to be located 
within 300 feet of each other, a modem 
eliminator cable in lieu of the modems. 



SPACE 

INTRUDERS 

As battalions of evil invaders cornel 
out of the sky, you jump into your 
laser turrent and start defending! 
the Earth from their unending] 
attack. 

This game is the best rendition yet 
of the most popular arcade game in 
history. Designed to emulate the ! 
Deluxe version, this game 
incorporates all the intrinsities of| 
the original from the "SOS" of 
escaping intruders to the sphtting 
invaders. 

Even if you have one of the other 
versions on the market, you'll still 
consider this program a must 
for your collection. 



M^ 
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SPACE INTRUDERS 

by DOUG KENNEDY 

010-0116 TAPE $19.95 

TRS-80 Model 11111 and PMC-80 16K & up 

012-0116 DISK $20.95 

Trs-aO Model I — 32K and up 
Disk supplied on protdctod media 
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/ CATALOG & ORDERING 
TOLL FREE HOT LINE (800) 327-7172 



If you ovm. 

a TRS-80 

(Models I. II, n, 

Color and Pocket], 

Apple, Atari, or other 

desk-top computer, then 

we have the programs for you! 

Order from your favorite software 

dealer or call toll-free (800) 327-7172 

today to order or for your free catalog. 



dventur6 

INTERNATIONAL 

A DIVISION OF SCOTT ADAMS, INC. 
^529 BOX 3435 • LONGWOOD, FL 32750 

Call loll ttBe tor catalog (800) 327-7172 




■TRS-80 Is a trademark o' tfie Tandy Corpotation 



INTERFACE 



A Model 33, a Multi-80 and a dash of software. 



Recipe for Hard Copy 



y/t 



Larry Keith 

3903 Marsha Drive 

Columbus, OH 43207 



Do you have a Level 1 1 TRS-80 
and dream of hard copy ca- 
pability? If you have $2000, your 
local Radio Sfiack store has an 
expansion interface and a line 
printer. However, $2000 is more 
than most of us can handle, but 
take heart— I have a recipe 
you'll like. 

Take one used teletype ma- 
chine, add one interface device, 
combine with a printer driver 
program, and season with a cou- 
ple hours work. The result: In- 
stant hard copy with minimum 
expenditure. 

So you don't know anything 
about teletype machines and 
you've neverseen a printer inter- 
face device that doesn't require 
an expansion Interface. What 
does a driver program look like? 
I will describe each element of 
the system, provide sources for 
each and give you some first- 
hand advice on how to create 
the cheap and painless print 
system. 

Ingredients 

The teletype machine, or 
more correctly, the teleprinter 
set, is an electro-mechanical de- 
vice originally designed for com- 
munications use, either In a land 



line or radio circuit. After ASCII 
(American Standard Code for In- 
formation Interchange) was de- 
veloped, teleprinters using that 
code became popular. There are 
still a lot of non-ASCII machines 
floating around— stay away 
from them. We do not need the 
aggravation of adding an ASCII 
to baudot converter to our 
system. 

There are several manufac- 
turers of teleprinters; Klein- 
schmidt, Mite, Lorenz, ITT 
Creed and Teletype Corpora- 
tion. Teletype Corporation of 
Skokie, IL, is the predominant 
manufacturer and your best bet 
for a used machine. I will con- 
fine my discussion to the Tele- 
type brand. 

During my research, I found 
references to Models 11, 12, 14, 
15, 19, 20, 26, 28, 29, 31, 32, 33, 
35, 37, 38, 40 and 43. Models 33, 
35 or 43 use ASCII and are still in 
service throughout the country. 
Consequently, repair service is 
available and parts and supplies 
are easily obtained. 

Let's look at one popular 
model, the Teletype Model 33. 
The Model 33 can be found in 
three distinct configurations: 
receive only (RO); keyboard 
send-receive (KSR); and auto- 
matic send-receive (ASR). 

The RO set can only receive 
and print messages. The KSR 
set can originate messages as 
well as receive and print. The 
ASR set transmits, receives. 



prints and has the capability to 
automatically initiate, accept 
and control incoming mes- 
sages. 

There are also variations with- 
in the three configurations. 
Some machines are friction feed 
and some use sprocket form 
feed. You may find a unit with a 
tape punch and a tape reader. 
All use ASCII, print on SVj-inch 
paper, print 72 characters per 
line and 10 lines to the Inch at 
110 baud (100 wpm), and are 
ideal line printers for hobby 
computer applications. 

These machines are adver- 
tised for around $300. Concen- 
trate on the receive only (RO) 
machines; they cannot be used 
as terminals, so the price Is us- 



ually lower. And don't overlook 
some of the oddball machines, 
as long as they will print the 
whole character set. Such ma- 
chines are often ideal for this 
application. Hamfestsarealsoa 
good place to find teletype 
equipment, since a lot of hams 
use them for radio-teletype ap- 
plications. 

Sources 

The following are some 
sources to investigate. (I cannot 
personally recommend these 
companies since I have not 
done business with them.) 



'Typetronics 
Box 8873 
Ft, Lauderdale, FL 33310 




Photo 1. 
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• General Peripherals 
68 B Merrimac St. 
Danberry, CT 06810 

• D. Lavers 

Suite 719, 5217 Morrla SI. 
Halifax, NS, Canada B3J IB? 

• Lawrence R, Pfleger, K9WJB 
2600 South 14th St. 

St, Cloud, MN 56301 

You also need an Interface 
from your TRS-80 to the tele- 
printer. Several magazine con- 
struction articles describe such 
an interface. (Dig out those old 
copies of Kilobaud and take a 
look,) There are also ready-made 
interface devices available. The 
following are some sources: 

• Smalt System Software 
P.O. Box 366 
Newbury Park. CA 91320 

• Hobby World 

19511 Business Center Drive 
Nonhridge,CA 91324 

• Salvage 2 

1358 Byron Avenue 
Columbus, OH 43227 

Finally, you must have a pro- 
gram to drive the teleprinter. Sal- 
vage 2 and Small System Soft- 

vi/are furnish printer-driver pro- 
grams with their interface de- 
vices. Other driver programs 
have been published, 

A Printer Subsystem 

I use a Model 33 Teletype ma- 
chine. I purchased a Multi-80 
from Salvage 2. The Multi-80 
{$49.95} is an interface device 
with some additional features. I 
also purchased the TRS-232 For- 
matter program from Small Sys- 
tem Software ($14,95). The total 
cost of my printer subsystem 
was less than $275. 

The Multi-80 is a multiple pur- 
pose TRS-80 accessory devel- 
oped and produced by Salvage 
2. Check the following features: 



• A solid state Teletype inter- 
face that uses cassette output 
to feed the Teletype machine- 
no expansion interface required, 

• A cassette relay protection 
circuit that uses internal TRS-80 
cassette motor relay to switch 
to a heavy-duty relay in the 
Multi-80. 

• A cassette control circuit 
that allows you to gain control 
of the cassette recorder by sim- 
ply flipping a switch. Fast-for- 
ward, rewind, and all other cas- 
sette motor controls are avail- 
able without unplugging the 
subminlature plug or resorting 
to software control, 

• Audio output is available 
from a rear panel jack on the 
Multi-80 for monitoring the 
CLOAD and CSAVE functions 
and for using that output for 
sound effects in user programs. 

The Multi-80 runs from 117 V 
ac. The unit comes with instruc- 
tions, a printer-driver program 
on cassette, and a one-year lim- 
ited guarantee. 

The unit is packaged in a neat 
gray and black box that mea- 
sures 3x5x6 inches. Connec- 
tions are via jacks located on 
the rear panel. Two switch con- 
trols and an LED are mounted 
on the front panel. 

Installation and Operation 

Three interconnecting cables 

run from the Multi-80 to the cas- 
sette recorder, and one cable 
runs from the Multi-80 to the 
Teletype machine. Two cables 
must be terminated on each end 
with miniature plugs and one 
cable must be terminated on 
each end with a subminlature 
plug. I used RadioShack72-inch 
shielded cables. The Teletype to 
Multi-80 cable is Radio Shack 



TO TRS-BO 



TO TELETYPE 



AUDIO TT 




TO CASSETTE 



Fig. 1. Multi-80 Connections 

^Soe List ol Advertisers on page 306 



HI-RESOLUTION 
GRAPHICS FOR TRS-80 




INTRODUCING: 

E/RAM 



E/RAM Grapl^ics is a unique hardware/sotlware package, which wili integrate tiigh- 
speed, high resolution graphics into any Level II TRS-80 system E/RAM hardware is a 
fully plug-compatible box, which installs in minutes, and requires abscluteiy no 
modifications to the TRS-80 system. E/RAM software is a compact, relocatable set of 
utilities which provides the user with easily accessible graphics functions. For instance 
the user pokes the end point coordinates ol a hne into certain locations, does a USB call, 
anil an optimized dot-raster line is automatically drawn on ttie screen at very high speed 
(less than 10 milliseconds for a medium length line) 

E/RAM does not require the purchase of an additional monitor CRT The high-resolution 
graphics video is syncromzed withtheTRS-80 video and appears on the screen with the 
normal TRS-80 display. Alphanumencs, TRS-80 graphics, and E/RAM higii-resolution 
graphics may be displayed simultaneously or individually. 

E/RAM hardware contains its own 6144 byte video memory, which provides a true 256 k 
192 matrix of inflipendtnt graphic elements, (E/RAM is HOT a programmable character 
generator type graphics system. Character generator systems liave serious limitations 
in full screen graphics applications ) 

E/RAM will operate with or without an expansion Interface, and with any standard 
memory configuration (4k through 48k). 

E/RAM is flit. "E/RAM" is an acronym for Extended Random Access Memory, a very 
short description of the Patent-Pending method of I/O employed by this device, which 
gives it memory -mapped speed without inierfering with the memory space usedJby the 
TRS-80 

The installation of E/RAM will not affect 
normal operation of the TRS-80. High 
resolution ON/OFF is under program or 
manual control (a switch is provided). An 
expansion card edge connector is provided 
so that other peripherals may be used on 
the TflS-80 fius. 

E/RAM software package is compact (less than 1000 bytes), last, easy to use, and very 
flexible. A relocating loader is provided. The user can delete unneeded routines if more 
memory space is requirea. Lines can be drawn as fast as 13 per second using BASIC U5R 
calls, and as last as 200 per second using assembly language programs. 

Routines usable through USR of BASIC, and ol course an assembler CALL are: 

INIT - Sets up display 

PLOT - Plots a point 

READ - Reads a point from the screen 

BLACK - Sets drawing mode to black (off) 

WHITE ■ Sets drawing mode to on 

CLEAR - Clears the high-resolution graphics screen 

LINE - Draws a line 

As an example, after the utilities package is loaded and you desire to draw a line, tl>e 
tallowing sequence of BASIC instructions could be executed: 




U=USR(0) 
POKE U-1,X0 
POKE U-3,Y0 
POKE U*5,X1 
POKE U*7,Y1 
V=USR(4) 



Return ttie communications area 
Provide the beginning X coordinate 
Provide the beginning Y coordinate 
Provide the ending X coordinate 
Provide the ending Y coordinate 
Draw the line (Current Speed is 
approximately 13 vectors/second) 

The complete E/RAM package is available for only £349.95, and includes case, power 
supply, cables, software cassette, and complete documentation. 

To order, or for further details, write or call. 

VERN STREET PRODUCTS ™^«'?°'^„':^^^,'^ ^™"^ 

4949 ooulh Peoria Ave 

Tulsa, Okla 74106 

(918) 747-2550 

1800) 331-9128 



We handle a full line 
ol Radio Shack products 



,.^432 



Send $10.00 for a set of the manuals provided (applicable towards purctiase) 

Dealer inquiries ate invited. 

Terms: COD Welcome, check, money order. Master Charge, or Visa 

Delivery: Stock to 60 days. 

E/RAM was designed, and is manufactured by KEYLINE COMPUTER PRODUCTS, INC. 

13 East 6th Street, M/C 200, Tulsa, Oklahoma 74119. 

■TRS-80 is a registered trademark of Radio Shack, a Tandy Corporation. 
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Spellino Errors? 
Does your TRS-M* word processor need help? 



H '"'-^IiiAMlJ^liil 

CAN SPBLL rendezvous AND mnemonic 
AND OVER 38,000 OTHER WORDS 

Nnv, |ply™rTRS-HO and Prnnfreader by Soft-Toob cheek ynurScripsil*. 
t^lfctriL Ptnci^ or oLhtr dorumifnLs for spelling and typograph^al errors. 
h ha^allof the features needed to meet your proofreading requirements. 

• Checks every single word ot even your biggMl dncumenl 
in under 5 minules. 

• Tlie 3S.0W word dictionary is one ol ll>« largest availsble. 

• Dictionary can be aatily eilended lo add more words lucli 
■■ leclinical laims or names. 

• All unknown words are listed on the screen and can be saved 
on B file for pnnttng. 

• Wortis Willi almost any TRS-BO wordprocessor including 
Scnpsit and Electric Pencil. 

• Comes with complete and easy lo understand User's Manual. 

• Developed lot Ihe TRS-BO by a Pfi.D. In Computer Science. 

MOOEL-I M.>4uir...s:i:iKKAM I diskdnve. TKSDOS'or NEWEKJS- --(54.00 

MODEL-II l(v<|Uirf-KtlJKKA.M.Idiskdriie.'rHSDOSVersion2-0 $109.00 

MODEL-illHei|uin's-l^KKAM. Idi^ikdrivt, i'RSDOS S64.00 

Untr.s Manual cinlj. specify model (3.00 

When iirdeiing, spetifj mddel, memory siie, number of drives. 

tkher professional quality software tools available from Soft-Tuol* 
ini-bdf SO IT-SI" KEK.N'- a lull screen leil ediUir for the Model-ll 
and III. Kalfor - d -structured programming language pre-processor fur 
hX)KTRAN- l*l*-Hatfur- an automatic program pretty printer for Ratfor. 
plus more III [he coming months- Please call or write for more details 

'*■■■ ^449 

OidMi Hnl pailpiH) b| liril cUii null I^H^ O0'^l^*'l\l^O'Lkt^ 

Twrm C«tn, ctwcK. raon.nKd.F, VISA. JlSli P O B 1» 

Of MAStEHCABD NM milMnllsdd 4% »■ ^^^TSJ^ O^i M 

DaaUr iiwiinx ^iiilMd VQr Tij*m, nm «rDsa 

P'OOi'MOei. So'! Tools and Solt-Scr»Bnar«trid«miriuol Soli- Toon '"**' "'"'•'* 

' TratMmarh ol Tandy Cor pa rd Man 



Prices 

Standard P&T CP/M 2 

P&T CP/M 2 for Shugart 850 2 sided drives 

P&T CP/M 2 for Cameo Hard Disk system 



S185 
S220 
S250 



We also carry other software packages, single & double sided 
expansion drives and the Cameo Hard Disk System. Write for 
details. 



PS 



Attention TRS-80 Mod II owners: 
P&T CP/M® 2 has more to offer! 

More Disk Storage 5g6K bytes with double density on stan- 
dard single sided disk drives. It that's not enough, versions are 
availablefordouble5idedexpansiondrives(1.2M bytes perdisk) 
and the Cameo Hard disk system (10M bytes.) 
More CRT Functions P&T CP/M 2 has the most advanced 
screen driver available for the Mod It including: erase to end of 
line/screen, insert/delete line, cursor addressing, non-scrolling 
area on screen, and much more. 

Mora Serial I/O Capabilities The serial drivers in P&T CP/M 2 
support ETX/ACK, XON/XOFF, and request to send handshaking. 
Direct control of serial ports is also available for special applica- 
tions. 

More Documentation We provide the standard CP/M manuals 
and our own 150 page manual written specifically for P&T CP/M 2. 
More Utilities We have added 1 4 of our own utility programs for 
the Mod II to the standard CP/M utilities. 
More Useful System Functions P&T CP/M 2 has all sorts of 
useful features you won't find elsewhere: type-ahead buffer tor 
keyboard input, system time of day clock, automatic program 
execution and lots more. 



Prpps.rt COD Masipfcn^iye of Uiss orrleis -ii-ceoieil 
Siiinoinu eii'.i Cairttimia 'psidents ^dfJ 6'. ^ai^s !a> 
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^5-jif^ PICKLES & TROUT 

i ROU 1 P O BOX 1 206. GOLETA. CA 9301 7, (8051 967-95( 



CP.'lt< 15 3 ttademaih ol Oq.Ui' Re. 



(8051 967-9563 

TRS-aO IS a IraOemack ol TanOy Core 




Photo 2. 



number 22 speaker wire. 

installation is simple. I re- 
moved the cassette plugs from 
the recorder and plugged them 
into the corresponding input 
jacks on the rear of the Multl-80. 
I connected the output jacks on 
the Multl-80 to the cassette 
recorder using the 72-Inch 
cables. The jacks are clearly 
marked, and by connecting both 
ends of each cable before I 
started on the next one, I avoid- 
ed getting my wires crossed. 
After connecting the Teletype to 
the Multl-80 via the output jack 
marked TT, I plugged the line 
cord into the last available wall 
outlet In my computer room (see 
Fig. 1). 

Multl-80 operation is not com- 
plex. The switch marked PR and 
CA controls the printer/cassette 



signal. This switch can be left in 
the PR (printer) position except 
when CSAVEIng a program. 
Then flip the switch to CA (cas- 
sette auxiliary) until the CSAVE 
Is complete. The red LED on the 
panel lights up whenever the 
recorder relay Is activated. 

The TRS*232 Formatter 

The TRS-232 Formatter pro- 
gram Is a new advanced printer 
software package from Small 
System Software. This versatile 
BASIC program is exactly what 
you need to produce profession- 
al hardcopy. Features include: 

• Printer paging allows you 
to set the number of lines for 
your paper and the number of 
lines that you wish printed on 
each page. 

• Line length control causes 
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Computer experts 
(the pros) usuaUy have big 
computer experience. 
That's why when they shop 
system software for Z80 
micros, they look for 
the big system features 
they're used to. And that's 
why they nice Muiti-User 
OASIS. You will too. 



DATA INTEGRITY: FIU& 
AUTOMATK RKORD LOCKING 



The biggest challenge 

for any multi-user system 

is co-ordinating requests 

from several usei 

to change tbAsal^reMird 

at 



(THEN COMPARE.) 



Without this control, 
unauthorized users could 
access your programs and 
data and do what they like. 
A frightening prospect 
isn't it? 

And multi-users 
can multiply the problem. 

But with the Lo( 
Password 



memory is needed. Even 
if you have more than 64K, 
your pay-off is cost savi] 
and more efficient use' 
of all the memoi^ou hj 
availabl^tf^wlk it 
se 



OASIS IS AVAILABLE FOR 

SYSTEMS Altos Compucorp Cromemcqi 
Delta Producis Digital Group. Digita 
Microsystems, Dynabyle. G oObOu t 
Inden Intersystems. Nc 
SD Syslems. TRSj 
Graphic. Vof 

CONTROL 

io'uus. Kc 
bell Telel 




fample: normally 
jserscanviewa 
particular record at the 
same time. But. if that 
record is being updated 
by one user, automatic 
record locking will deny all 
other users access to the 
record until the up-date is 
completed. So records 
are always accurate, 
up-to-date and integrity 
is assured. 

Pros demand file & 
automatic record locking. 
OASIS has it. 



.eepmnwrory 
ser nas been 
, when and 
r how long. 
Pros insist on these 
security features. 
OASIS has them. 



EFFICIENCY: 
RE-ENTRANT BASIC 



SYSnUR SECURITY: 
lOGON, PASSWORD 
AUSERAaOUNTING 



Controlling who gets on 
your system and what they 
do once they're on it is the 
essence of system security. 



A multi-user system 
is often not even practical 
on computers limited 
to 64K memory, 

OASIS Re-entrant 
BASIC makes it practical. 

How? 

Because all users use a 
single run-time BASIC 
module, to execute their 
compiled programs, less 



upports 
jnals 
little as 
ry. Or, with 
itching, as much 
784K, 

Multi-Tasking lets each 
user run more than one 
job at the same time. 

And there's our BASIC — 
a compiler, interpreter and 
debugger all in one. 
An OASIS exclusive. 

Still more: Editor; Hard 
& Floppy Disk Support; 
Keyed (iSAM), Direct & 
Sequential Files; Mail-Box; 



Scheduler; Spooler; 
all from OASIS. 

Our documentation is 
recognized as some of the 
best, most extensive, in the 
industry. And, of course, 
there's plenty of 
application software. 

Put it all togetherand it's 
easy to see why the real 
pros like OASIS. Join them. 
Send your ordertoday. 




User Accourlii 
Device Diivers; 
Print spooler: 
General Text 
EO'tor etc) 
SiNGLE-USEH 
Muni-USCft 



BASIC COMPILEfl/ 
INTERPRETER/DEBUQQER 



RE-ENTRANT BASIC 

COMPILER/INTERPRETER/ 

DEBUGGER 



DEVELOPMENT PACKAGE 

[Macro Assembler: 
I. nkage Eoitor, 



DIAGNOSTIC a 
CONVERSION UTILITIES 

(Memorv Test. 
Assembly Langi-age 



Recovery Disx Tesi 
F.iB Copy trom 
otner OS, ere ) 



COMMUNICATIONS 
PACKAGE 

(Term. "a. F m.,.ator. 
Fi;e Ze-a R Receiue) 



PACKAGE PRICE 

lAil of Above) 
SINGLE-USER 

MULTI-USEH 



FILE SORT 



COBOL-ANSI 74 



S17.S0 
17.50 



60.00 
, 6D.00 



Order OASIS !rom- 

Phase One Systems, Inc. 

7700 Edgewater Drive, Suite 630 

Oakland, CA 94621 

Teieoho-e ;4'5) 562-B085 
TWX 910-366-7139 

NAME 



STREET (NO BOX 


~) 


CITY 




STATE 
AMOUNTS 


ZIP 



(Attacn system descr.ol.on, 

add S3 lOJ shipping; 

Californja residents add sales tax) 

n Check enclosed QVISA 
n UPS C.O.D, D Mastercharge 

Card Number___ . 

Expiration Date ■ 

Signature ^^^ 



MAKES MICROS RUN LIKE MINIS 




First in Its Class 
and Looking for 

Work. 

TRsao 

Model I, II, III 



This package includes five multiple regression 
procedures (including stepwise, backward elimi- 
nation, all subset, and ridge), 24 transformations, 
comprehensive data base manager (w/ith search 
and sort), descriptive statistics, hypothesis testing 
(7 tests), time series analysis (7 models), random 
variate generation, discrete probability distribu- 
tions, sampling distributions {generate all possible 
samples from a data set), and excellent 
documentation. 

Complete package with manual — $125 

To order, send. payment plus $2.00 shipping and 
handling to: 

Quant Systems •'269 

P.O. Box 628 

Charleston, S.C. 29402 

803-571-2825 

S.C. residents add 4% sales tax 

Overseas orders add $7 for shipping 



^5^ I y^\ COMPUTER INTERFACES 

#5^ OFFICE ^n\ & PERIPHERALS 

^^^^STEMS ^ ^ 

• POS 100 NRZl TAPE DRIVE CONTROLLER/FORMATTER - Now your 
mkfo cin read and wrile IBM/ANSI compatible NRZl format 9track magnetic 

tapes. Tfie POS-100 consists of 5-100 bus card, 6' ribbon cable, tape drive controller 
card, cable to Pertec-Standard NRZl Tape drive, plus documentation ant) Z-80 or 
8080 soflware (specifiy). Power is derived from tape drive and S-100 bus. Ship Wt.: 
10 lbs. Suggested Retail Price $995.00 

• POS 103/202 "MIX or MATCH" MODEM - Unique POS control design permits 
use in one housinR o( both Bell. compatible 103 (0-300 baud) and 202 [0-1200 

baud) modem modules originally made by VADIC Corp, for a telephone company 
subsidiary. FEATURES: RS-232 serial Interface, auto-answer, auto-dial, LED 
display, telephone line interface via acoustic coupler, manual DAA, or auto-answer 
DAA (sold separdlely). I-ULLY AD lUSTED; no special tools requited, 3,000 mile 
range over standard dial-up telephone lines. Ship wt.: 15 lbs. 

PRICES POS 103 Modem $199.95; POS 202 Modem - $299,95; 

POS 202 Modem w/Auto-Answer J349.95; POS 103/202 Modem - $499.95; 
FCC-Approved AutoAnswer DAA -- $125.00; Acoustic Coupler - $29.95. 

• PCS DAISY-WHEEL PRINTER INTERFACE for TRS-SO - Will drive Diablo 
HyType I, MyType II, and Oume and Sprint 3 printers. Includes IK user- 
available memory lor custom print routines (such as graphics, bidirectional print- 
ing, etcA Programmed to respond to print commands from BASIC ELECTRIC 
PENCILlM, and SCRIPSIT™ software. Draws its power from printer. Ship wl.; 

5 lbs. Price $250.00 

Cables, each (Specify HyType I, HyType II, or Qume} $ 25,00 

• POS ASCII INTERFACE for IBM I/O SELECTRIC - This Centronics style 
parallel printer interface wilt drive an IBM Model 731 or 735 I/O typewriter 

(F.8CD and Correspondence codes). No software needed. Features on-board EPROM 
which holds up to 8 ASCII-to-IBM code tables for different type spheres. Closed- 
loop operation runs at maximum printer speed; stops and starts on a single character 
without loss of data. Requires -tl2VDC and tSVDC power source. Ship wi.: 

5 lbs. Price $349 95 

Power Supply (-.SVDC, •■12VDC, ■^24VOC tor Solenoids on Printer] , , , ,$ 49,95 

• CONVERT OFFICE SELECTRIC TO I/O TYPEWRITER - Kit includes 
assembled solenoids, switches, wire harness, magnet driver PCS plus instructions 

for installation and mCPU interface. Price $150,00 

• "FORMALtNER" Variable Width Forms Tractor for IS" Seleclrics , . . $95.00 

• GTE Model 560 ASCII SELECTRIC I/O Termlnat - With ftS-232 Serial Interface 
and digital cassette deck for use as memory typewriter. Ship wL; 100 ibs. 

Price, tested and adjusted $1,195,00 

• POS ASCII IBM SELECTRIC PRINTER - 15" Selectric from GTE terminal 
cleaned and adjusted with POS Centronics-ilyle ASCII printer interface, UC/LC, 

carbon and fabric ribbons, Compatibte with TRS-8Q, Apple, SOL and other CPU 
parallel prir^er ports. Ship wt,; 75 Ibs, Price . . ■ $895,00 

PACIFIC OFFICE SYSTEMS ►'ISS 
2265 Old Middlefield Way Mountairt View, Calif 94043 (415) 493. 7455 
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the program to execute an auto- 
matic carriage return when a se- 
lected number of characters is 
reached. 

• Smart line termination is 
the feature I iike best. After a se- 
iected number of characters, 
which must be iess than the line 
length control, is reached, the 
program looks for a space, col- 
on, semi-colon or comma. If one 
is found, the program executes 
an eariy carriage return. This 
feature minimizes word division 
and enhances readability. 

• Line indentation is an auto- 
matic feature. If a line is contin- 
ued, the program advances five 
spaces before it continues print- 
ing. 

• Print all screen output Is an 
option that allows all Print state- 
ments to be directed to the print- 
er. This option can be input via 



the keyboard or embedded in 
your program. 

• Simultaneous screen dis- 
play directs print to both the 
printer and the video display, 

• Printer pause can be used 
to stop the printer at the end of a 
line by hitting the space bar. 
Each successive input of space 
bar will cause one more line to 
print. Hitting any other key con- 
tinues normal printer operation. 

• Keyboard debounce is in- 
cluded and loads with Format- 
ter; it can be disabled. 

• Multiple baud rates of 110, 
134.5, 150, 300, 450, 600, 1200, 
2400, 4800, or 9600 may be se- 
lected during program initializa- 
tion. Page six of the instruction 
booklet supplies modification to 
allow for non-standard baud 
rates. 

• Line feeds and form feeds 




Photo 5. 



266 • 80 Microcomputing, July 1981 



are available; if your printer will 
not accept a form feed charac- 
ter, this program will use multi- 
ple line feeds to make up for that 
deficiency. 

• Documentation Is excel- 
lent. The 17-page instruction 
booklet includes complete in- 
structions in clear, readable 
English for BASIC programs, as- 
sembly language listings and in- 
structions for customizing the 
program. 

The Formatter is a BASIC pro- 
gram that POKES language in- 
structions Into a protected high 
memory area. The program re- 
quires 360 bytes at the top of 
memory. The instruction traok- 
let suggests answering the 
memory size question with the 
value 32400. 

Running the program for the 
first time, the following ques- 
tions must be answered. Hitting 
the enter key in lieu of answer- 
ing the questions assigns de- 
fault values. 





DEFAULT 


manas are: 


QUESTION 


VALUE 




ENTER INITIALIZATION 
MEMORY SIZE? 


32400 


• LPRINT CHR$(1)- 


SELECT BAUD RATE? 


300 




ADD LINE FEED AFTER 
CARRIAGE RETURN (Y'N)? 


Y 


• LPRINTCHR$(2)- 


DOES YOUR PRINTER 






RECOGNIZE FORM FEEDS 
(Y/N)? 


Y 


• LPRINTCHR$(3)— 


MAXIMUM ALLOWED PRINTER 






LINE LENGTH (25-250) 


80 


•- 


LINE LENGTH FOR EARLY 






LINE TERMINATION (20-250)7 


70 




NUMBER OF NULLS (0-120)? 







TOTAL NUMBER OF LINES PER 






PAGE (0-120? 


66 


I , . 


NUMBER OF LINES TO PRINT 




, . 


ON EACH PAGE (0-120)? 


58 




ECHO PRINTER TO SCREEN 






(Y/N)? 


Y 


1 


ARE YOU USING DISK BASIC 






(Y/NJ? 


y 




DO YOU WANT KEYBOARD 






DEBOUNCE (Y/N)? 


Y 





For my Model 33, I used the 
values shown below: 



QUESTION 

ENTER INITIAUZATION 

MEMORY SIZE? 

SELECT BAUD RATE? 

ADD LINE FEED AFTER 

CARRIAGE RETURN (Y/N)? 

DOES YOUR PRINTER 

RECOGNIZE FORM FEEDS 

(Y/N)? 

MAXIMUM ALLOWED PRINTER 

LINE LENGTH (25-250) 

LINE LENGTH FOR EARLY 

LINE TERMINATION (20-250)? 

NUMBER OF NULLS (0-120)? 

TOTAL NUMBER OF LINES PER 

PAGE (0-120)? 

NUMBER OF LINES TO PRINT 

ON EACH PAGE (0-120)? 



DEFAULT 
VALUE 



32400 
110 



72 



66 



56 



ECHO PRINTER TO SCREEN 

(Y/N)? y 

ARE YOU USING DISK BASIC ' 

(Y/N)? N 
DO YOU WANT KEYBOARD 

DEBOUNCE (Y/N)? Y 

The answers describe the 
characteristics of my Model 33 
teleprinter and my TRS-80 Level 
II 16K system. Setting the early 
line termination as 62 assures 
very few continued lines will 
have anydivided words. Fifty-six 
lines of print gives me about 5/d 
of an inch margin at the top and 
bottom of the page. 

Twelve program tines within 
Formatter control the options. I 
customized the program for my 
printer, changing the variables, 
and deleting the input state- 
ments and all REM statements. 
My customized Formatter loads 
faster, since about half the 
original program lines were 
REM statements. 

Three special keyboard com- 
mands are recognized by For- 
matter, and may also be used 
within a program. The com- 



Sets the print all 
screen output op- 
tion. 

Clears the print 
all screen output 
option. 

Reinitializes ttie 
Formatter line 
counter to pre- 
vent erroneous 
form teed after a 
partial page has 
been printed, (The 
line counter does 
not automatically 
clear when a par- 
tial page Is print- 
ed.) If you are us- 
ing the Itey board 
debounce rou- 
tine, you can use 
the Clear key to 
reset the line 
counter, also. 



Day to day operation is a 
snap. I always need the de- 
bounce routine. I am in the mid- 
dle of a major project, docu- 
menting all my programs via the 
printer. I will soon be able to 
throw away all those annotated 
code sheets and use only my 
notebook of printer- produced 
listings. I will soon have a paper 
index of all my programs, an in- 
dex of my Level II manual, a real 
tape log, and an index of my 
computer magazines. None of 
these would be possible without 
my printer. ■ 





Programming drive 
you wild? V 

We have the high quality programs you demand 

at a price that will please. Send for FREE catalog. 

y, THE BERG WORKS ^351 , 

A,^ Box 742C Janesvilk, Wl 53547 ^// 



AT LAST! 

Mass produclion prices lor high quality software. Buy direct and save 50%, Also 
available for CPM and HDOS. 

DATA BASE MANAGER Mod i & III $69, $149 (48K). Mod-ll S199 

Maintain a data base and produce reports, ail without user programniifig. Define 
file parameters and report formats on-line. Key random access, fast multi-key 
sort, field arithmetics, audit log, label. No time-consuming overlays. 500 happy 
usees in one year. Mod-ll and 48K versions have over 50 enhancements, including 
40 fields maximum. -IDM-M? is great'" - 80-US. 

fl/H Mod-IS69 Mod-ll S149 Mod-Ill S69 

Handles invoices, statements, aging, sales analysis, credit cfiecking, forms input, 
and order entry. Unlike other accounts receivable programs, ours can be used by 
doctors, store managers, etc. 

WORD PROCESSOR ^^ 

Centers, justifies, indents, and numbers pages. Mod-I version features 
upper/lower case without hardware modilication! File merge option available. 
MAILING LIST Mod I & 111 S59, S79 |48K>, Mod-ll $99 

The best' Compare and be selective. Includes forms input. 5-dlgit selection code, 
zip code extension, sort on any field, and multiple labels. Who else offers a report 
writer and merges with word processor? 

INVENTORY Mod I & III S89, $109 (48K) Mod-ll S149 

Fast key random access. Reports include order Info, performance summary, EOQ 
and user-specified reports. Many people tiave converted to our system! Next to 
impossible to damage the file. 

GL A/R. A/P. PAYROLL Mod-H $129 each 

Integrated accounting package. 100+ page manual. As opposed to Osborne s slow 
binary search and 64 column screen, we use iast ISAM and 80 columns. Dual disk 
and TRSOOS required. 



L216 



S59 



A cassette package of 10 business programs for Level I1 16 K systems. Includes 
word processor and data base manager. Poker game $19. 
Most programs are on-line, interactive, random-access, bug-ttee, documented, 
and delivered on disks. Mod-l programs require32K TRSDOS. We re #1 m business 
software— dont let our low price fool you! Ask for our free 20-page catalog if 
you're stil) not convinced Compiled versions are available. 



^ 



MICRO ARCHITECT. INC. ^64 ^ 

96 Dothan St., Arlington, MA 02174 



^ 



-See list ot Advertisers on page 306 
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/^>^PROGRAM STORE 



^^^7 



03 SPACE FIGHTER m 

By Sparky Starks from Adventure Int. 
As mercenary and galactic police officer, you 
must maintain the condition and control of all 
parts of your spacecraft. You sit at the con- 
trols while peering out of the digital space- 
view port. Suddenly something appears on 
your screen: is it a Starpirate or a friendly 
merchant ship? You can't tell yet, and at this 
speed you may have only a fraction of a sec- 
ond to mal<e an attack/no attack decision. 

Speed and sound effects enhance the graphic 
action of this tactical game. Can you take the 
pressure? 

Model I E III, 16K tape. . .$21.95 
Model I disk version $29.95 

BASK Programming Asst. 

From Instant Software 

What an aide to the writing and debugging of 
BASIC programs! With BPA you can list out 
your program variables, with a notation of 
variaiile type, whether each is an array or 
not, and a notation of line numbers where the 
variable occurs. What's more, BPA even tells 
you the line numbers where any variable 
changes value! You can also produce a 
cross-reference to all COTOs, COSUBs, and 
IF.. THEN statements for easy visualization of 
program flow. Want to find that last INPUT 
statement? BPA will give all line numbers 
where selected BASIC keywords reside. Save 
time and frustration by using BPA when you 
program. 

Tape for I6K, 32K E 148K...SU.95 




PACKER 



iM MYCHESS 1 

From Computer Services I Programma 
Finally, a formidable chess opponent for even 
the most serious plliyer: MYCHESS has at- 
tained the highest USCF rating ever attained 
by a microcomputer program. With MYCHESS, 
you choose from 9 levels of play (taking from 
5 seconds to several days per move), you can 
select a printout of a game, and you can even 
save a game on disk for later completion. 



32K disk (Mod I). ..$34. 95 



From Cottage Software 
Packer gives tremendous control over the 
readability and efficiency of your BASIC pro- 
grams. Specify "PACK" and the program will 
compress text into multiple statement lines. 
This really speeds up storage, load, and 
execution time. It can reduce the memory 
requirement by as much as 33^ while saving 
disk or tape space, too. 

Also included are four handy utilities: 
"MOVE" relocates program lines, "RENUMB" 
allows program renumbering, "SHORT" del- 
etes unecessary words and REMarks, and 
"UNPACK" separates multistatement lines to 
ease editing. ,g^_ 3^^ 6 48K tape. . .S29.95 




PARSECTOR 



From Synergistic Solar 

Using a unique split screen (with instruc- 
tions for making a dividing hood), Parsector 
V lets two people participate in this exciting 
space strategy game [can also be played 
against the computer). Once a Parsector is 
conquered, it is yours -- until your opponent 
discovers it and tries to wrench it from you. 
Action sounds and graphics add to the thrill 
of this fast-moving game. 

FLIP SIDE SPECIAL: Parsector 8 -- a tour- 
nament version with a full 64 parsectors for 
human opponents only (no computer) 



Tape. ..$19.95 




ACTION PACK I 

Four machine language computer games for 

one low price! Includes: 

Space Ace — a search E destroy laser battle. 
Shooting Gallery -- marksmanship game for 

up to iJ players. 
Bomber Run -- bomb the ground targets from 

your plane or man the ground artlllary 

to shoot the bomber down. 
/Mr-Sea Battle — choose the role of pilot 

or sea captain. Which will sink first, 

the plane or the ship? 

All 4 on 16K tape. . .519.95 

STRATEGY PACK III 

Three games designed to tax your reasoning, 

skill, and luck. Includes: 

Wildcatting — an oil field simulation 
requiring forethought £ strategy. 

Frame Up — score points while trying 
to trap your opponent on the grid. 

Recall — "Concentration" type game 
with several challenging options. 

All 3 on 16K tape. .,$19.95 



. . .we are reluctant to advertise any hardware 
device. We suggest that you purchase such 
equipment from your local store, whenever 
possible. 

However, most computer stores are ignoring 
TRS-80 owners, and they do not carry peri- 
pherals for TRS-80, Because of this situ- 
ation, we have decided to occasionally ad- 
vertise hardware for the TRS-BO that we feel 
is of exceptional merit. 

$>0RCHESTRA-80v^J 

"Scnetinea a product it vack«twl that la of luch good 
qmlity ADd value that it aaon beccnea tbm standard Id 
ira clait, arcb«atr*-SQ i« tbia kind of product." 

£0 HicTDcDvputiDg, Hay 19B1, p- 30- 

If your idfia of TBG-30 computer *W4ic" U ■ ecrifa of 
tatpf Qoiaea th«t aomid like a croaa betveen a kjitoa and 
a buzz aav, yOu haven't experienced Orchestra-80. Thil 
biilliant haidware/aoftvare conbinHtiOD plugg riftbt iato 
rouT TBS-80 Kodel I (vith Qi without upaDBiOD ioteitdce) 
aod any anplifiaE to allow you to produce BEAL nuiic in 
up to four ainultafieouB voicaa* 



?ron tbe nooent 
eampU coapOBili' 
"nueic opaTating 
conplate docuaei 
ovD KUfic — ev 
ledge 



tty out OrcheatFa-8Q vitb the four 
iQcLuded» you'll be hooked* Ddiog the 
ats" aloEQ vitb ths eiceptioul ly 
ion, you'll Boon be progr^ing your 
£ you have no prnioua Btuiicdl know- 
ability. You control the notei played by each 
VDicOt along with the tone quality, loudneia, phraaiag, 
tenpo — Everything that goet into the orcfaeatrdtioD of 
quality bublc. You can even redefine each "inBtrunent" by 
ap«cifyiD£ tbe nu«beT of baiBDDice and tba relative bal- 
ance of each oue! 

FrOB funky rock to ooaplen ayuphooiCi Orcbe»tra-B0 takea 
ycFj were you want to go niiaically for only ^79. 95 (D/A 
ayntheaixer, nanual, mi prograv for TRS-BO Model I, 16K 
tape, tranaferrable to 32K disk) 

NOW IN STEREO, TOO! 

SlereD Veiaioi: Orchucia-S5 . . . Sn9.93 

COMING soon: 

0[ChC(tra-90 fac TBS-ao Hl>dfl III. 



In July and August, The heat of Washington's 
summer can drive you MAD! It worked on us, 
and you can take advantage of our madness 
with these offers designed to keep you inside 
and cool with your computer. 



$14»5^^lue-FREE! 

With any purchase of S30 or more, we'll send 
your choice of one of the following programs' 



FREE! 



Word Wars 

By Hernhuter £ Taylor from Acorn 
WORD CHALLENGE depicts the length of a 
phrase. The phrases are either computer 
generated or typed in by your opponent. The 
player's challenge is to figure out the phrase, 
based on the letters guessed. 

WORD CAME allows many levels of strategy as 
you try to guess the letters of a mystery 
word . Each letter has points based on its 
frequency of use in English language. 

Tape... $14. 95— FREE WITH $30 PURCHASE! 



Battle of the Bulge 

From Computer Simulations 

For the serious war gamer, this World War II 
simulation offers incredible historical accu- 
racy. Take command of 36 U.S. combat units 
and reenact this great 1911 battle. Would you 
have faired better than the actual result — or 
worse? 

Included are combat maps and charts, with 
notation of the topography, towns, enemy 
positions and type. 

Tape...S14.95 — FREE WITH $30 PURCHASE! 



Death Dread 




From Programmer's Guild 

If your sense of humor is twisted, if your 
fantasies run toward the macabre, then this 
machine language adventure was made for 
you! The strange and disgusting room de- 
scriptions make It fun; grisly death lurking 
around each twist and turn make it amusing; a 
complex game structure makes It difficult. 
Spine-tingling suspense, horrifying surprises 
— what more could you ask? 

Tape... Sm. 95 — FREE WITH $30 PURCHASE! 



Visit Our Baitimora, MD Store: W. Bell Plaza - 6600 Security 81 vd 



TO ORDJRCAU TOLL FREE 800 4:Mba738 caM^ot^SS'^ 



THE PROGRAM STORE 



4200 Wisconsin Avenue NW, Dept. K1 
Washington, D.C. 20016 



Box 9609 



MAIL ORDERS: Send check or M.O. for total purchase 
price, plus $1 .00 postage & handling. D.C. residents, add 
6% tax. Charge card customers: include all embossed 
information on card. 
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Get the most from your micro with 
software and accessories from one of 
the world's largest selections. 



The 

fTogram 

Store 



CALL TOLL FREE 

800424-2738 




By Leo Christopherson from Acorn 
Your 'droid has already learned NIM, so now 
it's time to teach it how to wield a laser sword! 
Leo Christopherson, author of "Android 
NIM." "Dancing Demon" and other animations, 
has developed a new type of animation and 
high-quality sound in his latest work. 

Your 'droid starts out as a lowly clown. You 
teach it how to use a laser sword by control- 
ling its movements. After training it to be a 
"Grand Master," you enter the tournament 
against the program's skilled 'droid! Enter- 
tainment for all ages. 

Protected Tape. ,.$11.95 
Protected Disk. . .$20. 95 



DEATH i. r3i 
MAZE 

5000 

trom Wed Systems 
A new breed of adventuring! Venture 
through a graphically represented 3-D maze, 
with halls that could dead end -- or recede to 
infinity. Step through the doors or drop into 
the pits. Will you encounter monsters and 
mayhem, or will you be treated to useful ob- 
jects and Information? Will you ever get out 
alive? 

You may never find your way out of 
Deathmaze SOOO, but you'll keep trying! 

16K TRS-80, 32K APPLE II. ,.$12.95 

Unbelievable Reeltlme 3-D Qraphicst 





FLIGHT SIMULATION 

From Sub-Logic 

The wait is over! If 3-D graphics seem impos- 
sible on the low resolution TRS-80, you hav- 
en't seen this brilliant program. During 
FLIGHT SIMULATION, you instantly select 
instrument flight, radar, or a breathtaking 
pilot's-eye-view. But be sure to strap your- 
self in -- you're liable to get dizzy! 

Once you put in some air time learning to fly 

your TRS-80, head for enemy territory and 

try to bomb the fuel depot and airstrip while 

fighting off five enemy warplanes. Good 

Luck! 

Level I or II Tape.. .525.00 





SUPER 
NOVA 



By Bill Hague from Big Five 

Asteroids surround your ship. You must shoot 

the asteroids, as well as any alien spaceships. 

Written in fast machine code, this game is 

GREAT! 

You may encounter five different kinds of 
alien ships, including the very deadly flag- 
ship. You shoot from your ship's position, 
rotate it, use your thrusters to move — if you 
are overwhelmed, you can even get away to 
hyperspace. Fast and exciting. 

Tape SHt.95 

SmCEWAR 

By Device Oriented Games from Acorn 
A two-player, real-time action game that lets 
each player control a spaceship with rotate, 
thrust, fire, and hyperspace. Five game 
options (including gravity) and three playing 
speeds. In fast machine language. 



Tape. ..S9. 95 



^ 



mom 



By Hogue E, Konyu from Big-Five 
"The rage of the arcades" is now available for 
TRS-80! Exciting sound effects add to the ac- 
tion as the invaders swoop down to destroy 
your base. Even while you have your hands 
full battling the aliens, you have to watch out 
for the Flagship! Super graphics, super ac- 
tion, super fun! 

Level I or II, tape. . .$U.95 



PINBALL 



By John Allen from Acorn 

Get your flipper fingers ready for action In 

this real-time, machine language game. 

Lots of sound and flashing graphics make this 
fast action game so much like the real thing 
that you'll have to remind yourself not to 
shake your TRS-80, Choose from five playing 
speeds to match your skill. Can you beat your 
friends' scores? Will you avoid the dreaded 
"Bermuda Square?" Get PINBALL today and 
find out. 

Protected tape. . .S11.95 
Protected disk. . .S20.95 



TYPING TUTOR 




By Ainsworth £ Baker from Microsoft 
Speed up your programming and word pro- 
cessing with this excellent touch-typing in- 
structional program. Divided into two sec- 
tions, the program first teaches proper finger 
positioning. You practice keying various char- 
acters, the program adding new ones as you 
progress. In the practice paragraph section, 
you are evaluated for accuracy and rated in 
words per minute. The program continuoqsly 
adjusts to your increasing skill, telling you 
which characters you miss and where you are 
slow. One of the most practical programs we 
know of for TRS-BO. 
511.95 

-DDT Disic Drive Timer — - 



BRflPHIC OlSfLfiY QF 
DPIVE ND.: 

EACH HARK REPHESEHIS 
ISLM) (CQRBEn) 

m.m Tib.ti in.zz 3M 



N D T Q R SPEED 
RPn RM6E: 10 
0.17 BPB. 

if AST I 
30I.6T 303.33 305.1)0 



.I....I....I..M1. 



from Disco-Tech r— 

Analyze and adjust your disk drive motor 
speed with a realtime graphic display. Ma- 
nual details use for Radio Shack, Shugart, 
MPI, Pertec and Vista drives, and DDT can be 
used with any drive. All you need is DOT, 
two screwdrivers and five minutes. 



Disk 529.95 




INVADERS 
FROM 

smcE 



by Carl Miller from Acorn 

A fast machine language approach to this 
classic (and addictive) space game. As you 
play, the aliens drop bombs, move from side 
to side, and try to overrun your bases. Hold 
them off -- and score -- by shooting them 
down. But, just as you think you've got it all 
under control, the action speeds up. 

Choose the game speed, enemy bomb frequen- 
cy and accuracy, shots on screen and the 
number of your bases. Move your base and 
simultaneously fire at the invaders — you 
cannot do this in most similar games. Full 
sound effects add even more excitement to the 
incredible speed and action of INVADERS 
FROM SPACE. Fun for all ages and skill 
levels. 

Protected tape 511-95 

Protected disk 520,95 



THE PROGRAM STORE ■ Dept Kl 



Box9609- 4200 Wisconsin Ave. NW » Wfashinqton. D.C. 20016 

tl.QQ name 

addr 

city 



tern 



Price 



Postage 
Total 



n CHECK nVISA 

D MASTERCARD MC Bank iff. 



state zip 



Card# 



Exp 



.^Sm U9t ot AOnrttt^ra on fMge 308 
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Mini-Disk Storage Systems for TRS-80* Computers 





Offers More. 
Charges less. 




Check this line-by-line com- 
parison of Access 5-inch 
mini-disk systems for Mod- 
el I and Model HI computers. 
Nobody offers more ben- 
efits, better service or lower 
prices. 



TOLL-FREE ORDER NO. 
1 -800-527-41 96t 

(orders and literature only) 



Company/Drive Model 


Price 

1/ 


Flippy 


Formefted DtBlwtte 

Storage Capacity 


100% 
Tested 


48 hr. 
Bum-In 


Warranty 


Trial 
Period 


Dbl-Density 


Sgl-Density 


40-TRACK DRIVES 

Access Unlimited 

AFD-lOO' 
AFD-IOOF' 


1295 00 
329 00 


no 
yes 


1 80 Kbytes 

360 Kbytes 


102 Kbytes 
204 Kbytes 


yes 
yes 


yes 
yes 


yes 
yes 


yes 
yes 


MTI 

TF-5 


359 00 


no 


T 


■7 


1 


7 


I 


no 


Midwest Comp. & Per. 

MP! B-51 


321 00 


no 


T 


102 Kbytes 


1 


7 


yes 


no 


Aerocomp 

Mcl 10-1 


349 95 


yes 


■) 


7 


yes 


7 


yes 


yes 


CPU Shop 

CO 100 


314 00 


no 


7 


102 Kbytes 


7 


7 


yes 


no 


AMI 

40-lracK 


325 00 


no 


■? 


7 


7 


7 


7 


no 


BO-TRACK DRIVES 

Access Unlimited 
AFD-2O0' 
AFD 200F' 


429 95 
449 95 


no 
yes 


368 Kbytes 
736 Kbytes 


205 Kbytes 
410 Kbytes 


yes 
yes 


yes 
yes 


yes 
yes 


yes 
yes^ 


MTI 

TF 3 


639 00 


no 


7 


200 Kbytes 


7 


7 


7 


no 


Aerocomp 

SO-lk mdl 


459 95 


yes 


■/ 


7 


yes 


7 


yes 


yes 


CPU Stiop 
CCl-280 


429 00 


no 


1 


204 Kbytes 


7 


7 


yes 


no 


AMI 

80-track 


560 00 


no 


-> 


7 


7 


7 


7 


no 
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Free trial offer 

Use your brand new AFD drive system for up to 15 days. If you're not 
completely satisfied, pack it in the ongmal shipping container and send it 
back to Access. We'll refund the price of tl^e system (less shipping 
charges), no questions asl<ed. (No refund for misuse or improper 
handling.) 

Operating burn-in test — too 

Every drive that leaves Access is not only 100% electrically tested and 
double-checked for mechanical alignment, but it is also given a full 48- 
hour operating burn-in test You'll find a test list — checked and signed by 



one of our competent technicians — in the drive carton. If a drive has latent 
defects, the burn-in life test will weed them out The drives we ship just 
keep on running. And running. And running. 

About our warranty 

Venus de Milo has about the right number of fingers to count our warranty 
returns. Nevertheless, your new drive system is covered by our compre- 
hensive 90-day limited warranty. The details are spelled out in the illus- 
trated users manual included with each AFD drive system. 



Software galore! 

Games Business programs. Systenn software. We sell many of 
the best TRS-80* Model t and Model III programs, and at com- 
petitive prices. Make Access Unlimited your one-stop shopping 
center for all of your TRS-80* software, hardware and accesso- 
ries. Save big! Call our toll-free order number, 1-800-527-41961 
tor free descriptive literature. 



USE YOUR CREDIT CARD AND SAVE! VISA AND 

►MASTER CARD CHARGES ARE NOT DEPOSITED UN-^ 
TIL THE DAY YOUR ORDER IS SHIPPED, CALL NOW^ 
TOLL-FREE, l-800-527-4196t. 



the DOUBLER™ 

Percom's new plug-in adapter tor your Expansion 
Interface stores almost twice the data on a diskette 
track as a single-density system. You can store up to 
tour times more data — depending on the type of 
drive — on one sideof a diskette than you can store 
using a standard Model I mim-disk drive Other 
features Reads, writes and formats either single or 
double density minidiskettes • Runs TRSDOS', 
NEWDOS+*Percom OS-80'^ or other single-density software without 
changing either software or hardware. Switch to double-density when 
convenient ■ Includes DBLDOS"', a TRSDOS* compatible double- 
density operating system • Includes on card, high-performance data 
separator circuit • Installs without rewiring or trace cutting • Introductory 
price, including DBLDOS and format conversion utility, only $219.95. 
^ Permits Model III software to be read on Mo6e\ 1 computers. ^ 




DATA SEPARATOR™ 

This PC board plug-in adapter for the TRS- 
80" virtually eliminates data read errors ^.-' 
(CRC error — Track locked out!) which ' 
occur on high-density inner disk tracks, a 
problem that has plagued TRS-80* sys- 
tems. The Percom Data Separator™ is in- 
stalled in the Expansion Interface without modifying the host 
system. Caution; Opening the TRS-80' Expansion Interface may 
void the limited 90-day warranty: $29,95. 




Disk System Interconnecting Cables 

Improvement over RS cable design places drive 0. which includes the 
cable termination, at the end of the cable to eliminate the reflected noise 
of an unterminated cable Better data integrity Prices. 

Two-Drive Cable $24.95 

Four-Drive Cable 34.95 

Power Line Filter 

115/250 V. 50-400 Hz Instructions included for easy installation in stan- 
dard mini-box chassis: $19.95 
Minidiskettes (Double-Density rated) 

10 Disks in a convenient plastic organizer box $34 90 

Single Disk 3.49 

Disk Drive ID Tabs 

1 " X 1 Va" self-adhering plastic drive identification tabs. Compatible silver 
with engraved black drive number Two tabs (Nos. 0, 1 ): $2 50: three tabs 
(Nos 0, 1,2): $3.25, four tabs (0, 1, 2,3) $4.50. 
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How to Order Orderby calling Access Unlimited toll-free on 1-B00-527-4196t. 

Mail orders also accepied OtctersiTiay bechargedtoaVlSAotMasierCaraaccounior qaidbya 
cashieis check, cenitiea check of money ofaei We accept COD orders with 25% deposii Sorry, 
iwe cannot accepi personal checks We pay shipping and insurance charges on orders over 
$1 000 00 Add approximate insurance and shipping charges tor under $1,000 00 If m doubt 
about these charges, ask when you call in your order Texas residents include 5% sales tax 
Minimum order $20 OO Allow 2 !o 4 *eeks 'or delivery t^Bxas restdsnls call (214) 494-0206, 

T trademark ot Access UnilmitW Company. 'RADIO SHACK and TRS-80 are tradamarks of Tandy Corporalion. ™lrademafk ol Percom Data Compwiy. Inc. tlradomark of Apparat Corpofation. 
ALL PRICES AND SPECIFICATIONS SUBJECT TO CHANGE AND ALL OFFERS SUBJECT TO WITHDRrtWVL WITHOUT NOTICE. 



ACCESS UNLIMITED 

315N.Shiloh-Ste. 01 - Garland, TX 75042 

(214) 494-0206 



TUTORIAL 



The interesting field of random access. 



How to Handle 
Those Random Files 



Ken Knecht 

1340 West 3rd Street §130 

Yuma, AZ 85364 



TRS-80 random disk files are 
very useful for storing infor- 
mation, especially if the data 
must be changed later. This is 
true for data bases such as in- 
ventory, mailing lists, etc. 

Random files are easy to use; 
easier, in fact, than sequential 
files with their involved punctua- 
tion requirements. One disad- 
vantage of random files is 
w^asted space if your records are 
less than 255 bytes. We'll dis- 



cuss some Vifays to reduce this 
vi^asted space, but as long as the 
records are fixed at 255 bytes 
(256 in TRSDOS 2.3) this will be a 
problem. 

Setting Up 

When setting up random files, 
your first task is to determine 
the record format. We'll take a 
typical inventory record as an 
example: 

Hem Descriplion— String— 25 characters 
Quantity in Stociv— Integer — 2 bytes 
Price Each — Single Precision — i bytes 
|j3cation— String— 10 characters 
Date of Last Sale— Stfing— 8 characters 



Note that we have allocated 
only two bytes for the integer 
and four bytes for the single pre- 
cision number. 

To convert the single preci- 
sion number stored in variable P 
to a four-byte string, use P$ = 
MKS$(P). Use Q$ = MKI${Q) to 
convert the integer in variable Q 
to a two-byte string. To get the 



number back, use P = CVS{P$) 
or Q = CVI(Q$). This is faster 
than using Q$ = STR${Q) or P$ = 
STR$(P) to store the number and 
Q = VAL(Q$) or P = VAL(P$) to 
get It back, and usually takes up 
less disk space. Remember that 
you can store only strings in a 
random file. 

Look at Fig. 1 . To put a string 
on the disk we must do several 
things. One of them is to point to 
the correct record, for example 
Record 5, with GET 1, 5. The file 
must have been opened with 
OPEN R, 1, FILES, thus referenc- 
ing it as file number one. 

Before we can GET the record 
we must FIELD it. In this case 
we would use: FIELD 1, 25 AS 
A$, 2 AS B$, 4 AS C$, 10 AS D$, 8 
AS E$. Note how the length of 
the variables matches the 
length of each item in our 
record. 

You can use any variable 
names and sizes you desire. If 
you run your letters together 



without spaces, to save memo- 
ry, be sure to put a space be- 
tween the AS and C$, or the in- 
terpreter will read it as ASC$, 
and you'll get a syntax error. 
ASC is a reserved word. 

To put a field in a record, first 
be sure It has been properly 
fielded. Assume the item de- 
scription has been stored In 1$, 
the price in P, the quantity in Q, 
the location in L$ and the date in 
DA$. Before you PUT the record 
you must use: 

LSETA$ = I$; LSET BS= MKI$(0): LSETCS 

= MKS$(P): 
LSET D$ = LS: LSET E$ = DA$ ■[ 

Then use PUT 1,5 to put the 
record in file 1 , record 5. Yog can 
use RSET in the same way if you 
want the data right justified in 
the field. See Fig. 2 for LSET and 
RSET used with the sample file. 

I have always found It safest 
to GET a record before you PUT 
it, even if it doesn't exist yet. 
Funny things sometimes hap- 





ITEM DESCRIPTION 




































QTY 




PRICE 










LOCATION 














DATE 
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26 


27 


2a 






31 


32 


















41 


42 








1 




49 



Fig. 1 
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COMPUTERWARE 





GRAPHIC GAMES Color Invaders • Action Games 

• Asteroid Action • Adventures and More 

PROGRAMMERS TOOLS Monitor • Assembler 

• Editor • PASCAL • Diagnostics 

HOME PROGRAMS Data Organizer 

• Home Finance • Educational Programs 

MEMORY • BOOKS • ACCESSORIES 

Shipping from Slock 



Call or Wnle 



COMPUTERWARE 



6«09&pec<ai>&t» Et«' 



(714)436 3512 



3S 



ZLS. 



TT 3C. 



a:E 



DISCOUNT 



^ stock Computer Paper & Labels 
Over 50 Items in Stock 



1 



iTEMS IN STOCK 


Custom To Your Needs 


Stock Forms Blank or Green Bar 


Invoices 


Statements 


Shippers 


Index Cards 


Custom Checks 


Pressure sensitive labels all sizes 


Custom Continuous Envelopes 


Continuous #10 envelopes 


& Letter Heads 


Continuous Blank Letter Heads 


Statements 


Spacing charts & layout sheets 




Forms rulers 


Quantities Of 1000 Or More 



I 



Send Inquiries To: 

WHITE RIVER PRODUCTS ^460 

P.O. BOX 604 

MT. CLEMENS, MICHrCAN 48043 



Name_ 
Street. 
State _ 



Phone. 



Zip. 



Type ot Equipment. 



FREE 

SENp FOR 
YOURS TODAY 



k □computer D 81 Tax Guide 
W Package Q stock Price List 



3= 



33: 



3= 



3E 



a:= 



az: 



pen if you don't. Note ttiat this 
can't be done with a Model II. 

Program Listing 1 is a sample 
program to enter some inven- 
tory items. Assume the file has 
been opened already. The 
L0F(1)+1 in line 100 sets X to 
the next available record. L0F(1) 
is the last record (Last Of File). 

Program Listing 2 enables us 
to read records. Again assume 
the file is already open. 

Program Listing 3 enables us 
to change one item in the inven- 
tory. 

Techniques 

In a few cases I used LINEIN- 
PUT, when the data might con- 
tain a comma or other delimiter 
which would get an Extra Ig- 
nored if I used INPUT. When I 
asked for ANOTHER, I only 



looked at the first letter in the 
reply. That way Y or Yes or Yeah, 
etc. would work. 

When printing the price, I 
used PRINTUSING to give a 
properly formatted display. In 
lines 580 to 620 1 set the variable 
to the old value before using IN- 
PUT. This meant the old data 
would be in the variable if the 
user replied only Enter. This 
doesn't work in the lines that 
use LINEINPUT. 

GOTO 30 Is at the end of every 
module. Program Listing 4 ex- 
plains that. 

Put the four program seg- 
ments together and you have a 
complete program. This is an ex- 
ample of modular programming. 

Problems 

The program wastes a lot of 



10B 
llfl 

i2e 

130 
140 
158 

lee 

170 
160 
190 

210 
220 



X-LOFlD + l 

LINEINPUT- ITEM DESCRIPTION? 'jIS 

INPUT-QUANTITV ;Q 

1NPUT*PRICE";P 

LINE INPUT- L0CATI0H7 - j LS 

INPUT-DATE (Bl/02/8e)-;DAS 

FIELD 1, 25 AS AS, 2 AS BS, i AS CS, IB AS OS. 8 AS ES 

GET i,X 

LSET AS-lSiLSET aS-HKIS (0) = LSET CS-MKSS(P) 

LSET DS-LS:LEET E««DAS 

PUT 1,X:X-X+1 

INPUT"ANOTBEH*:ANS:IF LEFTS (ANS , D-'Y" THEN 110 

GOTO 30 



Program Listing 1 



300 LINEINPUT'ITEK DESCRIPTION? -|IS 

310 FOR X=l TO LOF(l) 

320 FIELD 1, 25 AS AS, 2 AS BS, 4 AS CS, 10 AS DS, B AS ES 

330 GET 1,X 

340 IF INSTR{AS,ISt>0 THEN 360 

350 NEXT XjPRINT-ITEM NOT FOUND' :GOTO 41fl 

360 PRINT-ITEM DESCRIPTION: ";AS 

370 PRINT-QUANTITY! -;CVHBS) 

380 PRINTUSING'PBICE: SSIIIt ■ If iCVS (CS) 

390 PRINT-LOCATION: 'jDS 

400 PRIHT-DATE! "jESi PRINT 

410 iNPUT*ANOTHER-;ANS: IF LEFTS (ANS, 1 1 -"V THEN 300 

4 20 GOTO 30 



Program Listing 2 



500 LINEINPUT- ITEM Dil.CPIPTI0N7 ■;IS 

510 FOR X-1 TO LOF(l) 

520 FIELD 1, 25 AS AS, 2 AS BS, 4 AS CS, 10 AS DS, B AS ES 

530 GET l.X 

540 IF 1NSTR(AS,IS)>0 THEN 560 

550 NEXT XsPRINT-ITEM NOT FOUND- iGOTO 660 

560 PRINT- REPLY WITH <ENTEB> IF YOU DO NOT WISH TO" 

570 PRINT-CHANGE AN ITEM, OTHERWISE ENTER THE NEW DATft.":PRINT 

580 IS-AS:PBINT-ITEH DESCRIPTION: -;ISi" 7" ; :LINEINPUT IS: 

IF IS--- THEN IS«fiS 
S90 Q-CVI IBS) iPBINT-QUANTlTY: -jQfilNPUT Q 

600 P-CVS[CS) iPRINTUSING-PRICE SS1##I. fl" iPj = PRINT" •!:IMPOT P 
610 LS-DS:PBINT-LOCATI0N: "jLS;' ?- j rLINEINPUT LSilF LS-" THEN 

LS-DS 
620 DAS-ESiPRINT-DATEi -;DASl" - j: INPUT DAS 
630 LSET AS-ISiLSET BS-dKIS (Ql JLSET CS-HKS$(P) 
64« LSET DS-LS:LSET CS-DAS 
650 PUT l.X 

660 INPUT-AN0THEB'|ANS!IFLEFTS(ANS,1)--Y" TBEN 500 
670 GOTO 30 

Program Listirig 3 
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disk space; only 49 bytes are 
used in each 255 byte record. 
Also, it would be nice to be able 
to delete a whole record if an 
item was discontinued, and be 
able to print a sorted list of the 
whole Inventory file. 

Program Listing 5 rewrites the 
first module to use disk space 
nrore efficiently. With this small 
modification we store 245 bytes 
in each record (49 x 5) and waste 
only 10 bytes. 

In line 10 we set RS to 49. This 
is the subrecord length. We then 



divide this into 255 to see how 
many subrecords we can fit into 
a record. We use INT{ ) because 
we want an integer result. In line 
160 we add a second FOR loop 
to keep track of the number of 
subrecords. Note that we start 
the loop with zero and count to 
one less than the number of sub- 
records. 

In line 170 we calculate the 
number of subrecords already 
looked at— Y (our subrecord 
counter)*RS (the record size). 
We add the 1« and put every- 



IB 


CLEAK 


1000; LINEINPUT-PILE NAME? 


■; FILES 


29 


OPEN" 


r,l, FILES 




30 


CLSiPRINT- KENU- 




40 


PKINT 


l! ADD ITEM- 




50 


PRINT 


2: DISPLAY ITEM" 




GB 


PRINT 


3: CHANGE ITEM" 




70 


PRINT 


*! FIHISHED" 




80 


INPUT 


CHOICE BY NUMBEH";C:1F CCl 


OR C>4 THEN SB 


90 


ON c GOTO laa, 30a, saa, 95 




95 


CLOSE 


END 

Program Listing 4 





laa 
11a 

120 
130 
140 

ibe 
lee 

170 

180 
190 
20a 
210 
220 
230 
240 
250 
260 
270 



RS-49; SU«INT[2 55/RS| 

LINEINPIIT"ITEM DESCRIPTION? ";IS 

1NPUT"QUANT1TY":Q 

INPUT*PRlCE'iP 

L1NEINPUT"LOCATION7 -;LS 

INPUT" DATE (01/02/80) ";DAS 

FOR X-1 TO LOF(l)! FOR Y-0 TO SU-1 

FIELD 1, 11 * RS * ¥) AS ZS, 25 AS AS, 1 AS BS, 4 AS CS, 

10 AS D$, 8 AS ES 

GET 1,X 

IF LEFTS(AS,1) • CHHS(a) THEN 230 

NEXT Y.X: X-L0F(11+1 

FIELD 1,2S AS AS, 2 AS BS, 4 AS CS, 10 AS DS , 8 AS ES 

GET 1,X 

LSET AS-IS: LSET BS-MKIS (0) i L5ET CS-MKSS (P) 

LSET DS-LS: LSET ES-DAS 

PUT 1,X 

INPUT-ANOTHER-jANS: IF LEFTS |ANS , 1 ) -"Y" THEN 110 

GOTO 30 



Program Listing 5 



1211 
130 

14a 

15fl 



7V» 

21tt 
22III 

2se 

2b9 
21» 



CLEAR jaaee^ lineinput'file kawe? ':riLES:OPEN"p" ,i, files 

JSS»49: SU- lNT(i55/RSI: C-1: DIM DASCLOFd) ■ SU,«) 

FOR X-1 TO LOFd); FOR V-B TO SU-1 

FIELD 1,{1 ■ BS ■ V) AS IS, 25 AS AS. 2 *S BS, 4 AS CS, 

IB hS DS, a AS ES 
GET 1,S: IF LEFTS(AS,1I • CHRSI«> THEN 80 

DAS(C,fl)»AS; DAS(C,1)-BS! DAS(C,2)-CSi DAS(C,3)-DS: DAS(C,4)«ES: C-C-1 
NEXT Y.Xt C-C-1 
M-C; PRINT"NOH SORTING" 

«-lNT(M/2): If M-M THEN 26B 

}'\: B-C-M 

l-J 

L-I+M 

IF DASIl.B) s DAS(L,B) THEN 240 

FOR X-e TO SL-l 

FOR Y-B TO 2 

A1«PEEK (VAFiPTR IDAS ( I ,X) } tY) 

A2-PEEK(VS1)PTRIDAS (L.X})+¥j 

POKE (UARPTF (DAS U .X) }.Y| ,A2 

POKE (VARPTR (DAS (L,X) I'YI .Al 

NEXT 1,1, 

1»!-M^ IF Kl THEN 24' 

GOTO ua 

J-J+1 : IF J>X THEN 100 

GOTO 120 

PRINT-FINISHLD SORT, NOIV SAVING FILE IN NEW OBDEB.- 

Cl-1: FOR X-1 TO LOF(l); FOR J-0 TO SU-1 

FIELD 1,11 • RS • Y) AS ZS, 25 AS AS, 2 AS BS. 4 AS CS. 

10 AS DS, 8 AS ES 

GET l.X 

IF CllC THEN LSET AS-CHRS(e)! GOTO 32B 

LSET AS-OA$(C1,0I 

LSET B5-0AS(C1.1); LSET CS-DAS(C1,2I: LSET DS-DAS (CI , 3 ) i 

LSET E5-DAS 1C1.4) 

PUT 1,X: C1"C1+1 

NEllT Y.K; CLOSE: CLEAR 1: RUN" I NVENTRY" 



Program Listing 6 



WORD PROCESSING INPUT U TILITY \'- 

FOR BAS1C~PR0GRAMS~ ~ " '"'" 

PICOSUB: INPUT SUBROUTINE (Model I / III) 

Z-80 program which allows word processing features for Basic 

data entry and editing. Some features are : 

° Blinking non-destructable cursor, insert and delete, 

repeating left k right arrows, space, and control key 
° A special control function can be chosen by the 
operator to save the entire line or only what was typed 
° User can specify where and how long each line can be 
° Program is activated by a Usr call, result is a string 
° Basic program provided to demonstrate all methods of 
operation to allow maximum utilization of these (and more> 
features. Includes complete easy to read manual. 



PICOSUB: Disk or Level II tapes: $19.95 



QUALITY ASSURANCE SYSTEM 

This is a complete system which wiO allow you to ask your own 
questions, set your own standards, and do your own testing on 
just about any product, process, or service. Information about 
standards, last product tested or accumulated product testing 
can be listed or printed quickly. Data entry and editing is fast 
and easy to learn because it incorporates all the features of 
our Input Subroutine (above). 

Requires 48K, lor more disk. {Recommended Dos: DOSPLUS) 
Quality Assurance System (Model 1 / III): $79,00 
Manual only: $10,00 

PICOTRIN TECHNOLOGY, INC. ^^474 
3531 San Castle Blvd. Lantana, Fl. 33462 (305) 586-2377 
Specify your complete computer system when ordering. 
Write for more information. Fl. residents add sales 



t. 



Storm Coming? 

How many titnes have your plans revolved around the weather? 
Now you can turn vour TRS-80 into a weather forecaster, and stop 
getting caught in the rain!! 

CLIMATE-COMP was created by National Weather Service 
Meterologist, author and editor David Carman. 

THE WEATHER FORECASTER program will give you a short 
range forecast for your area. Enter a tew simple measurements, 
easily obtained from newspapers or the U.S. Weather Service, to 
receive a short range forecast for the next six hours. 

THE WEATHER PLOT program is the result of years of carefully 
collected data. At vour command are records, charts, graphs, facts 
and figures on local weather for every major city in the United 
States. Choose vour area of the country and the data files will 
release a flood of information. Each city is listed with its monthly 
rainfall, monthly and yearly average temperature, average wind 
speed, snowfall, heating and cooling degree days, annual average 
sunshine, humidity and record-breaking temperatures. 

CLIMATE COMP for all the information you need 
to know what the weather has in store for you. 

Cassette based: system requires 16K. level II, 
Pkg. no. 0102R S19.95. Disk based: 
\'^^^^ \ system requires 32K one disk drive, 

Pkg. no. 0316RD $24.95. 




TO ORDER: Contact 

your local Instant Software 
dealer. If these programs 
are unavailable, call toll-free 
1 800-258-5473 



*A trademark of Tandy Corporation 



Instant Software 



PETERBOROUGH, N.H. 03458 "533 



r'See List of Advertisers on page 306 
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thing in parentheses to make 
Disk BASIC happy. If Y = 0, we 
put nothing in Z$ {1 •49-0 = 0), 
then as Y advances we step 
through the subrecords one by 
one. At each step we put the 
subrecords we already looked at 
in Z$, then disregard Z$. 

In line 200 (note the added 
NEXT Y) we didn't find an empty 
record in the file, so we incre- 
ment X to the first unused rec- 
ord and FIELD as for the first 
subrecord. 

In line 190 we check A$ to see 
if the first character is a null. If it 
contains a valid subrecord, it 
would not have a CHR$(0) for the 
first character, because we are 



LSETIng the data in A$. An un- 
used subrecord would have a 
CHR$(0) in the beginning of A$, 
because the disk contains 
CHR$(0) until you put something 
there. 

The next task is to find a sub- 
record to be deleted. I n this case 
you'd use code similar to the 
module beginning at line 500 
(change data) to search for the 
item, then put a CHR$(0) In the 
first byte of A$ when LSETIng 
A$. It will thus be considered an 
empty subrecord when search- 
ing for a place to put a new sub- 
record. You could use 
MtD$(l$,1,1) = CHR$(0). Be sure 
to add the additional subrecord 



code to all the modules; I only 
added it to the add data module. 

To sort the data you'll have to 
put it into an array in memory. In 
this case, we'll use the array 
DAS. To calculate the array size 
you'd use DIM DA$(L0F(1)-SU, 
4) after the file was opened and 
you calculated SU. Be sure that 
the program sees this DIM state- 
ment only once while the pro- 
gram is running or you'll get a 
double dimension error. Note 
also that this won't work if you 
add any records to the file after 
you DIM the array. 

To get around these problems 
I'd use a separate subroutine 
called by the main program to 



B 


1 


N 




1 


7 


1 


3 






LSET 






B 


1 


N 




1 


7 


i 


3 



RSET 



Fig. 2 



calf the sort program. The sort 
program in turn would recall the 
main program when it finished: 
1000 CLOSE: RUN"SORT". 

The menu would call line 1000 
when a sort was requested. See 
Program Listing 6 for the sort 
routine. 

CLEAR 20000 in line 10 Should 
be changed to reflect the 
amount of string space avail- 
able after the program is loaded. 

Line 300 ascertains that any 
unused subrecords have a 
CHR$(0) in their first byte to 
show they are unused. The 
CLEAR 1 in tine 340 makes sure 
there is enough room to reload 
the inventory program. 

The sort is a shell sort. The 
VARPTR routine speeds up the 
program. BASIC now doesn't 
have to do any garbage collect- 
ing as string space keeps filling 
up with temporary variables. 

Be sure that the string space 
in line 10 is ample to hold the In- 
ventory for the sort. The sort on- 
ly looks at the item description. 
To use another column make it a 



Radio Shack Dealer #R491 

MODEL III 

LEVEL III BASIC 
26-1062 




$825.00 



Vre ACCEPT CHECK, MONEY ORDER, OR PHONE OfiDERS WITH VISA OR MASTER 
CHARGE, SHIPPING COSTS WILL BE ADDED TO CHARGE ORDERS. DISK DRIVES 
PRINTERS. PERIPHERALS, AND SOFTWARE— YOU NAME IT. WE'VE GOT IT 
WRrrE OR CALL FOR OUR COMPLETE PRICE LIST. 

C« S ELECTRONICS. LTD. 32 EAST MAIN ST. MILAN, MICH. 48160 
^145 (313) 439-1508 (313)439-1400 



CSS ELECTRONICS MART IS AN AUTHORIZED RADIO SHACK DEALER #491 




Ni^uii^ 



12 Issues For Only $12.00 

All The TRS-80®* News You Need 
When You Need It 

Now In Our 3r(d Year Of 

Continuous Publication 

One Of The Oldest 

TRS-80®* Newsletters 

Still In Circulation 

— Featuring — 

. Applications • Product Reviews . 

. Machine Language Tutorials • 

• And Much More • 

Call: 312-782-9750 

Write For Free Sample: 

Chicatnig News --i'? 
c/o EBG & Associates 
203 N. Wabash Av 
Chicago JL 60601 

* THS-8(r' is a Trademark of Tandy Corp. 
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Throw 
It Awa 



(y^our dictionar]^, that is) 




Now you can proofread and correct ten pages of text in less 
than one minute, with MICROPROOF dictionary software 

• EASY TO USE: Prepare your text on any Z-80 based microcomputer, using any of a number of popular word 
processing programs. When you are finished, enter ihe appropriate command, and MICROPROOF proofreads 
your document, displaying misspellings and typos on the screen. Then MICROPROOF displays each error 
separately, requesting you to enter the correct spelling for each. Finally, MICROPROOF corrects your document. 
All m less than a minute. 

• COMPREHENSIVE: MICROPROOF comes with a 50,000 word vocabulary. That's equivalent to a Webster's 
Pocket Dictionary. And MICROPROOF's dictionary is INFINITELY FXPANDABLE. You can add your own 
technical words and jargon. 

• RECOGNIZES prefixes, suffixes, hyphenation and comment lines. 

• REQUIRES ONLY 32K of memory and one single or double density 5% inch or 8 inch disk drive. 

• AFFORDABLE; Available in three forms: fully independent program to identify errors, independent program 
to identify and correct errors, or with a conversion program that will permit MICROPROOF to operate from 
within your own word processing software. 





PRICES 






TRS-80® Model I or III version 


$125.00 


Correcting Feature 


$60 00 


TRS-80® Model II version 


$200.00 


Word Processing Conversion 




CP/M® version 


$200.00 


Scripsit* or Electric Pencil'^ 


$35,00 


APPLE® version 


available soon 


Separate User's Manual 


$5.00 



Master Charge and Visa accepted. No COD please California residents add 6% .sales tax Send for a 
brochure— specify type of microcomputer and word processing software u^ed. Dealer inquiries welcome. 

CORNUCOPIA SOFTWARE ^^n 

Post Office Box 5028 

Walnut Creek, California 945% 

(415) 524-8098 




Let MICROPROOF Find Your Errors 



Before Someone Else Does! 
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Make wa^es 
in the 
German 
computer 
market! 

Advertise in. . , 

CHIP 

The German-language computer market has an exceptional sales potential. CHIP, the 
leading German magazine for desktop computers will help you to make this market your own. 
Over 65% of the CHIP readership deals with computers in their business or profession. In addi- 
tion, the CHIP audience has made computing a hobby for which it is willing to spend money. 
The German market for personal computing has grown by leaps and bounds since CHIP first 
appeared in 1978— proven by its paid circulation of 50,047*. Get yourself into the European 

market today by advertising in CHIP. -IVW Auditing (ABC equivalent), 3rd quaver 1980 



GENERAL ADVERTISING RATES* 



SIZE Ix 3x Sx 12x 

1 pg. 1565 1410 1330 1252 

V4 pg. 1174 1057 998 939 

2/3 pg. 1044 940 888 835 

V2 pg. 783 705 666 626 

Va pg. 544 490 462 436 

Va pg. 410 369 348 328 



'U.S. Dollars effective 6/1/81. Rates subject to change 
In accordance with exchange rates. 



DEADLINES 



Issue 

Sept. 

Oct. 

Nov. 

Dec. 

Jan. 

Feb. 



Last Date Materials 
On Sale Date Closing Dale in Germany 



Aug. 31 
Sept. 28 
Oct. 26 
Nov. 30 
Dec. 28 
Jan. 25 



July 20 
Aug. 17 
Sept. 14 
Oct. 19 
Nov. 16 
Nov. 30 



July 27 
Aug. 24, 
Sept. 21 
Oct. 26 
Nov. 23 
Dec. 7 



1 



FOR MORE INFORMATION CONTACT: 

Piergiorgio Salutr 
European Representatives 
(603) 924-7296 



r.SAVE 

I Take advantage of 
the best interest 
rates in years. i 



WAYNE GREEN INC, PETERBOROUGH. NH 03458 
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user selected variable or change 
it in line 140. 

This is no comparison for a 
machine language sorl, but It 
hobbles along at a fair speed for 
a BASIC sort. The big disadvan- 
tage is that the whole thing 
must fit into memory. By run- 
ning the sort as a separate pro- 
gram, we can use maximum 



string space (or the file. If this 
sort is too slow, or your RAM is 
not ample for the file, look into 
flacet's DOSORT program. This 
is a very fast machine language 
sort and does not require that 
the file be in RAM. 

Printing 
You have seen how we dis- 



play the data in several of the 
modules. Now print the head- 
ings across the screen, and then 
the data, using tabs to keep the 
separation right. You know the 
lengths of the data, so this 
shouldn't be a problem. In the 
case of the price and quantity 
you'll have to guess at the max- 
imum lengths. 



You can use a program like 
this to store most any data base. 
My intention was only to give 
you a few examples of using 
random files to store data. I 
hope you give these techniques 
a try in your next program. They 
are worth studying if you are 
learning to use random 
access. ■ 




NSTRUCTION 



MREQ 

rd' 

I^EXT 

OMUX 
CAS ' 



READ CYCLE 



WRITE CYCLE 



Fig. 3 




RS205 



■ AP101 Apple II with Single Disk Drive S109 

» AP1 02 Apple 11 with Double Disk Drives 119 

i AP103 Apple M, 9 inch Monitor & Double Drives ... 129 

■ API 04 Apple >^, two additional Drives & Silentype 139 

I API 05 12 inch monitor plus accessories 99 

I RS201 TRS-80 Model I, Expansion Unit & Drives .... 109 

* RS202 TRS-BO Monitor or TV set 84 

I RS204 TRS-80 Modet III 1 29 

► RS205 Radio Shack Color Computer 89 

I P401 Paper Tiger 440/445/460 99 

» P402 Centronics 730/737 - Line Printer ll/IV 69 

' P403 Epson MX70 or MX80 89 

» CC90 Matching Attache Case 75 

" '' compurer case companv 

5650 INDIAN F^UND CT COLUMBUS OHIO 43213 |614| 868-9464' 



SAVE more than 50% 




FOB Haslon 
Virginia 

MastBrCarC, VISA 
Check MQ, PO. 



NEW! SI 995 used mexceient condition 

RO version nnly RQ S995; KSR SI 495 

Rugged and well-constructeQ, available in KSR and RO versions; 
feature 96 ASCII (upper & lower case) plus 27 g'-apmcs characters in a 
bX7 (optionally 5X9] dot matrix Prints bidlrectionally {logic seeking] at 
1 80 char/sec on std pin teed paper (up to SIX pari) in red and black. 
Tractors are adjustable from 3 to 15 Inches, split platen versions also 
available Electronic top of form/forms length control and Six select- 
able character print densities [10, 12, and 1 ? cpi plus elongated in 
each] IK butter and 110-9600 Baud RS-232C interface is standard; 
additional buf*er may be added and a Centronics-conpatible parallel 
interface is available Free standing pedestal unit. 




Digital Systems Engineering 



12503 King's Lake Drive, fleston VA 22091 (703) 620-2994 

Also AVAlLABLf: New Centronics and integral Data Systems printers at 
15-20% below list; also, used printers of sewera: makes. Cal for informatiDn! 



■See L/sf ol Advertisers on page 306 
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r 



FIRST WE REDUCED THE PRICE . 
NOW, WE HAVE INCREASED 
THE PERFORMANCE 



• • 



TRS-80® MOD III 

FIRST . . . We lowered rhe prices of the 
Model 111 from $2499* ro 

H899 

*We have taken the basic 16K Model 111 computer, expanded 
the memory to 48K and added our ultra-reliable MTI Dual 
Dislt Drive system. System is fully compatible vi/ith MOD III 
DOS and peripherals. 

MOD III PLUS 

^ - PROFESSIONAL SYSTEM 

Now we hove enhanced rhe basic sysrem ro 
increose rhe processing speed and increase 
rhe display copablliry from 64 x 1 6 chorocrers 
ro 80 X 24 chorocrers. This allows complere 
word processing capability on rhe MOD III. 
Speed-up, rhe basic processing speed has 
been upgraded by adding a Z-80D processor. 
Programs run many rimes fosrer comporibly 
wirhour rhe use of special software 




^2799 



MOD 111/60 

Upgraded MOD III, two disk sysrem. 
Now you can get 80 track Disk Drives allowing 
050K byres per drive or TOOK byres per disk 
drive. An Oursronding Value 



AS LOW AS 



^2249 



MTI has Q complete assortment of COMPUTER KITS - & Accessories 



Mil DISK DRIVES for MOD III 

Inrernol Kits - 40 TK. 

Disk Drive 1 *649 

DiskDrive2 *279 



Exferno! Add-on Kits ■ 40 TK. 

DiskDriveO *379 

DiskDrive4 *359 



Model III DOS 6 Monuol . . . *2 1 '^ 

16K[Wv\Kir *59 

R5-232 Seriol Inrerfoce *95 



Ask About Our Extended Warrantee Plon 



filA 



MICROCOMPUTER TECHNOLOGY, INC. 

3304 W. MACARTHUR, SANTA ANA, CA 92704 
• PHONE (714) 979-9923 • TELEX #678401TAD IRIN 



V 



*Uses MTI Memory, Disk Drives & Components 

©TRS-eO'" IS A REGISTERED TRADEMARK 
OF TANDY CORPORATION 




ALL PRICES CASH DISCOUNTED 

FREIGHT FOB FAaORY 

ASK FOR FREE CATALOG 
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EA 



/MICROCQAIPUER 

TECHNOLOGY 
l^NCORFORATED 



SUMMER SALE 



CLEARANCE SPECIAL 

SHUGART SA400 (tf-3) 

35 track disk drive 

indudes power supply t^fS A f\ 

and chassis. 9 ^ f\^J 

LIMITED SUPPLY Jfa ^ 7 

P^FREE FULL YEAR WARRANTY^ 

n wirh purchase of new 40 TK. 

a TANDON DISK DRIVE 

[1 comes complete wth 

[! power supply, chossis, 

& coble 6 DOS PLUS 

I ONLY $409 



i! 



f=Jf=Jr=)f^r=Jr=Jr=Jr=Jr;=if=Jf=Jr=Jr=Jr=Jr=lr=Jr=Jr=Jf=J?5 




DOUBLE DENSITY SPECIAL! 

MTI Doubler Pkg. includes doubler ond mi- 
crosystems DOS PLUS 3.3D, run single ond 
double density, plus o box of Verbotim 



diskettes. 
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DISK STORAGE SPECIAL 



Buy 5 boxes of diskettes 
ot ^30.00 eo. and get 
a S30 Value Flip-Sort 



FREE 




LEXICON II ACOUSTIC MODEM 
SPECIAL CLOSEOUT 



H19 



Memory Kir (16K) '43.00 

ACIsolotor (6 sockeO *49.95 

Disk Heod Cleaner M9.95 

Diskettes Verbotim ( 1 0) hord ring 5" ss *30.00 



Disk Drive Sole! 

with power supply and chossis 

Shugorr SA400L, 40 rrk 

Perrec FD200, 40 irk 

TF-5MPID51,40rrk 

F-1 1 Tondon, 40 rrk 

TDH-1 Duel sided drive, 35 trk 

TF-3M Drive Sys. 3 ShugorT 40 rrk. ( 1 cabinet) 

SOFTWARE SALE 

DOS+3.3 

DOS+3.3D 

Disk b System Diagnostic 

INTERFACES - MOD I 

Interface 1 6K 

Interface 32K 



»319 
*349 
*049 
5309 
»419 
»599 



>99 
>99 
M9 



>349 
'419 



MONTHLY SPECIAL 
TF- 15 80 TRACK 
DISK DRIVE 

Double your copociry. 200K 
bytes of storage. Complete 
wirh power supply and 
chossis- 



■ NEW FOR TRS-80® 
TF- 17 DUAL 80 TRACK 
DISK DRIVE 

Quodruple your capacity. 
400K bytes of sroroge. Com- 
plete witti power supply and 
ctiossis. 



»479 



*659 



SYSTEMS - MOD I 



Interfoce 32K, TF-1 1 disk drive 
cable ond DOS 3.3 



»799 



MOD I Disk Expansion Systems 

• 2TANDONTF-1-1 »618 

• 1 Two-Drive Coble *26 

• 1 Exponsion Interfoce 32K >419 

• 1 D05+3.3 *99 

TOTAL U5T PRICE M162 



SPECIAL PRICE ONLY 



M029 



• BARE DRIVES FOR ANY MICROCOMPUTER 



Perrec FD200 »262 

ShugorT SA400 35 rrk '269 

MPIB51 '279 

MM 091 '399 

TANDON 40 lTt< '259 

TANDON D/40 trk '339 



FD250 '359 

5A400L 40 frock »279 

B52 '349 

092 '525 

TANDON 60n1^ '039 

TANDON D/80rr1^ '504 



SA 



MICROCOMPUTER TECHNOLOGY, INC 

3304 W. MACARTHUR, SANTA ANA, CA 92704 

• PHONE (714) 979-9920 • TELEX #678401 TAD IRIN 



®TRS-60'" 15 A REGISTERED TRADEMARK 
OF TANDY CORPORATION 



MasterCaid 




ALL PWCES CASH DISCOUNTED 
FREIGHT FOD FAOORY 
ASK FOR FREE CATALOG 
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UTILITY 



Time is data where the Z-80 is concerned 



High Speed Data Tapes 



Jim Glosser 
152 Clover Ave. 
Marion, OH 43302 



If you've created large data 
files which need to be stored 
on tape, you know that data 
tapes are slow. BASIC has no 
choice but to use great amounts 
of time to load or save tapes. 
But there is an alternative. A ma- 
chine code subroutine can re- 
duce this time by up to 90 per- 
cent. 

Ttie Problem 

BASIC has to use the PRINT 
#■1 and INPUT #-1 statements to 
create and read tapes. Each 
time the statements are used, 
your tape recorder turns on, 



writes or reads, and turns off. 
This happens even in loop 
statements. The statement FOR 
X=1 TO 50:PRINT #-1,A$(X): 
NEXT will cause 50 ons, 50 
writes and 50 offs. 

Each time the tape is turned 
, on to write, a leader of 256 zeros 
is written to the tape before the 
data. 

Table 1 shows the 500 baud 
tape time for a string of 200 ar- 
ray elements averaging 50 char- 
acters each. Out of a totai tape 
time of 16.3 minutes, only 2.7 
minutes (17 percent) is actually 
used for the data. 

Time tests on the demonstra- 
tion program (Program Listing 2) 
resulted in a subroutine tape 
time of 10 seconds versus a BA- 
SIC tape time of 1 minute 55 sec- 
onds. This reduces recorder time 
91 percent. The savings will vary 
according to the amount of ac- 



200 Elements x 50 characters 


= 10,000 bytes 


200 Leaders x 256 zeros 


= 51,200 bytes 


10,000 bytes x B bits per byte 
500 baud x 60 sec/min 


= 2.7 minutes data time 


51.200 bytesxS bits per byte 
500 buad x 60 soc/min 


= 13.6 minutes leader time 


Total Data Tape Time 


= 16.3 minutes 


Tabie 1. String Array Tape Time. 



tua! data being saved. Time sav- 
ings could never be less than 50 
percent with the worst condition 
of 255 bytes in each string. 



6FD0 

6FE0 B8BBBA 

6FF0 AAAATEST BTEST A 

Tabte 2. ASCII Dump. 



The greatest time-waster in 
BASIC is caused by string 
handling. Look at the following 
listing, then look at the string 
space dump in Table 2. 

10 CLEAR 48 
20T$ = 'TEST" 

30 A$ = T$ -I- "A":BS + T$ -h -B" 
40A$ = STRINGS(5."A"):B$ = 
STRINGSS (5,"B") 

A$ and B$ are defined in line 
30, then re-defined in line 40. But 
a look at the 48 bytes of string 
data (Table 2) shows both the 
original and current values of A$ 
and B$. 

CLEAR 48 reserves 48 bytes 
of memory for string values and 
tells BASIC that nothing cur- 
rently written there is of any 
value. So BASIC sets a marker 
to the highest address in the 
string space (6FFFH) and starts 
writing there. 



The T$ string is exactly de- 
fined in the BASIC program, so a 
marker (VARPTR) in another ar- 
ea of memory is written to point 
to those exact five bytes "TEST" 
in the program statement. 

But strings A and B in lines 30 
and 40 are not exactly defined. 
In each case, the string has to 
be put together in the buffer. 
And since the buffer doesn't ex- 
actly match a program state- 
ment, the exact string must be 
moved to the string space. Then 
the VARPTR's for A$ and B$ are 
adjusted to point to the correct 
number of bytes at their exact 
location in the string spaces. 
But there are two A$s and two 
B$s in the string space. 



6FD0 

6FE0 BBBBBA 

6FF0 AAAATEBBBBBAAAAA 



Table 3. ASCII Dump. 



The clear statement in line 10 
says that there are no valid val- 
ues stored in the string space. 
So when BASIC puts together 
string "TEST A", it writes it at 
the first location In the string 
space. Then it writes the start- 
ing location (6FFA) and the 



280 • 80 Microcomputing, July 1981 



ARG 1 1 = Load any attay but must be used to load the first array from tape. 
Value 1 must be used unless you Know that the string space is 
already compressed. 

2 = Load subsequent (2nd, 3fd, etc.) arrays. This value saves the 

amount ol time required fof a string space compfession. H siring 
variables have been created or changed since the first array load, 
then you must use value 1 instead. 

3 = Write tape of string array. 

4 = Verify the tape saved array against the values In memory, 
ARG 2 Use VARPTR to identify the array VARPTR returns an integer value 

which can be used to locate the array The array element number (0, 
1,2, etc.] must t>e the same number used in ARG 3. (The subroutine 
doesn'l check this.) Caution. Creating additional variables after a 
VARPTR can cause the VARPTR value to t«come invalid. 

ARG 3 Starting element number of array. This identifies the first element 

that the subroutine is supposed to use. 

ARG 4 Last array element numtier to be used. 



Table 4. Arguments. 



length (6) in the VARPTR for A$, 
"TEST B" is put in the next avail- 
able space and the starting io- 
cation (6FF4H) and length (6) are 
written in the B$ VARPTR. 

When A$ is changed 
to"AAAAA", BASIC doesn't 
bother to see if A$ is previously 
defined. (The previous definition 
isn't valid anymore.) BASiCjust 
writes the new A$ in the next 
available string space and 
writes the new location {6FEFH) 
and length (5) in the A$ VARPTR. 

Now the string space con- 
tains 26 bytes of memory for ad- 
ditional progressive writes, 10 
bytes of valid data, and 12 bytes 
of garbage. BASIC will continue 
the progressive writing of 
strings until its need for more 
space will take it past location 
6FD0H. At that time, it will call 
ROM routine 28E6H, 

ROM call 28E6H reads all the 
string VARPTRs looking for 
pointers to valid data. When it 
finds valid data, the data is 
moved to the start of the string 
space in the same progressive 
manner previously seen. If we 
call 28E6H after line 40, the 
string space will be rewritten as 
illustrated in Table 3. 

The current values of A$ and 
B$ are written in location 6FF6H 
through 6FFFH. No VARPTRs 
point to the rest of the data in 
the string space, and the next 
string will be written in the string 
space starting at the "E" at loca- 
tion 6FF5H (right over the old 
values). 

Input from Tape 

If all tape input were numeric, 
then BASIC could probably cope 
with data tapes written without 



all those starts, stops and 
leaders. At worst, it would need 
a slight delay between data ele- 
ments. 

But input has to accept string 
data, also. It must be constantly 
ready to turn off the tape re- 
corder to allow time for call 
28E6H to compress the string 
space, making room for addi- 
tional progressive writes. 

If BASIC knew its input were 
the first of a series with no string 
writes in between, then it could 
call 28E6H before turning on the 
tape. With the string space com- 
pressed, it could handle a con- 
tinuous stream of string data. 

But input doesn't tell BASIC 
enough. So, BASIC assumes it 
may need to stop the tape be- 
tween any two data statements. 

Print statements write all 
those zeros so input can stop 
the tape after any data state- 
ment and restart it after calling 
28E6H, The zeros provide the 
time for the tape to start and get 
up to speed before it reads 
another statement. 

Those 51,200 zeros in Table 1 






= Operation OK 


-1 


= Checi^sum error 




during read 


-2 


= Number of 




elements error in 




ARG 3 or ARG 4. 


-3 


= Out of string space 


-4 


- Invalid number in 




ARG 1 


-5 


= Array identified in 




ARG 2 not siring or 




not single di- 




mension. 


+ 1 or 




higher 


= Number of errors 




detected during 




verify, if any. 


ra£i/e 5. Return Values. 




''.MMMMsm.m 



SCRIPLUS (MOD I/Ill) $24.95 

A modification to Scripsit© which is tailored for the 
MX-80 printer. Scriplus gives you the capability to 
send commands to the printer. You can change 
print sizes, underline, mix print sizes & change the 
number of characters per inch (including mid-line!) 
Also gives you an alphabetized directory! Many 
more features. *■ 

BASIC/S (MOD I/Ill) $39.95 

A programmer's Basic Compiler. Not intended to 
compile "off the shelf" programs, but will compile 
code written along its parameters. No Royalty 
program to pay! Many Basic programs and routines 
you are using today can be compiled! Supports ALL 
MOD I operating systems & MOD III. 

MOVE 1-2-3/3-2-1 (l/ltl) $29.95 

Convert selectively from MOD I to MOD III by file 
name or extension without having to convert the 
Entire Disk! You may also select from a list as it 
passes in review, and with Move 3-2-1 you can 
convert III to I! {Requires Percom Doubler in MOD I) 

EXTRA SPECIAL DELIVERY ^^^^ ^^ 

(I/Ill) $200.00 

Machine Language program to maintain your mail- 
ing list, print labels, and merge data from your mall 
list into a letter created by Scripsit® or Electric 
Pencil® t: 

LDOS MOD I or MOD III $139.95 

The ULTIMATE Operating System for MOD I or 
MOD III. 

DOUBLEZAPII/LDOS (MOD I) $29.95 

Lets you run LDOS with the Doubler on a MOD I. 

0M8/CMD MOD I $29.95 

Lets you run LDOS with the Mapper Board. 

— DEALER INQUIRIES INVITED — 

QUALITY SOFTWARE DISTRIBUTORS 

1 1 500 STEMMONS EXPRESSWAY, SUITE 1 04 ^Hf" 
DALLAS, TEXAS 75229 MMMM 

PHONE (214) 484-2976 P,^.oo.sttot^W, 

T-ariMnarki ol Twdy Corp MICRONET 70 1 30,203 ^ 2? Poi1a(t 



TRS-gO t Scnpvt iic 



-See Lis! of Advertisers on page 306 
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NEW PEN737 

FINALLY ■ THE ULTIMATE IN 

WOHD PROCESSINO FROM COMPUTEX 

Superscripts ( Subacrlpts I UrH]e<li[>es / ElongtM printing ; 
BOLD lace type and many other lealurM can now tie 
accomplished wltn your TRSBO computer, Electric Pencil, 
Centrontcs 737 Printer and our new PEN737 program, 

PEN737 program (avaUabla on dlih or eatMllel S2S.9S 

When purchaMdwUhCentronlc* 737 prlRtor S19.K 



CENTRONICS 737 PRINTER 

Special $750.00 

FEATURES: Fan lokj, roll end gingle sneet paper handling • 
True underlining cepabiiitles * Superscripts and Sutncripla • 
True UPPER A lower case • 80 or 132 column lines • Fast BO 
cps printing • Paper forward and reverse switch • Supports 10 
and 16.7 c.p.i 

TnsaO MODEL I or MODEL III PRINTER CABLE .... S2g.K 
IBK MEMORY EXPANSION KITS FOR MODEL I AND 
MODEL III SYSTEMS 
SSS.HfMI 2-SMI*S3a.9e(lilt ■up$2S.U(kH 

LNW EXPANSION tif end COLOR COMPUTER KITS 

COMPLETE LNW 
EXPANSION INTERFACE 
$249.00 

includes all components, sockets, and hardware to build the 
complete kit. Does not Include the relay for dual cassette, cabinet 
or Ram. 

RAM MEMORY US.UMeK WHEN PURCHASED WITH LNW 



Complete CPT Systems with disk 

drive, 32K Ram, RS232 and 

Custom cabinet as low as 

$799.00 

(CALL FOR QUOTE) 



LNW COLOR Computer Kit 
$599.00 

Includes all components to assemble (he LNW Color Computer 

including: High Resolution Video Ram and IBK user ram. 

Keyboard, and Level 11 compatible Roms. 

CUSTOM CABINET FOR LNW COLOR COMPUTER 

AND EXPANSION l/F I14B.9S 

CUSTOM CABINET FOR LNW EXPANSION l/F, 

AND DISK DRIVES « «■» 

We also stoc* a complate line o/ cornpon»na lor both tha 

LNW Color Computer end th» LNW System Etpamlon at 

NEVER UNDERSOLD PRICES 



MM 




TRS80 is a registere<i trade mar* ol RaOio Shadi 

Cerrltied Checks. Mortey Orders 

Or call 10 arrartge direct mre iransler 

Visa and Masterchnrge accepted, add4% loordsr. 

Personal or company cneclts require 2 weeds to clear. 

COMPUTEX 392 

15502 Highway 3, Suite 715 

Webster, Texas 77598 

(713)488-8022 



DISK DRIVES - Compare 

RELIABILITY I FEATURES I WARRANTY 

PRICE I DELIVERY 

Computex oHera the best ol all with TANDON Disk Drives 

Warranty 120 day repair I replace warranty 

Reliability: 8000 hrs. mean time between laiiure 
Features: S m.s. Track (o Track Access Time 

sec. Head load lime <no solenoid either!) 
Single or trouble Density Capabilities 
40 / 80 Track - Singlo & Doul>le Sided 
Maintenance Manual Provided with drive 



TM10O-1 Single headed «0 track disk drive, unformatted double 

density storage - 250 l^B 

TRSeo™ Storage single density = 102 KB Double = 

1MKB 
Baredrlv«S2Z5.00 WltticaM/Mppl)l$2M.W 



TM100-2 Double headed 40 track drive, unformatted double 

density storage ;: 500 KB 

TRS80"" Storage single density = 204KB. Double - 

367KB 
BaradrivaS34S.oa Wllh case /supply $41 S.9S 



TM100-3 Single headed 80 track drive, unformatted double 

density storage SOOKB 

TRSeo"" Storage singledensity = 204KB. i»ut>le - 

367KB 
Bare drive S37S.00 Wllhcase/supplyt44S.0O 



TM1D0-4 Double headed 30 track drive, unformatted doubte 
density storage = I.OmB 

TRS8O"" Storage single density = 40eKB, Double = 
735KB 

Bare drive $475.00 WltlicaM/wp|)iy$MS.OO 

2 Drive Disk Cable S2*.K 

4 Drive Disk Cable S34.9S 

Drive Enlendsr Catile $13.K 



MODEL III DISK DRIVE KITS 

Complete k'l installs in minutes, interfaces any Tandon disk drive 
to your Model III, Detailed instructions included $429.96 



i^See List 0/ Ativgrtisers on page 306 
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NEW COLLEGE BOARDS 



for TRS-80 
81/82 PET, APPLE'" 

The best way to sharpen your skills for the College Boards Is to work on actual examinations. Each of 
these program sets confronts the user with a virtually limitless series of questions and answers. Each 
program is based on past exams and presents material of the same level of difficulty and in the same 
form used in the College Board examination. Scoring is provided in accordance with the formula 
used by College Boards. 

SAT, PSAT, N.M.S.Q.T., set includes 20 programs covering Vocabulary, Word Relationships, Reading 
Comprehension, Sentence Completion, and Mathematics. Price $149.95 

EDUCATOR EDITION - SAT, PSAT includes all of the above programs plus detailed solutions and 
explanations for each problem plus drill exercises. SAT set includes 26 programs $229.95 

GRADUATE RECORD EXAMINATION set includes 23 programs covering Vocabulary, Word Relation- 
ships, Reading Comprehension, Sentence Completion, Mathematics, Logical Diagrams, Analytical 
Reasoning. $199.95 

EDUCATOR EDITION - Graduate Record Exam Set includes 33 programs. $289.95 

Owners of our initial College Board series can upgrade their package to the College Board 81-82 specs, 
including the all new reading comprehension, sentence completion plus expanded vocabulary and 
mathematics sections for $69.95. 




ALL TIME SUPER STAR BASEBALL 
& SUPER STAR BASEBALL 



ALL TIME 

SUPER STAR BASEBALL 
Sample Lineup 

T, Williams 
|. Foxx 

H. Gref nht>riJ 
R, Hornshy 
H. WilMin 
B. Terry 
M. M.intle 
H. A.iron 
W (ohnson-ii 



SWORD OF ZEDEK 

Fight to overthrow Ra, The Master of Fvil. In this incredible 
adventure game, you must confront a host of creatures, nat- 
ural and supernatural. To liberate the Kingdom, alliances 
must be forged and treasures sought. Treachery, deceit and 
witchcraft must be faced in your siruggles as you encounter 
wolves, dwarves, elves, dragons, bears, owls, ores, giant bats, 
trolls, etc- Each of the twelve treasures will enhance your 
power, by making you invisible, invulnerable, more elo- 
quent, more skillful in combat, etc., etc., as you explore the 
realms of geography, both on the surface and underground. 
Dungeons, temples, castles, mountains, etc., are all a part of 
the fantastic world of Ra. Each game is unique in this spec- 
tacular and complex world of fantasy. $24.95 



SUPER STAR BASEBALL 
Sample lineup 



D. P.trker 
W. Slcirnell 
W, M.iys 
P Rose 
() Ceped.i 



|. Rite 
H. A.irdn 
L. Brmk 
R. Girew 
H. Killehrcv 



C. Y,irsHem>ki R. Allen 

VifMcCovev R, Lelkire 

R,),Kks<)n R.Zisk 

C. Brell B. M.idlc)(k 

R Guirifv-P T Se.wer p 



Performance is based on the interaction of 
actual batting and pitching data. Game can 
be played by one or two players with the 
computer acting as a second player when de- 
sired. Players select rosters and lineups and 
exercise strategic choices including hit and 
run, base stealing, pinch hitting, intentional 
walk, etc. Highly realistic, there are two ver- 
sions, ALL TIME SUPER STAR BASEBALL, and 
SUPER STAR BASEBALL featuring players of 
the present decade. Each includes about 50 
players allowing nearly an infinite number of 
roster and lineup possibilities. 

•Both Games $24.95 





TIME TRAVELER ^ 

The best of the adventure games. Confronts player with 
complex decision situations and the demand for real time ac- 
tion. Using the Time Machine, players must face a challeng- 
ing series of environments that include; The Athens of Per- 
icles, Imperial Rome, Nebuchadnezzar's Babylon, Ikhnaton's 
Egypt, Jerusalem at the time of the crucifixion, The Crusades, 
Machiavelli's Italy, the French Revolution, the American Rev- 
olution, and the English Civil War, Deal with FHitler's Third 
Reich, Vikings, etc. At the start of each game players may 
choose a level of difficulty, , .the more difficult, the greater 
the time pressure. To succeed you must build alliances and 
struggle with the ruling powers. Each game is unique. 

$24.95 



ISAAC NEWTON 

Perhaps the most fascinating and valu- 
able educational game ever devised - ISAAC 
NEWTON challenges the players (1-4) to 
assemble evidence and discern the under- 
lying "Laws of Nature" that have produced 
thisevidence. ISAAC NEWTON is an induc- 
tive game that allows players to intervene 
actively by proposing experiments to deter- 
mine if new data conform to the "Laws of 
Nature" in question. Players may set the 
level of difficulty from simple to fiendishly 
complex. 

In a classroom setting the instructor may 
elect to choose "Laws of Nature" in accor* 
dance with the complete instruction man- 
ual provided. 

For insight into some of the basic principles 
underlying ISAAC NEWTON see C:ode/. 
Etcher. Bui h by Douglas R. Hofstadter, 
Chapter XtX and Martin Gardner's "Mathe- 
matical Games" column in Scientific Amer- 
ican, October, 1 977 and June, 1 959. 

$24.95 



Xm 



*ALL PROGRAMS AVAILABLE FOR 
TRS-80, APPLE II & PET 

'Programs for APPLE or TRS-80 are on 
L! disk or □ cassette, p/ease specify. 

All pronranti require IbK'TRS-SO programs require LEVtL II BASIC»APPLf pmgrsmi require ^pple'iofl BASIC 



I^ell Softwire 



Send check or money order to 
21 Milbrook Drive, Stony Brook, NY 11790 

(516)751-5139 



^375 



MK 



MK 



MIC 



DOC 



3MC 



MK 



^Seo List of Advertisers on page 306 
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are an insurance policy to make 
sure you can read all the data 
you saved, even if the recorder 
has been turned off for a string 
compression. 

Machine Language Speed 

We've all heard about the 4yi 
hour Radio Shack mailing list 
sort that in machine code will 
run in nine seconds. Machine 
language has to be faster! 
Right? 



No! The BASIC Interpreter is 
itself a machine language pro- 
gram. And all identical instruc- 
tions run at the same speed in 
the Z-80 CPU, regardless of 
whether they are BASIC inter- 
preter instructions or a subrou- 
tine. 

Then why the difference be- 
tween the AV2 hours and the 
nine seconds? Simple! The 
subroutine has four hours, 29 
minutes and 51 seconds less 



work to do. 

BASIC has all kinds of condi- 
tions to consider and respond 
to. A machine language subrou- 
tine is written to respond to a 
very limited set of conditions 
and in a very precise manner. 
We won't save four hours with 
this one, but almost 14 minutes 
out of 16 ain't bad. 

We will provide the sub- 
routine exactly four instructions 
and then turn it loose. 



100 
110 



120 
130 
I'tO 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
3 30 
340 
350 
360 
370 
390 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 



550 
560 

570 
580 

590 



PRINT"3 
PRINT"4 
PRiNT"5 
PRINT"6 



DEMONSTRATION PROGRAM 

CLEAR lODOlDEFINT A-Z:DIM T»126) 

REM DISK USERS MUST EXECUTE DEFUSR IN LINE 120 AS FOLLOWS 
16K = DEFUSR &H7DFB 
32K = DEFUSR &HBDFB 
48K = DEFUSR CHFDFB 
REM DEFUSR=eH#»»» 
A=0:A3=1:A4=26 

REM BUILD TEST STRINGS 
FOR X=lT015:T»lX)=STRING$(5tX+64)+5TR$(X) 
FDR Xl=lTD5:T$(X)=T$(X)+CHR$(Xl+64) : NEXT: NEXT 
T$(16)=""J REM NULL STRING 
FOR X=17TD26:T$(X)=STRING$(10,X+64):NEXT 
CLS:FDR X=1T026:PRINT X i TAB I 6 ) T$ ( X ) : FOR Y=l TO 100 : NEXT : NEXT 

REM TEST FUNCTIONS 
INPUT"ENTER TO CONTINUE"iX 
CLS:PRINT"1 = QUICK TAPE WRITE" 
PRINT"2 = QUICK TAPE VERIFY" 
QUICK TAPE READ" 
REGULAR TAPE WRITE" 
REGULAR TAPE READ" 
DISPLAY TEST ARRAY" 
INPUT"ENTER FUNCT ION" i X : I F X<1 OR X>6 GOTO 280 
ON X GOTO 310 , 340 , 370 , 410 , 440 » 190 

REM QUICK TAPE WRITE 
GDSUB 490 : A=0! Al=3:GaSUB 550 
IF AOO THEN GOTO 510 ELSE PRINT"QUICK WRITE DDNE"!GQTD 210 

REM QUICK TAPE VERIFY 
G05UB 490 :A=0:A1=4:GOSUB 550 
IF AOO THEN GOTO 510 ELSE PRINT"VERIFY DONE"jGOTO 210 

REM QUICK TAPE READ 
GOSUB 470 : A = 0: Al = l:GOSUB 550 

IF AOO THEN GOTO 510 ELSE PRINT"QU1CK READ DONE" 
INPUT"ENTER TO SEF TEST ARRAY" [ X : GOTO 190 

REM REGULAR TAPE WRITE 
GGSUB 490 :FDR X=1T026 : PR I NT#-1 , T J ( X ) : NE XT 
PR1NT"REGULAR WRITE 00NE":G0T0 210 

REM REGULAR TAPE READ 
GDSUB 470 iFOR X=1T026 : I NPUTHt-l , T$ ( X ) : NE XT 
PRINT"R£GULAR READ DONE":GOTa 390 

REM RESET ARRAY TO NULLS BEFORE READ 
FOR X=1T026:T$(X)="":NEXT 

REM CHECK RECORDER 
INPUT"ENTER WHEN RECORDER READY"; X : RETURN 

REM ERROR HANDLING 
IF A>0 THEN PRINT»VERIFY DETECTED" f A J "ERRORS": GOTO 210 
PRINT"SUB-ROUTINE ERROR CODE "; A i "RETURNED" : GOTO 210 

REM INITIALIZATION FOR START OF USR SUB-ROUTINE 
REM IN LINE 550, POKE VALUE '0' AS FOLLOWS: 
16K = POKE 32240,0 
32K = POKE -16912,0 
48K = POKE -529,0 
POKE »»»»», 

REM USR SUB-ROUTINE ENTRY 
A2=VARPTR(T${A3) ) 

A=USR(A1) OR USR{A2) OR USR(A3) OR USR[A4) 
RETURN 

Program Listing 2. 



•What to do (Write, Verify or 

Read) 

•What array to use 

•With which element to start 

•With which element to stop 

Your BASIC program gives 
the subroutine accurate data 
concerning the array and the 
number of elements. The array 
must be singly dimensioned, 
DIM A$(300), and the last ele- 
ment must be a valid element 
such as 290. 

Arguments (Instructions) 

Four specific argument val- 
ues (see Table 4) are required by 
the subroutine. Arguments are 
passed to the subroutine by us- 
ing a variable defined as an inte- 
ger and using the OR operator to 
assign consecutively the four 
arguments to the same variable. 
Line 580 of the demonstration 
program (Listing 2) shows the 
preferred manner of passing 
argument values. 

The POKE * * • " , statement 
in line 550 makes sure that 
NUMARG in Listing 1 is initial- 
ized to (0) before branching to 
the subroutine. The subroutine 
will normally re-initialize itself. 
However, if an error occurs in 
line 580, the subroutine can be 
looking for ARG 2,3 or 4 upon re- 
entry. The POKE statement en- 
sures that the subroutine will 
accept the arguments in their 
proper order. 

Note the caution concerning 
ARG 2 (Table 4). Creating addi- 
tional simple variables will 
cause array VARPTR's to be re- 
located. To prevent that, 
A2 = VARPTRfT${A3)): is the last 
variable defined before going to 
the subroutine transfer line 
(Listing 2, line 570). Variable A is 
also defined before A2 for the 
same reason. (See Listing 2, line 
130.) 

I use a single, long array 
string for each complete data 
record and I extract individual 
fields with the MID$ function. 
Numeric values are included 
with the string data by using the 
STR$(X) function.X = VAL (MID$ 
(Y(N),P,L) extracts the numeric 
data. 

My approach causes some 
slowing of program perform- 
ance, but simplifies data saves 
and reduces array overheads. 
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IF YOUR PERSONAL COMPUTER WERE STOLEN TODAY. . . 

Would you know the best way to insure its recovery and apprehend the guilty party? 

\Ce can help! Register your serial numbers with The Registry Service, in Ihe event of theft, simply 
notify us by phone or mail,. We immediately wili notify the law enforcement agencies and compuler 
dealers in your area and provide them with a list of your serial numbers and a reward offer. 

With your registralion, you will receive free of charg e the first year's membership in World Associa- 
tion of Computer Owners . (Memberships in WACO, are normally tis.oo per year.) 

Along with a si2.oo check or money order, please include an itemized list of each piece. of equip- 
ment with accompanying serial numbers. 



P.O. Box 905. Waco. Texas ?6ro3 



Pfofessionai sol I warp 



TRS-80® MODEL II 



BASIC CROSS REFERENCE 



NOW AVAILABLE! 



• FIND WHtRF NAMFS ARF USED FASH 

• CAN YOU DtLETE I HAT LINE? UNDOUT! 

• no YOU HAVt DEAD CODING? 

• WANT A NICE PROGRAM LISTING WITH 
DATE & TIME IN HEADING. 



► SAVE HOURS! 

► PARALLEL/SERIAL PRINTERS. 
• SEVERAL OPTIONS. 

► 6.'8 LP! VARIABLE 

IINE WIDTHS. PAGE DFPTH. 



$59.99 



+ POSTAGE & 
HANDLING 



DOCUMENTATION ONLY 510.00 
DEDUCTIBLE ON PURCHASE. 



DISK SORT 

• MENU DRIVEN 

• RANDOM FILES 

• CHAINS TO SYSTEM 
OR BASIC PROGRAMS 



BASIC COMPILER 



• YOU DON T HAVE TO BE A PROGRAMMER TO USE IT! 

• EASY TO USE • EASY TO INSERT INTO 

• FASTI |OB STREAM FOR 

• SPECS. SAVED NON-STOP RUNNING' 
ON DISK DOCUMENTATION ONLY 110.00 

DEDUCTIBLE ON PURCHASE 



$69.99 



+ POSTAGE & 
HANDLING 



• EASY TO USE 

• AUGMENTED WITH OUR 
DOCUMENTATION 



• WRITTEN BY MICROSOFT 

$350.00 



+ POSTAGE & 
HANDLING 



• TRSDOS®/BASIC COMPATIBLE' 

• FASTER THAN BASIC BY UP lO 
30 TIMES 

TRS^H)»^&TRS[X5S" ARE REGISTERED GOOD-LYDDON DATA SYSTEMS ,^218 

TRADEMARKS OF TANDY CORP 5«6 RIVERSIDE DR., CHINO, CA. 91710 MASTER CHARGE of VISA accaptsd. 



Model III Owners 

Copy Scripsit and/or Visicalc 



"A" Unlimited disk back-ups of YOUR original 

■^ No programming or technical knowledge required 

^ Works if you have already 
backed up twice 



All orders shipped 

within 10 days 

S15.00 

No credit cards, please. 



^ Usable only by original purchaser 
and intended for his private usage 




.n z^ e: Si 



^143 



SOX 257 BUHLER, KANSAS 67522 



LOWER CASE & GRAPHIC 

SYMBOLS GENERATOR KIT 

FOR TRS-80'- CG 16 $64.50 



>--.,»H;.'j>-f.itt;ta'*t»»»K- . 



.:.Tii/r.-W9*M' 



TflUE 2 LINE DECENDER LOWER CASE. ELECTRON- 
tC SYMBOLS. THIN LINE GRAPHICS. GAME SYM- 
BOLS. TEXTURED BACKGROUNDS AND MANY 
MORE DEMO CASSETTE IS INCLUDED 
FULLV ASSEMBLED WITH DETAIL INSTRUCTION 
FOR EASY INSTALLAl ION 

HEOUIRFS ELECT PENCIL TYPE lC MOD OR 
ORDER MEMORY ANDSWITCHKIT SMK FORS18 50 



SYNCHRONOUS DATA 
SEPARATOR FOR DISK USERS. 
SDS $24.50 

THE SYNCHRONOUS DATA SEPARATOR WILL 
ELIMINATE 100% OF THE SOFT F^EAD ERRORS 
AND SPEED UP DISK ACCESS TIME BV ELIMIN- 
ATING RETRIES BY THE DISK CONTROLLER 

THE SDS PLUGS INTO THE DISK CONTROL- 
LERS SOCKET AND HAS ONLY TWO WIRES TO 
CONNECT NO TRACES HAVE TO BE CUT IT IS 
THE MOST Rf 1 lABLE AND ACCURATE DATA 
SEPARATOR AVAILABLE. 



ADDS?50FORS 8H CALIF RES ADD6%SALETAX 
SEND CHECK OR MONEY ORDER TO 

G.P. ASSOCIATES '^^^ 
P.O. BOX 22822, SACRAMENTO, 
CA 95822 (916)392-0257 

TRS-SQ IS A TRADE MARK OF TANDY CORP 



NEWDOS/80 users 

"CHAIN USER/JCL" 

Operate your s/stem like the professionals 
do with DO files. Issue instructions to the 
operator ond/or supply commands to the 
computer. NEWDOS/SO provides o little 
used 'chain' facility which, when used, 
provides procedure type execution the 
same as big systems. This utility is on 
interactive maintenance program which 
allows you to create and maintain single or 
mutti-sectioned chain files for use with 
NEWDOS/80. Specify simple command 
words OS PAUSE, DISPLAY, COAAMENT and 
SECTION or any other DOS or BASIC 
command. Chain files may be built, listed, 
printed and executed. 



Program is distributed on diskette for 32K 
or 48K Model I- User Documentation and 
example included. Only S15.95 postpaid- 
CT residents add sales fox. Payment by 
check or money order. ORDER NOW! 



Umw Software 

140 Cheney Rood 

Marlborough, CT 06447 

Tel. (203) 295-9482 



^iJS 



TRS-80- MODEL III 
DISK DRIVE KITS <, 

process Control Technology's Disk Drive Controller 
of'ets more perlormanLe lor less Dollars' 

Jurriper prograrn nearly anv combination ol internal 
and external Disk Drives (All lour drives can be 
external, or up to two drives can be internal ) 

HarQware compatable with 40, 80. or 77 HacK (8 
inch) Onves' 

HarOware compatable wilb double siOed drives' 

TRSSO' MODEL III 

With Two tnMmal DIth Drlvei, 32K RAM $1899 

TRS-80* MODEL lir, MODEL III BASIC, 

18K RAM $899 

INTERNAL DRIVE KITS 

DISK DRIVE 1 $679 

DISK DRIVE 2 $279 

EXTERNAL DRIVES 

DISK DFIIVE 3 (Includes Cable) $359 

DISK DRIVE 4 $329 

Fully Warranted tor 90 Days. 

■TRS-80 IS a trademark of Radio S^>ack 



PROCESS CONTROL ^a06 
TECHNOLOGY 

P.O. BOX8S2S ;'"-." 

STOCKTON. CA 95208 
(209) 952-6576 



/■•Sae List of Advertisers on page 306 



80 Microcomputing, July 1981 • 287 



170- 180 DEFUSR points BASIC to machine language subroutine. 

Z70- 490 BEGIN accepts the arguments (inslfuctiona) from BASIC and stores 

them for program use. It keeps returning to BASIC until has all lour 

afguments. 
1000-1530 CHECK looks at the array to make sure that it's a string array ancJ that 

llissizedaslargeorlargertfian the last element numt>er to be used, 
2000-2130 START determines the operation needed and proceeds to read, verity 

Of write routines. 
2160 INARLD compresses the string space, 

2170-2270 NXARLD sets pointers to accept a new array and turns on the tape 

recorder. 
2(80-2390 NXBYRD reads Characters from the tape until a carriage relur n (OD)or 

end of tape mark (OF) Is read. Characters are stored In a tjuller and 

character value is added to a cfiecksum, 
2400-2860 STRSTR checks for enough string space to store the string, then 

moves it from tf>e boiler to the string space and writes the location 

and length in VARPTR. It initializes for the next string and returns to 

NXBYRD 
2870-3080 ENDRD reads the checksum from tape and compares it with the 

checksum calculated in NXBYRD. 
3100-3190 TAPEWR inilializes (or tape writing and turns on Ihe tape recorder. 
3200-3280 NXELWR wriles the CR (OD) alter a string and checks to see if more 

strings need to be written to tape. 
3290-3420 FSELWR writes the string characters lo Ihe tape and adds the 

character value to the checksum. 
3430-3480 ENDWR writes the end ol tape mark (OF) and the checksum to tape, 
3500-3630 VERIFY initializes for verification and turns on tape recorder, 
3640-3690 NXELVF checks tor CR (OD) after each siring, 
3700-3830 CROK checks for more array elements to verily and sets pointer to 

next. 
3840-3890 NXBYVF compares character read from tape and character in 

memory and increments error count It not same. 
3900-3950 BYOK adds character value to checksum and checks for end ol string. 
3960-4010 ENDVER verilies end ol tape mark, 
4020-4080 ENTPOK reads checksum from tape and compares with calculated 

checksum, 
4090-4150 RETURN turns on interrupts, turns off tape and goes back to BASIC 

with return value in HL 

Program Summary 



ELECTRIC SPREADSHEET 



NEW Considering VisiCalc"? 

ELECTRIC SPREADSHEET does everything you can do 
with a pencil, paper and calculator. Start with a blank 
screen. Move ttie fast cursor to desired location. Enter line 
or column labels or data. Select preprogrammed operators 
for line, column, or cell calculations. Run. Results appear 
on the screen, formatted for your printer. Revise, Run 
again, 

PREPROGRAMMED OPERATORS for mathematics, 
finance, and statistics. Save data on tape or disk. The 
screen is your window to a larger spreadsheet. Output 
features scrolling and split-screen Variable formats for 
labels and data. 

UNLIMITED APPLICATIONS. P/L forecast. Personal 
budget Real estate investment. Net worth forecast. 
Invoice Cash flow estimate. Sales analysis. Check record. 

Business forms. 

16K version has 50 operators. 32/48K version has 70 
operators plus histogram plot, remote storage of data, 
global revise spreadsheet layout, alpha entries, and more 

16K Model I or 111 Tape $34.95 

32/48K Model I or III Tape $64,95 

48K Model III Disk $67,95 

YOU CANT LOSE! Calif, orders add 672% tax, 

VisiCalc is a trade mark of Personal Software, Inc, 



Dan G. Haney & Associates, Inc^iej 
P.O. Box 687, San IVIateo, CA 94401 
(415) 493-4094 



When the subroutine passes 
control back to BASIC, it returns 
a value In HL. This value is as- 
signed by BASIC to the variable 
used at the beginning of the 
USR branch line in the demon- 
stration listing. Reading the va- 
riable after control returns to 
BASIC, will tell you the results of 
the subroutine's operation. 

Return values are listed in 
Table 5. Those values are dem- 
onstrated in Listing 2. Table 6 
should give you some hints 
about array storage. This should 
help you with modifications. 



Using the Subroutine 

To assemble the subroutine 
set memory size to 32240, 48624 
or 65008 for 16, 32 or 48K respec- 
tively. Load the program from 
tape with the System command. 
After the program loads, answer 
the second prompt with / Enter. 
Your BASIC program is now 
ready to load. 

Loading in Disk BASIC de- 
stroys the USR link address at 
408EH, so it must be re-estab- 
lished with the DEFUSR instruc- 
tion as demonstrated in line 120 
of Listing 2M 



BASIC PROGRAM TO CREATE ARRAYS. 

10 DIM AA%(3) "CREATE INTEGER ARRAY 

20 DIM BB;{3) 'create SINGLE PRECISION ARRAY 

30 DIM CC#(3) 'CREATE DOUBLE PRECISION ARRAY 

40 DIM DD$(3) 'CREATE STRING ARRAY 

50 DIM E5<2,2) 'CREATE 2 DIMESSION ARRAY 

60 END 

THE POINTER TO THE START OF ARRAYS IS AT LOCATION 40FBH. 

57A0H 
40FB AC 57 29 58 BF 56 04 04 04 04 04 04 04 04 04 04 

THE POINTER TO THE START OF FREE SPACE (FOLLOWING ARRAYS) 
IS AT LOCATION 40FDH, 

5829H 
40FD 29 58 BF 56 04 04 04 04 04 04 04 04 04 04 04 04 

DUMP OF ARRAY STORAGE SPACE <57A0H to 5829H) . 
# 7, & * $1 
2 A A _U _1 4 (0) (1) (2) (3) 



5 7A0 02 41 41 OB 00 01 04 00 00 00 00 00 00 00 00 00 
# 7. & * SI 

_4 _B B 19 _1 4 (0) (1) 

57BO 04 42 42 13 00 01 04 00 00 00 00 00 00 00 00 00 

# % & * 51 

(2) (3) 6 C C 35 _i _4 

57C0 00 00 00 00 00 00 00 00 08 43 43 23 00 01 04 00 



121 



(1) 



57D0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 



I2L 



121 



5 7E0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 

# % & * $1 

_3 D D 15 _1 4 (0) (1) (2) 



57F0 03 44 44 OF 00 01 04 00 00 00 00 00 00 00 00 00 
# % & * $1 $2 
— (3) _2 E 32 _2 3 3 (0.0) 



5800 00 00 00 00 03 00 45 20 00 02 03 00 03 00 00 00 



. (1,0) (2.0) (0.1) (1,1) 



{2,1} 



5810 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
(0.2) (1.2) (2.2) START OF FREE SPACE 



5820 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 
KEYS 



#=Array Type 

2=Integer 

3=StriEig 

4=Siagle PreciBion 

8=Double Precision 
7,=Array Name 
&=Number of bytes from this 

location to last byte of 

array. 
*=NurDber of dlmenaions 



$l=Slze-Ist dimenaloD 
$2=Size-2nd dimension, etc. 
(n)*Array element 

NOTE: Number of bytes 
per array element is 
equal to array type. 

String array elements consist 
of VARPTR which gives size 
and starting location of 
string. 



Table 6. This is a detail of the BASIC array storage arrange- 
ment. 
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PERSONAL 



This month we mean it! 



The Real Rules of 78s 



fl, L. Conhaim 

15506 Kiamichi Rd., Apt. 1 

Apple Valley, CA 92307 



No one wants to pay any 
more than necessary, with 
the high cost of borrowing 
money these days. But, few peo- 
ple realize that early payoff can 
save something from the inter- 
est portion of a loan. The ques- 
tion is, how much can you save? 
There's a formula that many 
banks and loan companies use 
called The Rule of 78's. It gets 
its name from the fact that the 
numerical value of the months 
in a year, when added together, 
total 78. That is, 1 + 2+ 3 + 

+ 12 = 78. The formula 

used to determine the rebate is: 



Rebate = *^l^'V+ J-H?l^'" x FC 
n" + n 



where n = total number of pay- 
ments in the contract, k = the 
number of payment periods al- 
ready passed at early payoff, 
and FC=:the total finance 
charge (interest) in the original 
loan. 

Take the case of a person 
with an original contract of 36 
months which has a total inter- 
est of $467.24. How much could 
he save if he paid off at the 15th 
month? Plug the numbers into 



the formula and out comes 
$162.06 or almost 35 percent of 
the original finance charge. 

A pocket calculator with 
square root capability could 
give you the answer to the prob- 
lem. But, suppose you'd like to 
see how much could be saved at 
the 16th, 17th and all subse- 
quent months? That's where 
your computer outshines the 
laborious calculator method. 
With a simple program like that 
shown in Listing 1 , you can print 
out all the answers in just a cou- 
ple of seconds. 

The program is short and 
straightforward. You just enter 
the three variables which are 
printed out for recordkeeping 
purposes. If you don't need a 
printout, change the LPRINTs 
in Iines60, 70, 80, 130and140to 
PRINT commands. 

The variable X is used to stop 
the program for every 12 output 
lines so the answers won't scroll 
off the screen. Typing CONT re- 
starts the printout where it left 
off. Line 120 stops the execution 
of the program when the payoff 
month equals the number of 
months in the contract. 

The left bracket symbol (() in 
line 100 is the exponentiation 
sign, and in many computers 
and printers is shown as an up 
arrow {t).B 



10 REM "RULE OF 78 REBATE CALCULATION" 

20 CLS;INPUT "ENTER TOTAL FINANCE CHARGE'';FC 

30 INPUT 'ENTER TOTAL NUMBER OF MONTHS IN CONTRACT" jN 

40 INPUT "ENTER NUMBER OF PAY-OFF MONTH" jK 

S0 CLS:LPRINT "TOTAL FINANCE CHARGE « ")FC 

60 LPRINT "TOTAL MONTHS IN CONTRACT ")N 

70 LPRINT "FIRST PAY-OFF MONTH "jK 

80 LPRINT TAB(10)( "PAY-OFF MONTH REBATE" 

90 X>0 

108 RB- (( (N-K+1)«(N-K))/(NI2+N)) "FC 

120 IF K*N GOTO 200 

130 LPRINT TAB(15} jK; 

140 LPRINT USING " 

150 X=X+1 

160 IF X=12 GOTO 180 ELSE 170 

170 K=K +1:G0T0 100 

180 X=0 :STOP 

190 GOTO 170 

200 END 



##,###. lt#";RB 



Program Listing 1 



TOTAL FINANCE CHARGE 




467.24 




TOTAL MONTHS IN CONTRACT 


36 




FIRST PAY-OFF MONTH 


15 






PAY-OFF MONTH 




REBATE 


15 






162.06 


16 






147.33 


17 






133.30 


le 






119.97 


19 






107.34 


20 






95.41 


21 






84.19 


22 






73.66 


23 






63.84 


24 






54.72 


25 






46.30 


26 






38.59 


27 






31.57 


28 






25.26 


29 






19.64 


30 






14.73 


31 






10.52 


32 






7.02 


33 






4.21 


34 






2.10 


35 






0.70 


Sample Problem 
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SINCE YOU 

COULDN'T 

WAIT...... 

WE DIDN'T 




niTRODUCES THE 

FIRST Of A SERIES 

OF ACTION PACIED. 

HIGH RESOLUTION ^^,. 

COMPUTER SlMULATIOirS. 



nETEDK 




BTDRh 



19SJ 



CONTAINS HIGH-«E50U TION. SOLMi ENHANCED 
HSFKBLASTb,COCHPITPEKSPrnr\i.\ABUBLF SKILL 
LFVEL. ACTOMATICMlLTl-G*MFSCClKF7*LLl ANL. 

JOYSTICK <ji'F:K*noN.ijo>sTi( n not inclidhu - 

EXCLUSIVELY DESIGNED FOR 

TRS-«(l' COLOR 
K\TR.M)ED COMPUTER 

Srnil rhcrk or n<.in^y i.r<lrr •IZ.9.> 
/ 1MB : ILLI'IiTRAIKII MEMORY B^^k^ 
'■'; P.O. BOX 289 
i WrLLIAMSTOWN, MA 01267 1^467 

■ATF<AL?F.M*RKOF7ANm COHPOKATION 



New 
Products 

For the TRS-80* 

MODELS l&l 



Digital I/O Port 

^^ + teaching newsletter 

^^^^^ri 8 TTL outputs, 6 inputs: assembled & 

^^^^^^^^ tested PC board: control ttie outside 

i^^^g^g world from BASIC or TBUG. lowest 

^^^^^^^^ price available S47 sample news- 



1^"^^^^^° 



TTY-interface 

^^^......-fT^ low cost printout 

^ ^ "^ ^ convert any ASCII or Baudbt teletype 

ftVjs- 'o 3 TRS-80 printer; no expansion 

^^^i"^""^ interlace needed S62, optional loop 

supply S30; write for more info 



LIGHT* PEN 

with sophisticated software 

add excitement to your software. LTPEN-80 adds 
four new functions to BASIC in an inslant, pick any 
(X,Y) point or cfiaracter position on the screen 
simply by pointing the pen!: enhance games 
simplify user entry S27 



^ghf^ 



:i^ 



all prices include postage 
inlo'mation 



call or write for more 



also need a printer but lack a Teletype'' see 

William Stfube ad in tfiis issue 






' @ for more info. call@ 

717/733-47B9 
electronic innovations 



TRS-80 & OTHER NIEDS FILLED FOR LESS 

+ + + COMPATIBLE DISK DRIVES WITH POWER SUPPLY AND CASE— 90 DAY WARRANTY + + + 
•40TflACK(102,400BYTE/DISK)DISKDRIVEWITHP.S,ANDCASE S29S 

- 8 IN. DRIVE & P.SJCASE $689 WITH P.S./CASE FOR 3 DRIVES $879 

• 80 TRACK (204-8K BYTE) 399 

* 4-DR1VE CABLE $28 " 10 D1SK&5 IN. ® $24« IN. @ $36 HARD CASE $3 & S 

BASE 2 PRINTER SS99 EPSON MX— 80 PRINTER— CALL MICROLINE 80 PRINTER S399 



S699 



MICROLINE 82 $549 



CABLE @ $25 
$829 



•CENTRONICS 737 
' MICROLINE83 

■ LEEDEX 12 IN B&W MONITOR $114 LEEDEX 12 IN B&G MONITOR $138 

'APF10INB&W MONITOR $109 

■300BAUDMODEM(ORIG/ANS)S115.ANDUP+ + + + + + + + 16KMEMORYSET(200NANO)$23 
• 16K MODEL III RADIO SHACK SYSTEM $849 

' APPLE, ATARI, RADIO SHACK HARDWARE/SOFTWARE DISCOUNTED, A/R, A/P, G/L, P/R FOR 
$200 or S59 .a. (MODEL 1) & S329 or S80 «a. (MODEL 2). APPLICATIONS INTERACT & ARE COMPLETE & 
PROFESSIONAL. WILL RUN ON OTHER COMPUTERS THIS IS A SPECIAL INTRODUCTORY PRICE 

■ ASK FOR FREE FLYER WITH OUR LOW PRICES-DEALER INQUIRIES INVITED MASS. RESIDENTS ADD 
5»/o TAX—FOB. TEWKSeURY- FREIGHT EXTRA 

MIC. VISA OR CHECK ACCEPTED. TRSBO IS A REG TRADEMARK OF TANDY CORP ^^105 



.OMNITEK SYSTEMS. 



.1899 MAIN ST., TEWKSBURY, MASS. 01876 CALL 617/851-4580 . 



1 



noTi ohJvJrp'- 




Model 488-808 For Modal 1 Operation 



fflf»MHtlJ^F< 



Model 488-80C For Model 3 Operation 



IEEE-488 TO TRS-80* INTERFACE 
Everything needed to add powerful 
BASIC GPIB-488 controller capability to 
TRS-80 Model 1 or 3, Level 2 or DOS witii 
a minimum of 16K. 

488-80B or 488-80C $245. 

+ shipping, insurance & tax 
WHEN ORDERING SPECfFY DISK OR TAPE 

SCIENTIFIC ENGINEERING LABORATORIES 

11 Nell Drive • Old Bethpage. NY 11804 
Telephone: (516) 694-3205 ^^29i 

'Trademark ot Tandy Corp. 

There is no aflilialion between Scientitic Engineering 

Laboratories and Tandy Corp. or Radio Shacii. 



EPROM-80 FOR TRS-80 

Programmer lor 2700 Type EPROMs 
(2704/08, 2758, 2716, 2732, 2732A, 
Mostec 2764, Intel 2764) 




The logical solufion to EPROM programming! One program 
tor all type EPROMs. Timing under software control. 28 pin 
zero insertion force socket. No external power supplies 
required 36" ribbon cable connects directly to expansion 
Interlace. Average programming time 100 seconds per 1K 
bytes. Includes prooram on disc and cassette. Program 
operated in two modes. Mode 1: EPROM type select. Program 
prompts user to set 4 toggle switches depending upon 
EPROM type. Mode 2: Type ot action: Reads one EDTASM 
file from disc or cassette (assembled anywhere) into butter 
Reads EPRQM data into tiutfer. Writes buffer data to EPROM. 
Automatic verify after write. And More. Minimum require- 
ments: TRS-80 LEVEL 2, 16K RAM PRICE $290.00. 

CANTECH DATA ^483 

7826 W. ARGYLE, NORRIOGE, ILL 60656 
PHONE (312) 887 0161 



LISP 



INTERPRETER FOR THE TRS-80* 

See the August. '79 issue of BYTE 
to find how easy it 15 to use lisp. 

■ Includes more thaf^ 50 functions Si 
predicates. 

■ Written in Assembly Language for 

HIGH-SPEED operation. 

■ fuli- arithmetic capability. 

■ lisp source fik>m keyboard, 
cassette, or disk. 

■ Output to screen or printer 

■ Complete syntax checking with 
detailed error codes. 

■ user's manual 

■ Supplied on cassette for 1 6K-4eK 

LEVEL II. 

Price: 49.95 

USER'S Maual only S5.00 (applicable to 

LATER purchase OF SOfH'WARE). 

Cyber Innovations 

WORLD TRADE CENTER 

P. O. BOX 58657 
Dallas, Texas 75258 ^259 

*Trademark of Tandy Corporation 
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You've Written 
a Fantastic Game? 
Then We'd Like to Publish Itt 
We're looking for hot GAME pro- 
grams; 

ARCADE (HI-SPEBD GRAPHICS) 
ADVENTURE FORMAT 
FANTASY WARGAMING 
BOARD GAMES 
LOGIC & PUZZLE GAMES 

There's Gold In them there 
GamesI Write for our free 
Programmer's Kit today. 

INSTANT SOFTWARE, INC. 

Submissions Dept. 

Peterborough, NH 034S8 
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TUTORlAl 



Build a better error trap and bugs will beat a path from your programs. 



To Err is . . . 
Forbidden— Part II 



John D. Adams 
13126 Tripoli Ave. 
Syimar, CA 91342 



When the TRS-80 discovers an error, it 
shifts to either command or edit 
mode. This seems perfectly sensible: If the 
machine cannot do what you have asked it 
to, or, if continued execution will produce 
nothing but garbage, the best thing is to 
stop. Stopping execution poses no problem 
uniess you have non-program data stored in 
memory. In this case, there is no way to re 
start without losing the stored data. 

Level II BASIC incorporates a short set of 
statements that set up an error trapping 
routine. These routines deal with errors in 
two ways. One handles loss of data. An- 
other allows the computer to ignore an error 
of little consequence that occurs in a pro- 
gram so that execution can continue. For 
example, if I were taking logarithms from 
numbers generated internally and there 
was a chance a negative number could pop 
up, I might want to simply skip that number 
and go on. 

Record Student Grades 

I use a homemade program to record my 
students' grades. During the course of the 
program, individual test grades are used as 
divisors. When a student is absent for a 
test, a zero is entered until he takes a make- 
up, at which time the program changes the 
grade. Since zero cannot be used as a divi- 
sor, a potential exists for a division by zero 
error. As the program is tight on RAM 
space, I did not want to add another module 
to deal with this eventuality. 

The error trapping routine below was de- 
veloped to handle this problem. Its struc- 
ture illustrates how such routines work. 



10 ON ERROR GOTO 30000 
30000 IF ERR/2 + 1 = 11 THEN RESUME NEXT 
30010 PRINT-ERROR NUMBER ";ERR/2 + 1;"IN LINE "; 

EBL 
30020 INPUT"PHESS ENTER TO CONTINUE "2$; RESUME 

10 



The ON ERROR GOTO instruction in line 
10 initiates the routine, substantially alter- 
ing the way in which errors are processed. 
When an error is discovered, execution 
doesn't shift to command or edit mode, but 
proceeds to the indicated line number for 
further instructions. This process works 
much like a subroutine, and the instruction, 
like GOSUB, works as a paired instruction. 
When the routine has finished, a RESUME 
is necessary. Obviously, this instruction 
must be read before an error occurs and 
should be placed at the beginning of the 
program. 

The routine could be terminated at this 
point by adding the line: 30000 RESUME 
NEXT. This would cause the computer to ig- 
nore the error and branch back to the next 
program statement to continue execution. 
In my grade program, this is what I wanted if 
the error was an attempt at division by zero. 
But, if It was some other error that material- 
ly altered program output, that error would 
also be ignored. 

The 80 reports errors using abbrevia- 
tions; these codes appear on pages B/2 and 
B/3 of the manual. Computers deal with 
everything as numbers, however, and their 
conversion into letters is for human conve- 
nience. The error condition is carried Inter- 
nally as a number, which can be used in er- 
ror trapping to designate specific errors. 
The instruction ERR/2 + 1 in lines 30000 and 
30010 is for this purpose. Entering PRINT 
ERR/2 + 1 after an error occurs will return a 
number which identifies the error. The num- 
ber codes for errors appear on page B/1 of 
the manual. 



In my grade program, the error 1 want ig- 
nored isdivision by zero, error code n. Line 
30000 means, "If the error you have found is 
division by zero, forget it and pick up execu- 
tion on the line or statement following the 
error. If it is not, then drop to line 30010." 

PRINT ERL returns the line number in 
which the error happened. Line 30010 tells 
us what and where the error is, and line 
30020 stops execution so we can make 
some decisions. Possibly the error involves 
inoperable data, such as trying to take the 
square root of a negative number. In this 
case, we just want to go back to make an- 
other data entry. On the other hand, if the er- 
ror is one that needs fixing, we are going to 
have to leave the execute mode for repairs. 



Dumping Data 

After adding, deleting or editing lines, we 
cannot continue execution and running the 
program will cause data loss. If there is con- 
siderable data involved, a module can be 
built into the error trapping routine itself to 
dump data to tape before you hit the break 
key. This makes a matching loading routine 
necessary. 

There are defaults for the ERL instruc- 
tion: If no error has been made, it returns a 
zero; if the error was made in direct mode, 
such as trying to use INPUT in command 
mode, the number 65535 will be returned. 

The RESUME statement is similar to RE- 
TURN; its action is similar, but options are 
available which enhance its effect. Used 
alone, as RESUME 0, it will return to the 
statement in which the error was commit- 
ted. Run these lines: 

10 FORX= -10TO10 
20 PRINT SQR(X) 
30 NeXT:END 

Since we cannot take square roots of nega- 
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CondCHTiimum Hotel Re»ervalion Accounlmg System 
(MOD II) 

50 ; CX) uniis and resovalions loi i A months on 2 Olives, tull 
leseruation aspiay automalic urar selection, accounting on 
a jnit Dasis monthly accountng reports tw owners 

(Dealers wanted! S1S00. U.S. 

Application OeveiopiMnt Cod* for MOO (TRSOOS) 

Set ol gosuCs tor tull screen I O fite record tield Oetinition 
record read write, unpack pack, change, delete, update 
add tile record print, dale conversion, error harwiing 
Reduces any application to gosub call and logic 

S45.95 US 

Di«k Cleaner Artd Air Finer Kit MOD I & 11 

In'iuOes progiar: cleaner disk and filters tO' drive fans 
Cleans Doti neads ar>d pressure pads (Disds should Be 
Cleaned eve^y 50 hours Ic minirrnze wear t 

$29.95 U S 

Cheque oi Money order to 

DIAXIS Computer Group Ltd 

74 Cotton Or 

Port Credit Oni Canada 

L5G 'Z9 

diei 274-6732 "234 



TRS-eOBaseball... Graphics Style 




IMC Lew*) [l Ceil 

112.95 



3 IK DUk 

115.93 



NC RM)d*nltAdd4%SilMT>i 

•Hodtl IllCoavaUUi .TrwCnpftici N« A Simuliuon 

•Hifti-SpHdKichlnFLinfuaaT ■T>'a-Plar«'Cii|»bllil\ 

•.Noi Avtiubi«Fnini Oin*r Sourcn 

(•" Fm- awBiOii AllTHS^tE^nlpmMl, P«l»licr.l., k AcicuHin. 

(JrtfrVow' -l>H<>i>Ttlt-»W.2Ha 

Radio /haek 



DEALER 



Htnji ^:lFrtr4lJc■, Town A CdvuLry 



9^ X 



JTonfctair/c OoPtOfcro 



.^225 



-■V- 



7^ 



-^ HYPtRUGHT PATRCH i>- 4- 
(* Ih* ultimate in ipa<e gomei t 

y- lEAl IiWI ACTION 
^ Oa^HICS 
A 3D SIWUIATIOH 
^ lOUNQ 

^ VOICI <il ,o„ Fiavt <,f>lh.ili>r) 
*'t Q tl ( Dim ONIT 

-f 23 CREATURES 

( T*1 ■.MO li*I IHt COMPUIE I ) 
« ANIMHTED CKPHI CE 
f SOUHO 




Q^namk Report Generator 



No Programming Required 



• Maintain diffarent data files, each with iti own »et 
of internal togicsl relationihipt. 

• Permit! user to define cuitomiied report formstt 
and colurnn headings, 

• Specify arithmetic relation»hips between columni. 

• Automatic sorting and file compreision, 

• Keyed index for rapid retrieval of data. 

• Redefine index by exchanging it with other report 
columns. 

• Flexible add, delete, and list modes. 

• Edit mode allows headings and arithmetic relation- 
ship* to be altered without re-entering data. 

• List mode allows for selected range* and optional 
sub-totals 

FOR USE ON48K-'TRS-80 WOD 1 
1 DISK AND PRINTER. 

PRICE: $74.95 INCLUDES DISK 

44 PAGE BOOKLET, SHIPPING AND HANDLING. 



DYNAMIC 

i8-04 208th Street 
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SOFTWARE 



.lysde, New^brlt "lih-; 



Porttoni copyrrghieO by Microsoli, 1980 
I TBSeO II a refl.nerwl tiadamaik ol Tandy Corp 



TRS-80- 

16K- LEVEL !I 

SOFTWARE 



VACATION PLANNER $14.95 

Guides you Ihrouo^ a complete analysis ot your 
vacation oiana Gives you ideas, details coats, lets 
you cor^oare severe) flifterent vacations Fty, dnve, 
reaon. sightseeing, camping and more Organiies 
your vacation and supplies you with pnnt-ouls if you 
have a iineprmtor It you tetie your vacation seriously 
let your TRS-eO help you get the -nos! out ol it 

MINI-LEDOER 

(SMALL BUSINESS GENERAL LEDGER) 

t2e.9S 

Easy lo set jp your books with \r\is easy to ute 
program 40 account*, 80 Check* oer month, reports 
to icreen or il you have e lineprinter you can mainliln 
herdcoptea of your reports Balance your checkbooti, 
A mu«t (or a home, pan-time, o' any other business 
operation not having many transactions per month. 

To order send cash, check or money order Allow 2 
weeks extra (or personal Checks. We pay postage 
sales la« is included with price. Lasting of other 
soltwa'e available 

RAM lnt«lllg«nc« ^492 

PC Bo»986 

RanchoCaiilornia, California 92j30 

"TRS-flO IS a registered trademark 

of Tandy Corp 



1.5 






k\y ^ If You've Written 



*^i^^* 



Stateqf-the-Art Software- 
We'd Like to Publish It! 

We're looking for SYSTEM Boftware: 
DISK OPERATING SYSTEMS 
MONITORS 

PROGRAMMER AIDS/UTILITIES 
LANGUAGES 
DATA BASE SYSTEMS 
Then, sit back and collect your 
royalty checks. Write for our free 
Programmer's Kit today! 

INSTANT SOFTWARE, INC. 

Submissions Dept. 
Peterborough, NH 03458 "^^ 



live numbers, an FC message is returned. 
Now add these lines: 



5 ON ERROR GOTO 100 
100 X = X-t1:RESUME(or RESUMED) 

The trapping routine lets us increment X un- 
til the data becon^es operable. 

A line number may also be specified for 
the return point. The following lines Illus- 
trate this: 

5 ON ERROR GOTO 100 

10 F0HY=1 TO 25 

20 X = RND(20)-10 

30 PRINT X,SQR(X) 

40 NEXT 
100 RESUME 500 
500 X= -X:PRINTSQR(X):"r' 
510 NEXT 

Although square roots of negative num- 
bers cannot be expressed as real values, 
they may be represented as complex num- 
bers after the real and imaginary parts are 
computed. When a negative number is pro- 
cessed, an FC error will result, which sends 
execution to line 100. The RESUME 500 in 
that line further branches to the indicated 
line number for complex riumber computa- 
tion and printout, after which we are re- 
turned to the loop in line 10, In this case the 
routine is acting much like a flag which de- 
tects and processes negative numbers. 

RESUME NEXT returns to the statement 
following that in which the error was made. 
This is useful if we want to ignore all nega- 
tive numbers in a square root program, in 
n^y grading program, this Is what I wanted. 

Using the ON ERROR GOTO instruction 
is like flipping a light switch— It will stay on 
until W8 turn it off. It may be that we want 
this routine to operate in one part of a pro- 
gram, but not in another. In that case, the er- 
ror trapping process is disabled by the in- 
struction ON ERROR GOTO 0. The function 
can now be turned on and off at will. 

Theerrortrappingroutinediscussedhere 
is a simple one. Error trapping routines can 
be built to do some remarkable tasks. These 
'outines are more complex to construct and 
should be tested to see that they are work- 
ing properly. An additional instruction, ER- 
ROR n, is provided for that use. Look at the 
following lines: 



5 ON ERROR GOTO 1000 
10 ERROR 8 

20 



Line 10 causes the computer to behave 
exactly as it would if an undefined line error 
had been found. Any of the recognized er- 
rors can be simulated by using the number 
code for that error. In this way, routines can 
be checked for proper operation. 

Error trapping routines are very useful in 
debugging programs. Using the ON ERROR 
GOTO nnn instruction as line 1, and a suit- 
able routine at line 30000, the program can 
be cleaned up and these lines deleted after 
corrections are made. We've come a long 
way from Level I's WHAT, hOW and 
SORRY!B 
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of noi being able to read the digital 
tape counter without changing 
positions every time? 

— Then try the 

DATA VIEW 

designed to position tin 
recorder at (he propei 
angle for effortless view 
ing of the counter. 

Constructed of durable translucent acrylic 
in a beautiful smoked gray tint wUh slip 
resistant padded feet. Only 8.95 each 

TO ORDER: Send check or money order for| 
8.95 + 2,00 for shipping and handling. 
California residents add 6% sales lax. 

REMTRON ^499 

P.O. Box 2280 

Santa Clara, CA 95055 

Dealer Inq Invited NO CODS 




OPTIONS-80.. 

BOX 471 CONCORD MA 01742 



PROGRAM FOR MAXIMIZING RETURNS 
FROM OPTION INVESTING, ANALYZES 
BUY S SELL OF LISTED CALLS, PUTS, 
SPREADS X SHARES. INCLUDES COM- 
MISSIONS, RISK, COST OF MONEY AND 
DIVIDENDS. HARDCOPY 8 STORAGE TO 
DISK, ACCOMPANYING MANUAL A COM- 
PLETE S UNIOUE GUIDE TO OPTION 
INVESTING. tl25. SEND FOR FREE 
BROCHURE. .MCNEY BACK GUARANTEE. 



ATTENTION INVESTORS! 

•"^^ COMMODITY AND STOCK 

MARKET ANALYSIS 

SOFTWARE 
THE ANALYST :i 

Calculates Wilder l-dca!ors 'or CMl, RS' 
ParabCiiC/Tine Price Systems EhTinales 
rediObS calculations 

THE DRIVER A Suaero CorrTnod.ty 
and StocK Ma^Ket Analysis ^rograrr 
Adaptable to N'ost """rad.ng Systems Has 
Simulator ana Ooi'mizai.on Mode 

FOR MOO I, II. AND III 

V Uset onen[ea |jsi -oao 3'og'ai^ jij go 
v' Marker rested 

V Use commercial aaia 'les ■> -"ane you' 3wn 
•/ Grapnic caDaomries 

i/ Printer ODiions 

'.' CiSar ana comoiere aocumeniauon 

V \tonitof numerous markets in just minutes per day 
,VHi"'E ^OR ^RFE C.'\TAi_00 

MANAGEMENT SERVICES 

DEPT 80 

290: CLF.NDFNEN LANE PHONt 

LONGVIEW Tx 75601 1214)757-4558 



TRS-80* COLOR Computer 

BORED 

with SLOW Cassettes 

Put your BASIC program into 
a ROM CARTRIDGE. Instant 
run at power-up! More data 
space! IT'S EASY! Send us your 
program on cassette and we'll 
quickly return it in a ROM 
CARTRIDGE. 

Prices start at $45.00 
(Quantity Discounts Available) 

Egen 

Sysiemt P- O. Box 10234 

Austin, Texas 78766 
(512)837-4665 

— Assembly Language Rom Cartridges 
—Custom Programming Services 
TRS*-80 is a trademark of Tandy Corp. 



Eiaci ReDiacerren 

BCXOMPCO PRINTER RIBBONS 
or CARTRIDGE RELOADS 

IHEAVV INKING- LONGER LIFEI 
''P'S-SOn CENTRONICS* _PPJCE(PACK 

11 00 '3 PACK 
1 1 OC ■ 3 PACK 
9 X/ RELOAD 



LP I (26 K13I »779 700-704 
LPII(26-1413| »730 

l-P III or V !26 Midi ^ ^^ 

II iVOU iimSEHT in CARTRIDGE" I 2' 00/3 PACK 
LP I V (26-14131 11737 ■\ OCOI'ACK 

LP VI (26-14181 9 OO'RELOAD 

_yi lYOU iNSERl IN CARTR DGE I 21 00/3 PAC* 

NEW (O' l-ie DA.SY WHEEL 11 
Mi.Mi-StfiKeCaftxinF.im i26-'419) ?1 00/3 paCk 
Mjlii Sir Cartxi- f iiri Reload 1S OC. 3 RELOADS 
Nev. i ong Liie '^aDric Reload 9 (X' RELOAD 



SEND PRINTER NUtVBER and/or 

OLD CARTRIDGES ((Of Reloads) 



MODEL II 8 " GAME DISCS 

VOlUIV E I V0LUM& 2 

Biorf-y'-ims. Trap Ugly. B rgo 

ConcenKaiicn Towe's BiacK(ac>> 

Rio Cord ■'aci! Sea Fa-Hf Cfiomp 

- 4 IVc'e S?4 95 aer vciufre + 5 Mo-p 



SEND CMFCK or tvtONfcY ORDER TO 

BCCOMPCO -^^? 

800 South 17 . Bon 246 ■ 417-932-4196 

Suri'me^svil e Mo 655?1 

rRS 80 IS a iiade^idfK o( "adio SriacK, d Tardy Corp 
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c::oMf=>i_n-E:f=^ 

16K. Keiory Conversion Kit % 59.95 
32K. hetory Conversion Kit ill9.95 
32K. Kit (for l&K.systei) % 59.95 
KIT Less deiory (each) $ 12.00 

Kits can be installed inside the 
COLOR COHPUTEfi Hithin 15 linutes, 
coaes Mith Ketory Test Progru, 
and are coipletely GUARANTEED 

CULPEPER COMPUTER DESIBNS 
502 SOUTH EAST STREET ^-484 
CULPEPER, VIRGINIA 22701 ,, 
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If You've Written 

a Useful Program- 

We'd Like to Publish W 

We want programs for 
INDUSTRIAL applications: 

JOB COST ESTIMATES 
INDUSTRIAL (PROCESS) CONTROL 
JOB TRACKING 
MACHINE SCHEDULING 

Get published and earn royaltlesi 
Write for our free Programmer's 
Kit today. 

INSTANT SOFTWARE. INC. 

Submissions Dept. 

Peterborough, NH 034S8 
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80 Microcomputing does not keep 
subscription records on the premises, 
therefore calling us only adds time 
and doesn't solve the problem. 

Please send a description of the prob- 
lem and your most recent address 
label to: 

80 Microcomputing 
Subscription Dept. 
PO Box 981 

Farmingdale, NY 11737 



T'lank you and enjoy your suDscnplion, 



INTERNAL MEMORY" 

48K NOW AVAILABLE! 



TRS-80 
MODEL I 
LEVEL II 




MwiDry eipiniion nsed twt b« txpgnthe or dIMIculL IKTERNAL 
MEMORY" bovdi sicurtd RAM cipicHy lo3ZK|!M-1! Dr4eKllM 
2 INSIDE the kevboird unit wHh no suldenng. cutling or olFiet 
modJIIcfllons IRemove TRS-BO" RAM i^ip S plug IM Into RAM 
sockits.i NO piggytiick' cmps: NO heil noist or power 
problemtl CDrnpatiUle with higti-speed tape sysiems. pHlpnnalE 
iDd lisrttware motlilicalio'is {describe wtiil you have] Auembled 
& teslM. one year guannlee postpild UPS in CoiK U S SfNQ 
S.AS.E FOROliO INl'ORMAIION 
PRICES: 



IM-II32KI 

IM-2I48K! 

41l&3(200ns|RAM 



$52.50 (less RAM) 
S79.50 (less RAM) 
$26.00 per set D(8(ieK) 



.'^./.. 
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6246 Wut 3705 South 

Silt Lake City. UT B4170 

18011967-2324 
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.^See List of Adveriir.ers on page 306 
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GENERAL 



OfARPS and Moogs and 80s. 



A Quick 

Riff on Synthesizers 



Dave Keen and Dave Dischert 

RD 1, Box 432 

State Highv/ay 83 

Cape May Court House, NJ 08210 



Do you remember what occupied your 
spare time before you bought your 
computer? Was it ham radio? Stamp col- 
lecting? Model railroading? 

We played music. We used the big ARPs 
and Moog synthesizers for live performing 
and recording. That old flame was ignited 
again with the recent appearance of several 
music synthesizers for the TRS-80. 

Tone generation is not too difficult on the 
'80. Many of the games on the market utilize 
the notes and sound effects created by tog- 
gling flip flops at the cassette port. 

But j^usic is more than a sequence of 
notes. It requires polyphonic voices, that 
is, many notes played simultaneously; os- 
cillator waveform selection (square, sine, 
sawtooth, triangle, pulse); dynamic control 
of the composite waveform's harmonics; 
most important, a low pass filter with vari- 
able cut-off frequency (and preferably 
variable Q or resonance); and a volume con- 
trol. 

Such bare bones features are found on 
even the cheapest piano keyboard style 
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electronic synthesizers. 

ARPS and Moogs 

Let's briefly examine how sounds are 
created on performance synthesizers. 

In 1964, Robert Moog produced a system 
of dc voltages that controlled various 
parameters such as frequency, filtering and 
volume. 

A piano style keyboard, set up to output 
dc voltages in relation to each key, con- 
nects to one or more oscillators. These 
VCOs (voltage controlled oscillators), are 
capable of producing several waveforms. 
Each shape is made up of different over- 
tones (see Fig. 1). It is important to be able 
to select these shapes as they determine 
the resulting sound. 

A sine wave is a pure tone with no over- 
tones. Square waves have a hollow sound. 
Squeeze the sides of a square wave to- 
gether and you get a pulse waveform. This 
reedy, nasal tone is useful in duplicating 
saxophone sounds. Violins and brass ef- 
fects can be simulated by first starting with 
a sawtooth. 

Most manufacturers use oscillators 
which respond to one volt per octave. If, for 
example, an oscillator played a middle C, 
then raising its input to two volts would pro- 
duce a C one octave higher. You can see the 
precision needed in designing oscillator 
controllers. Ifthevoltageisoff by as little as 
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Fig. 1. Waveforms and Their Composition 
294 • 80 Microcomputing, July 1981 



one-twelfth volt, you're playing in another 
key! 

Random noise generators, creating 
white, pink or low frequency sounds, are 
also used to effect explosions, surf, wind, 
earthquakes, as well as percussion instru- 
ments. 

As shown in Fig. 3, output from various 
sources are mixed into one composite sig- 
nal as they move down to their next modi- 
fiers, the VCF, {voltage controlled filter), 
and then to the VGA (voltage controlled 
amplifier). 

Envelope generators monitor these latter 
two devices. They create a slowly varying dc 
voltage that controls the cut-off frequency 
of the filter and the attenuation (volume) of 
the amplifier. 

When the musician hits a key, three 
things happen. A dc voltage is produced to 
feed the oscillators; a gate pulse Is created 
for as long as the key is depressed (typically 
zero volts when no key is held down, 10 volts 
when one is); and a trigger pulse, or short 
spike of voltage, is produced when the key 
is initially depressed. The gate and trigger 
pulses are used to tell the envelope genera- 
tors to start their pre-programmed voltage 
patterns. 

Take a look at the graphic representation 
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Fig. 2. The Frequencies of the 12-Note Oc- 
tave Standard 



of the sound of a piano note being struck 
(Fig. 4). First, the sound is loud and then 
gradually gets softer. Here, an envelope 
with a fast attack time and slow release 
time would be used to control the amplifier. 
Also, as the sound diminishes, the higher 
harmonics are lost. Therefore, another gen- 
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"An envelope with a fast 

attack time and slow 

release time would be used 

to control the amplifier." 



erator is employed to control the filter. 

From here the signal goes to the amplifi- 
er, speakers and then to you. Of course, you 
could alter the signal in other monstrous 
ways: ring modulation, reverb, echo, phase 
shifting, waveform inverting, phase locked 
loops... HELP! 
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Fig. 3. Signal Flow and Control Layout of Performance Syntfjesizer 



Now that you know a little about the crea- 
tion and modification of sound you are in a 
better position to choose the computer syn- 
thesizer that will best meet your expecta- 
tions. ■ 




-KEY PLAYED 



KEY RELEASED- 



Fig. 4. Envelope Generator Parameters: On 
a typical keyboard syntttesizer, voltage is 
developed by the envelope generator when 
a key is played. Voltage rises to a level pre- 
set by a potentiometer, then falls to a level 
determined by another potentiometer and 
stays there until the key Is released. Upon 
release, the voltage falls to zero at a rate de- 
termined by a fourth control. 
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BayQsian 

Investment 

Services 

Send for free catalog 
discussing TRS-80 
programs available for 
evaluating: 

Options & Futures 

Stocl(S & Bonds 

Convertible 

& Other Hedges 

Portfolio Position 

Tax Positions 

Market Timing 

Write or call: 
Bayeslon ^186 
lnv«stm«nt 
S«rvic«s 

Dept. H3 

757 Santa Rosita 

Solana Beach, CA 92075 

(714)755-6225 
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Does Your 

Computer Have 

the BLAAS? 


Give It 
a Dose 

of s-ioo! 


V' 



WHY S-IOO? f 

Tr>e S-100 Bus {IEEE 696) can add the 
computing POWER you need. 

rvJo prQCtJcal limit to it's CAPACITY. 

Add 32k. 64k. 128k. 256k, S12k 
or MORE Of RAM. 

I Add Bar moredisc drive unrts 

(40 MEGABYTE each) if you like. 
. More ECONOMICAL than a new system. 

I No need to add bulky expensive 
peripherals, just CARDS. 

I Many, MANY manufacturers of S-100 

(eliminating expensive sole source}. 

HOW S-IOO? 

( Adapter from S95.00 (kit) available 

for TRS-80, Pet, Apple and others. 

I Mainframes from S3IO .; 



(^OMPUTER Wrr ^Mt 

INCORPOftATED 

5620 }760 Street S.W. 

Lynnoifood, WBShington 98036 

(206) 743-4336 



formerly HUH 



'S«* Uat ol Adverllsgrs on pagt 306 
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TECHNIQUE 



Some sneaky ways to get more from your 16-bit registers. 



Undocumented 
Instructions 



Brian Cameron 
284 Albert St. 
Waterloo, Ontario 
Canada N2L 3X8 



Have you ever needed an ex- 
tra general purpose regis- 
ter? And wouldn't it be great to 
be able to split ttiose, some- 
times unused, 16-bit index regis- 
ters in half and get four more 
eight-bit work registers? Well, it 
can be done— if you know how 
to access them. 

The key to these new regis- 
ters and their instructions, is to 
precede an H or L type instruc- 
tion with a special hex code. A 
hex code of DD tells the CPU 
that you are going to use the IX 
registers and a code of FD tells 
it you're using the lY index regis- 
ter. 

Let's look at an example of 
how this is done. Normally the 
LD A,H (hex 70) will move the 
contents of the H register into 
the A register. But if a hex DD is 



put in front of the load instruc- 
tion, then the contents of the 
high-order byte of the IX index 
register are moved into the A 
register; 



DEFB ODOH ;gi¥es key to IX register 

LD A,H ;moves high byte oflX into A 



If a hex FD is used in place of 
the DD, then the high-order byte 
of the lY register would be 
moved into the A register. In or- 
der to reference the low-order 
byte of the index registers, use 
instructions that normally refer 
to the L register. In an example 
the load instruction would read, 
LDA.L. 

You can load into (and from) 
both index registers as well as 
the general registers A, B, C, D, 
and E. The HL register pair can- 
not be used since they now refer 
to the index registers. If the fol- 
lovi/ing instructions were exe- 
cuted— DEFB OFDH LD H,L— 
they would result in the lower 
half of the lY register moving in- 
to the upper part of the same 
register. 

The load immediate instruc- 
tions also works on these regis- 
ters. For example, DEFB ODDH 
LD H,2 will load the number two 
into the high order byte of the IX 
register. Add, and add with 



carry, and subtract, and sub- 
tract with borrow instructions 
can be performed between the 
high and low bytes of the index 
registers and the data in the ac- 
cumulator. It is also possible to 
increment, deqrement, com- 
pare, AND, OR^and EXOR be- 
tween the accumulator and in- 
dex registers. 

Another instruction on the 
general purpose registers, in- 
cluding the H and L registers, 
will take the contents of the reg- 
ister, multiply by two and add 
one {r=rT-H 1). I called this 
DUPING In the table. This re- 
quires two bytes. The first con- 
tains the hexadecimal value CB. 
The second contains the regis- 
ter the operation is carried out 
on. 

In Table 1 HX and LX are used 
as names for the high-order and 
low-order bytes of the IX regis- 
ter. I use HY and LY for the lY 
register. The lowercase n, used 
in the immediate type instruc- 
tions, Is the symbol for a num- 
ber. 

By using these undocument- 
ed instructions, not only do you 
free up extra registers for gener- 
al work, but a certain amount of 
protection is added to the secur- 
ity of your programs. Most dis- 
assemblers and monitors do not 
support these extra instructions 



and will display what appears as 
data areas right in the middle of 
your programs. ■ 

'Editor's Note; These opcodes are not 
tested during production of the Z80 Chip by 
Zllog. It is possible, in a str^all number of 
cases, that any of these opcodes may not 
work. 





Table 1 




MNEMONIC 


OP CODE 


LD 


HX,A 


DD67 


LD 


HX,B 


DD60 


LD 


HX,C 


DD61 


LD 


HX,D 


DD62 


LD 


HX,E 


DD6 3 


LD 


LX,A 


DD6F 


LD 


LX,B 


DD68 


LD 


LX,C 


DD69 


LD 


LX,D 


DD6A 


LD 


LX,E 


DD6B 


LD 


HY,A 


FD67 


LD 


Hy,B 


FD60 


LD 


HY,C 


FD61 


LD 


HY,D 


FD62 


LD 


HY,E 


FD63 


LD 


LY,A 


FD6F 


LD 


LY,B 


FD6a 


LD 


LY,C 


FD69 


LD 


LY,D 


FD6A 


LD 


LY,E 


FD6B 


LD 


HX,n 


DD26 


LD 


LX,n 


DD2E 


LD 


HY,n 


FD26 


LD 


LY.n 


FD2E 


ADD 


A,HX 


DD84 




Table continues 
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ADD 


A,LX 


DD85 


ADD 


A,HY 


FD84 


ADD 


A.LY 


FD85 


SUB 


A,HX 


DD94 


SUB 


A,LX 


DD95 


SUB 


A,HY 


FD94 


SUB 


A,LY 


FD9 5 


INC 


HX 


DD24 


INC 


LX 


DD2C 


INC 


HY 


FD2 4 


INC 


LY 


FD2C 


AND 


HX 


DDA4 


AND 


LX 


DDA5 


AND 


HY 


FDA 4 


AND 


LY 


FDA 5 


XOR 


HX 


DDAC 


XOR 


LX 


DDAD 


XOR 


HY 


FDAC 


XOR 


LY 


FDAD 


DUPING A 


CB37 


DUPINC B 


CB30 


DUPING C 


CB31 


DUPINC D 


CB32 


DUPINC E 


CB33 


DUPINC H 


CB34 


DUPINC L 


CB35 


DUPINC (HL) 


CB36 


LD 


A,HX 


DD7C 


LD 


B,HX 


DD4 4 


LD 


C ,HX 


DD4C 


LD 


D,HX 


DD54 


LD 


E,HX 


DD5G 


LD 


A,LX 


DD7D 


LD 


B,LX 


DD45 


LD 


C,LX 


DD4D 


LD 


D,LX 


DD55 


LD 


E,LX 


DD5D 


LD 


A,HY 


FD7G 


LD 


B,HY 


FD44 


LD 


C,HY 


FD4C 


LD 


D,HY 


FD54 


LD 


E,HY 


FD5C 


LD 


A,LY 


FD7D 


LD 


B,LY 


FD45 


LD 


C,LY 


FD4D 


LD 


D,LY 


FD55 


LD 


E,LY 


FD5D 


LD 


HX,LX 


DD65 


LD 


LX,HX 


DD6G 


LD 


HY,LY 


FD65 


LD 


LY.HY 


FD6C 


ADC 


A,HX 


DD8C 


ADC 


A,LX 


DD8D 


ADC 


A,HY 


FD8C 


ADC 


A,LY 


FD8D 


SBC 


A,HX 


DD9G 


SBC 


A,LX 


DD9D 


SBC 


A,HY 


FD9C 


SBC 


A,LY 


FD9D 


DEC 


HX 


DD25 


DEC 


LX 


DD2D 


DEC 


HY 


FD25 


DEC 


LY 


FD2D 


OR 


HX 


DDB4 


OB 


LX 


DDB5 


OR 


HY 


FDB4 


OR 


LY 


FDB5 


CP 


HX 


DDBG 


GP 


LX 


DDBD 


CP 


HY 


FDBC 


CP 


LY 


FDBD 
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CONVERT YOUR TRS-80 MODELI INTO A 

DEVELOPMENT SYSTEM 

Now yoL can oevewp Z-80 based, siana dione devices sucn as games 'obo!s. 
inslrumenls and peripheral controllers, Cy asng yogr TRS-80as aaeveiopfenl system 
The DEVELOPMATE plugs into the expansion connector of your IHy ao and adds 
PROM PROGRAMMINQ and IN-CIRCUIT-EMULATION capabilities to your 
sysieni (with or withoi-t expansion interlace) 

Cunipitle instructions and sample schematics are included id tielp you design your 
own simpie standalone microcomputer systems THESE SVS'^EUS CAN BE AS 
SIMPlF as four ICs oneTTL crcuH for clock and reset, a 7-90. an EPHOM ^^<J 
one peripheral interface chip 

Wtien file In-Circuit-Emulatioi caole is plugged 
into the Z-80 socket of your stand alone systert-. 
the system becomes a pari of your TRS-80 Yoj 
can use the lui' power of your editor 'assembler s 
debug and trace programs to check out both the 
hardware and the software Simple test loops 
can be used to check out the hardwafe. then the 
system program can be tur to debug the logic of 
your stand-alone oevice 

Since the program is kepi n TRS-80 RAW 
changes can ae made quickly and easily When 
your stand-alone device works as desired you 
use the Deveiopmate s PROM PROGRAMMER 
to copy the prog-a'" into a PHOM With this 
PROM and a Z-BO in place of the emjation 
cable your stand-alone device will work by itself 

The DEVELOPMATE is extremely compact Both iMe PHOM programmer and Ihe 
In-Circuil- Emulator are in one small plastic txx only 3 2-54 A line plug mounted 
power supply IS included "^he PROM programmer has a personality module' which 
defines the voltages and connections ol l^e PHOM so ihai 'uture devices can be 
accommodated However ihe system co-ies with a universal personality rnodule 
which handles 2758.2508lBKi 2716 2bi6(16K| 2b32(32K| as well as Ihe new elec- 
tncallya.lerable 3816 and 4801 6(16KEEPRQUs|. 

irte COMPLETE DEVELOPMATE 81. with software, power supply, emulation 
caDle. TRS-SO cabie. and uriivetsal personality module, is ONLY $329' 
The PHOM PROGRAMMER is available separately lor ONLY $239 
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ORION INSTRUMENTS 

172 Otis Avenue Depi M Woods ide. C A 94062 

(<115l85M172 

Master Charge and Visa pnoi-e orders accepleo 

California residents please add 6° o sales tax 




OMHITEftM - Thi Ultlmiti TftS-n" Terininal Package is flow avallablB afler nearly 2 
years \n the making Criated as a result et dissatisfaction with etisting teMTtinal 
programs, OMHfTEIIM is the Mod Pimrlul and FhxIUe microcompuler intemgent 
terminal prograin at any price - Bit Uni. Now the TRMIT'can conimtinicate with 
and trartster files to almost any computer systerrWIIIwut writing special sottware, 
OMNtTERM solves the prablerrt ot computer systems that senfl 32, 40, or 80 column 
lines to your 64 column TRS-BO" by ftitornattlBg your screen lor easy reading, 
OMNITERM can compensate tor IncompaTtbiiides with 7 different rransiation tables, 
one to and tram each device. This capability even allows DMIttTEnM to use^ cades 
such as EBCOfC.and translate them to the TRS-ao"! KSCII. With OMWTERM you can 
even Rtvlm text ttvat has SerDlltd 0(1 the Serunt Ai ai^y time you can examine and 
charge any at OMHITERM'i settings, because OMNITERM gives you a Full Stttw 
Bt^iy of all functions. It works with all ROM't and DOS'i since it uses only oftlcially 
documented calls. 

• SpoolKl Prinlir * Trul Bruk Key • Dipnt Key , 

• Single Key ftufo Slgnaii • X/Y Cunor Contrnl • Lawir Citt Suppwt. \ 

• l^nipttd File Output • Xw/XoK File Control • Can Echo Characters , 

• Sends Sptciil CtitrKUn not on the TRS-80 keyboard ^ ' 
I • Contrt^-G (^uses "Bhp" sound and Gnplik Bott to t!ash on the screen. 
'; • Accepts all standard Vlflf OTEX™ control codes 

• Can configure the UHIIT lor baufl rales from 50- 19.200 ha Jd, , ^ 

• Can send text %\tm\-^ for computers that work at "tyBisf speed.' 

• Keeps conttnuous coum ol Pirfty, Fnmtrq. and (Jwimin errors, 
,' • Snit a special tile with proper settings for each different use . ."^ ' 

• Includes: 75 page manual. Text EAtor, Hex Cwivmion UDIIliM, 

Evetyotte whe sees OMHITtflM is Anaiid by ds Powir and Em si Uiil flecjuires 
TBS-BO KbIiI I or III wrlh 32K iremory, 1 disk $95 (plus shipping it C.0.0.) Call (ar 
shipment wilhm 24 ho\jrs. Manual alone SI5, refunded with purchase Visa, M/C, 
and G D. accepted Mass residents ado 5% sales tax Dealer Inquiries Invited. 

^ndbG rgh Systiems 

498 fleechmont Street. Worcester, MA 01609 1617; 799-221' ^ 391 



^See L'sr ol Advertisers on page 306 
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BINDERS 

order 
yours 
today 



Keep your library of 60 Miaocornputing safe from loss 
or damage in these handsomely appointed binders with 
rich dork green covers and gold lettering. Each binder 
holds 12 issues making on EXCELLENT REFERENCE HAND- 
DOOK. Severol binders form a quolity library you con be 
proud of. 

17.50 eoch, , 3 fo' 121.75 ,. 6 for U2.00. . . 
Postage poid in USA. Foieign orders pleose include S2.50 tor posioge 

Specify 1980 or 1981 

Send check or money order only to: 
80 MICROCOMPUTING BINDERS 
P.O. Box 5120, Phila.. PA 19141 

*Ho" 6-8 weedi 'O" Oetivcy PI»oip no C O.D. oide'i no phone otdni 



IS 



HfiRD CDPV 



STDRflGE WMt 



a problem? 






Here's the ideal wav to keep your 
growing collection of SO Micro- 
computing in order! The 80 Micro- 
computing Library Shelf Boxes. 

sturdy, corrugated, white, dirt-re- 
sistant boxes will keep your issues of 80 M icrocomputing orderly 
and available for constant reference Self-sticking labels are 
available for the boxes, too, not only for 80 but also for Kilobauril 
Microcomputing. 73 Magazine. CQ. QSJ. Ham Radio. Personal 
Computing, Interface Age. Byte and Radio tiectronics A^k for 
whichever labels you want with your box order Each box holds a 
full year of the above magazines Your magazine library is your 
prime reference Keep it handy and keep it neat with these strong 
library shelf boxes. One box{BX1000) is $2 00, 2-7 boxes (BX1001) 
are $1 50 each, and 8 or more boxes (BX1002) are i^ 25 each Be 
sure to specify which labels we should send. Shipping and han- 
dling charges are $1 00 per order Call in your credit card orders 
on our toll free line 800-2 5 8- 547 3, or use the order card in the bacl^ 
of the magazine and mail to. 



l^Q microcomputing 



Peterborough. 
NH 03458 



I'lpiisf j!low 4-h wpeks lo' He iv.Ty No C OD oidr 



..pl.-H 




While they last . . . 

the complete year of 1 980 80 Microcomputing 
(in its own shelf box. . . a $2.00 value— Free) 
for only $25.00.* 

Did you miss the 2,256 pages of useful information published for your TRS-80' " in 80 Microcomputing last 
year? Now is the perfect time to catch up for only $25.00. * 

In the first year of SO Microcomputing here were 335 articles on your TRS-80— 2 V2 times more than any other 
computing magazine. Also in 1980 there were new product reviews, news and columns and best of all hun- 
dreds of dollars worth of useable programs. 

So to unlock the key to your TRS-80 and double its value . . . send in today for the complete year of 1980. 80 
Microcomputing (in its own shelf box) for only $25.00.' 

We have a limited number of these complete sets so send in the card today or call our toll free #800-258-5473 
and charge it to your VISA, MC or AE card. 

'plus shipping and handling ($3.00) "TRS-80 is a Trademark oj Tandy 

^(^® I 

U i^^^g I want a year of 80 Microcomputing for $25.00 plus 

$3.00 for shipping and handling. Plus I'll receive a shelf box to store 

them in. 




. -1 Check enclosed for $_ 

Name 

Address 

City _._^____ 



State. 



Zip_ 



Please allow 4 to 6 weeks for delivery 

80 Microcomputing * 80 Pine Street • Peterborough, N.H. 03458 

Toll free ordering number 800-258-5473 
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—BASIC & PASCAL— 



— BaSINESS— 



"N 



^^ 




»r^ 



^e 



►>t^ 



• SOBASIC£XERCISE$-BKl192-bvJ P Lamoilier 
This booti IS st'ucluted around ihe idea thai the Best 
way 10 learn a 'anguage is through actual poct'ce II 
contains bO completely explained exercises stale- 
meni and analysis of the problem, flowcharts. p<o- 
grams and actual runs. Piogram subjects include 
mathematics, business, games, and operalions re- 
search, and are presented m varying levels o1 diffi- 
culty. This 'ormai enables anyone to leam BASIC rap 
idly Checking irieir progress at eacti step S12 95' 

• THE BASIC HANDBOOK- BK1174-by David Lien 
This Dooti 13 unique It is a virtual ENCYCLOPEDIA of 
BASIC While noi lavo'ing one computer over another. 
It explains over 250 BASIC words, how lo use Ihem and 
aiternaie strategies if a computer does not possess 
Ihe capabilities ol a needed or specified word, there 
are oHen ways to accomplish Ihe same 'unction by us- 
ing another word or combinalion o' words. Ttiat s 
where the HANDBOOK comes m It fielps you get the 
most from your cornputer, be "t a botlom ol-ttie-line" 
micro or an oversized monster $1495.' 

• LEARNING LEVEL ll-BK1175-by David Lien Wr.l- 

ten especially (c the TRS-80. ihis book concentrates 
on Level II BASIC, exploring every imporianl BASIC 
language capability Updales are included for those 
who have siudied the Level i User s Manual Sections 
include ho* to use ttie Editor, dual cassette opera- 
tion, printers and peripheral devices, and tfie conver- 
sion ol Level I programs lo Level II J15.95 ' 

• BASIC BASIC (2ND EOITIOH)-BK10a6-by James 

S Coan This is a lexlbook which incorporates the 
learning ot computer programming using ifie BASIC 
language with ihe leaching of mathematics Over 100 
sample programs illustrate the techniques ot Itie 8A 
SIC language and every section is followed by practi- 
cal problems. This second edition covers character 
string handling and Ihe use of data files $10.50 ' 

• ADVANCED BASIC-BKtOOO-Appiicalions, includ- 
ing sl'ifqs ana dies coordinate geometry area, se- 
quences and series simulation, graphing and games 
SI0 75- 

• SIXTY CHALLENGING PROBLEMS WITH BASIC 
SOLUTIONS (2nd Editioni— BK1073— by Donald 
Spencer, provides the serious student of BASIC pro- 
gramming wilh interesting problems and solul ions. No 
knowledge of math above algebra required Includes a 
number of game programs, as well as programs lor 
financial interest, conversions and numeric manipula 
lions S6 95.' 

• PROGRAMMING IN PASCAL— BKIIiO-by Peier 

Grogono. The computer programming language 
PASCAL was the first language to embody in a coher- 
eni way the concepts ol structured programming, 
which has been defined by Edsger DItkstra and C.A.R 
Hoare As such, il is a landmark in the development o' 
programming languages PASCAL was developed by 
NikiausWutn m Zurich, it is derived from the language 
ALGOL 60 but IS more powerful and easier lo use 
PASCAL Is now widely accepted as a useful language 
ihal can be etlicienlly implemented, and as an ex- 
ceiienl teaching tool II does noi assume knowledge ol 
any other programming language, it is therefore suit- 
able for an introductory course Si! 95 " 



• PASCAL— BKlia8—by Paul M. Chirllan. Professor 
Cnirhans lextoook combines a simple approach to Ihe 
PASCAL language with comprehensive coverage on 
how a computer works, how to use a flowchart, work- 
ing from a terminal as well as liatch operation and 
deougglng Special alteniion is paid lo idiosyncrasies 
of the language and syntax flowcfiarts abound 'or the 
convenience of the experienced programmer. Well In' 
dexed. $1295' 

• INTRODUCTION TO PASCAL-BKl 189-by Rodnay 
Zaks. A step-by-step mtroduclion tor anyone wanting 
to learn the language quickly and completely Each 
concept IS explained Simply and in a logical order. All 
leaiures of the language are presented in a clear, easy 
to-understand lormat wiih exercises to lest the reader 
at the end ol each chapter. It describes both standard 
PASCAL and UCSD PASCAL, the most widely used 
dialect lor small computers No computer or program- 
ming experience is necessary. S14.95 * 

—GAMES— 




■ PAYROLL WITH COST ACCOUNTINQ-IN BASIC- 

BK1001 — byL Poole S M Borchers. includes piogram 
hslings with remarks, descriptions, discussions of the 
principle behind each program, 'iie layouts, and a com 
plete user's manual wilh step by step msiruciions. 
flowcharts, and simple reports and CRTOisplays Pay- 
roll and cosi accounting features include separate 
payrolls lor up to 10 companies, iime-tested mterac- 
live data entry, easy correction o' data entry errors, |0b 
cosling (latKir of distribution!, check printing wilh full 
deduction and pay detail, and 16 dilferenl pnnied re 
ports, including W-2 and 941 (in CBASICl (20 00 ■ 

• SOME COMMON BASIC PROGRAMS- BRt053- 

published by Adam Osborne S. Associaies, Inc Perlect 
lor non technical compulerists requiring readv lo use 
programs Business programs, plus miscellaneous 
programs Invaluable for Ihe user who is noi an ex 
perienced programmer Ail win operate in the stand- 
alone mode SM99 Daperback 

• PIMS: PERSONAL INFORMATION MANAGEMENT 

SYSTEM — BK1009— Learn how lo unleash the power 
ol a personal computer 'or your own benefit in this 
ready touse data t)ase management program. 

— MONEYMAKING— 









• 40 COMPUTER GAMES— BK7381-Fony games m ail 
in nine differeni categories Games for large and small 
syslems, and even a section on calculator games. Many 
versions ot BASIC used and a wide variety ol systems 
represented A must lor the serious computer games- 
man (7 95" 

• BASIC COMPUTER GAMES-BK1074-Okay. so 
once you get your computer and are running in BASIC, 
then what? Then you need some programs in BASIC, 
that's what. This book has I0i gamesior you from very 
simple to real buggers. You get the games, a descrip- 
tion of the games, the listing to put in your computer 
and a sample run lo show you how they work. Fun. Any 
one game will be worth more than the pnce of the tx>ok 
for the fun you and your family will have with it $7.50 ' 

• MORE BASIC COMPUTER 0AMES-BK1 182- 

edited by David H Ahi More fun m BASIC! 84 new 
games from the people who brought you BASIC Com- 
puter Games Includes such favorites as Uinolaur (bat- 
tie the mythical beast) and Ell2a(unload your troubles 
on Ihe doctor at bargain rates). Complete with game 
description, listing and sample run. $7.50.' 







^nvl^M 




• HOW TO MAKE MONEY WITH COMPUTERS- 

BK1003— In 10 inlormalion packed chapters, Jerry 
Feisen describes more than 30 computer related, 
money-making, high profit, low capital investment op- 
porlunilies $15.00 * 

• HOW TO SELL ANYTHING TO ANYBODY- 8K7306- 

Accordmg lo The Guinness Book ol Woria HecortJs, the 
author, Joe Girard, is "the worlds greatest salesman " 
This booh reveals how he made a fortune— and how you 
can. loo. $2.25 * 

•THE INCREDIBLE SECRET MONEY MACHINE- 
BK1178 — by Don Lancaster. A different kind o( "cook 
book' (rom Don Lancaster Want to slash taxes? Gel 
free vacations? Win at investmenis? Make money from 
something thai you litie to do? You'll find this book 
essential to give you the key Insider details of what is 
really involved in starling up your own money machine. 
$5 95* 



' Use the order card in the back of Ihis magazine or itemlie your order on a separain 
piece of paper and mail to 60 Microcomputing Bookshelf • Peterborough Nh 03458. 
Be sure to include check or detailed credit card information. 



No C.O.D. ofdera accepted All above add $1 00 hartdiir^g. Please allow 4« weeks for 
delivery. Oueslions regarding your order^ Please w riie Customer Service ai ifw above 
address 



FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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—PROGRAMMING 
COOKBOOKS— 



^Z-80— 



• INSIDE LEVEL ll-BKHB3-fur machine language 
D'ogiammeis' Tfiis is a ::omprefiensive rolBrence 
guiQe 10 the Level It ROMs allowing easy uMizalion ot 
IhB sop^^stlcaled loulmes trtey contain II concisely 
enDUiTS 5«1-ups calling sequences va<i able passage 
ana rO routines PS't H presents an entirely ne* com 
posite pfograir sl'i.ctuf8 which unloads unOa' the 
SYSTEM command and eiecutes in both SAStC and 
macnme code * Ih the speed and e"iciency o' a coiri- 
oiie^ Special r.onsideralion is given lo disk sysiems 
$ 1 5 95 ■ 

• PROGRAHMINQ THE Z SO- BK 1 122-tiy Rodnay 

ZaKs Here is flssemoiy language piogiammmg tor the 
Z-80 D'esenieO as a piogressive. slepDy step course 
This book IS Botn an educational ie«t and a sei' 

conlained reterence bOOK, usotu' to Oolh Ihe pBginning 
and the eiperienced prog'ammer who wish \o leain 
atxjul Ihe Z 80 F.p'c ses lo test the reader are includ- 
ed S1« 95 ■ 

• Z'80 SOFTWARE QOURMET QUIOE AND COOK- 
8OOK-BK104S — by Nal lAfadsworth Scelbi s newest 
cookbooti' Tfiis booti contains a complete description 
o' trie powerful Z-80 mslructior sel and a wiOe variety 
ot p'ooram-^ng mtor-naiion Use the author's ingre 
dienis includi'ig roijiine5 suC'Outmes and sho'l pro 
grams chaose a ii"ie lested 'ecipe and siarl cooking' 
(•699 ■ 

• ZU ASSEMBLY LANGUAGE PROGRAMMING - 

BK1177 — by Lance A Leveninai Tnis booh thoroughly 
covers the Z 80 instruction sel. abour-.ding in simple 
programming examples which illustrate software de- 
veiopiTient concepts and aciuai assembly language 
usage Features include Z-80 I'O devices and interlac- 
irg melfiods. assembler conventions, and compan 
sons with aO80A.'8O65 instruction sets and interrupt 
SHuclure J169e ■ 




TEST 



EQGIPMENT 
— LIBRARY— 

• VOL. I COMPONENT TESTERS — LB7359- now 
to Duild iransiBtor testers (9). diode tasters |3|, IC test 
ersi3). voltmeters and VTVMs(9). ohmmotefSi8 diflet 
ent kinds), inductance (3). capacity (9), Q measure- 
ment, crystal checking (6). temperature (2), aural 
meters (or the blind (3) and all sorts ot miscellaneous 
data on meters usmg them, making them more »er 
satile, making standards Invaluable t>ooh (4 95 " 

• VOL 11 AUOK) FREQUENCY TE8TERS-LB73eO- 

lam packed with all kinds o( audio frequency test 
equipment if you re Into SSB, Rm', SSTV. etc. this 
book IS a must lor you a oood tiook for hi 'I addtcts 
and eiperimenters, too' M.95 ' 

• VOL III RADIO FREQUENCY TESTERS- L87361- 
RadiO frequency waves the cofnmon derominalor of 
Amateur Radio Such items as SWR, antenna im 
oedance. line impedance r1 output and Held strength, 
detailed instructions on taslmg these items includes 
sections on signal generators, crystal call Orators, grid 
dip oscillators. r>oise generators, dummy loads and 
mucli more 14 95 ' 

• VOL IV K; TEST EQUIPMENT- LB7362 -Become a 
troublBShootino wizard' In this lourth volume of the 73 
TEST EQUIPMENT LIBRARY are 42 home construction 
projects for Duildir>glBSl equipment lo work with your 
ham station and in aenricing cilgital equipment Plus a 
cumulative index for all tour volumes for the 73 TEST 
EQUIPMENT LIBRARY t4 95.* 



^ ANEW 
PROGRAMMING 
— SERIES — 

The Microprocessor Software Englrtearing Saiiea by 

Johf. ZarreHa oiov^des common sense descriptions of 
advanced compuler system topics lot engineers, pro- 
grammers and development man age's Each voiume is 
a self contained review of a software engtneenng 
topic, eiptaining tunoamenlal concepts in easy to un 
derstand language and describing soptiisticated soft 
ware tools and techniques Deiaired glossary ol tech 
n cai I argon rs incluoed in each volume This series win 
help yoJ lind the solutions lo your so'l ware problems 

• OPERATING SYSTEMS: CONCEPTS AND PfllNCI 

PLES-HK 1193- Presents an overview o' the basi;; op 
eating system types, their components and capatiii 
ilies 17 95 ■ 

• WORD PROCESSING AND TEXT EDITING -BK1194 
-Provides a firm basis 'or understandj'ig word pro 

cessing lermino'ogy and lor comparing systems 

S7 95 ■ 

• SYSTEM ARCHtTECTURE-BKi195 -Presents a 
detailed overview of advanced computer system 
design includjng obiecl architecture and capability- 
based addressing $9 95 ' 

—6502— 

• PROGRAMMING THE 6502 (Third Edition)- BK1005 

— Rodnay Zaks has designed a self contained text to 
learn programming, using the 6502. It can be used by a 
person who has never programmed tjelore, and should 
be of value lo anyone usmg ttie 6502 The many exer- 
cises will allow you to test yourself and practice the 
concepts presented $12 95 ' 

• BS02 APPLICATIONS BOOK— BK1006— Rodnay Zaks 
presents practical application techniques tor the 6502 
microprocessor assuming an elementary knowiedfle ot 
microprocessor programming You wtll build and desigri 
your own domestic-use systems and peripherals Sell 
lest exercises included St 2 95' 

• ftS02 ASSEMBLY LANGUAGE PflOORAMMINQ- 

BK1176 -by Lance A Leventhai This twok provides 
comprehensive cowerafle of Ihe 6502 microprocessor 
assembly language Leventhal covers over 90 (program 
ming examples 'rom simple memory load loops to 
complete design projects Features include 6502 as 
sembler conventions, input/ouipul devices and inter 
lacing methods, and programming the 6502 interrupt 
system $16 99 * 

• 6502 SOFTWARE QOURMET GUIDE AND COOK 

BOOK -BK 1055 - by Robert Findley This book mtro 
duces the BASIC language programmer into the realm 
ot machine-language programming The description ol 
the 6502 structure and instruction set. various 
routines, subroutines and programs are the ingrodi 
ents m this cookbook Rocipes' are included to help 
you put togethet exactly the programs lo suit your 
taste 112.95 ■ 



MIC ROCOM PUHMG CODING SHEETS Mir.rocom 
oofinp's dozen or so programmers wouldn t try to work 
without these handy scratch pads, which help prevent 
the little errors that can cost hours and hours ol pro- 
gramming time Available lor programming is Assem- 
bly'Machine Language (POIOOl), which ^as columns 
tor address, instruction (3 bytes), source code (label, 
op code, operand) and comments, and for BASIC 
(PD1002) which IS 72 columns wide 50 sheets to a pad 
$2 39 ■ 

-8080 8()8()A-6800- 

• 80aOA/80SS ASSEMBLY LANGUAGE PROGRAM- 
MING- tiy Lance Leventhal- aK1004- Assembly lan- 
guage programming for the 80B0AyB085 is explained 
with a description of the functions of assemblers and 
assembly instructions, and a discussion of basic soft 
ware development concepts Many fully debugged 
practical programs are included as is a special section 
on structured programming 11599" 

• 6080 PROGRAMMING FOR LOGIC DESIGN- 

BK1078— Ideal reference tot an in-depth understand 
ing of the 8080 processor Application-oriented and the 
SOdO is discussed m light of replacing conventional, 
hard-wired logic Practical design considerations are 
provided for the implementation of an 8060 based con 
troi system $9 50 * 

• 80eOSOFTWARE I30URMET GUIDE AND COOK 
BOOK — BKt 102- If you have been spending loo much 
time developing simple routines for your SCfeO, try this 
new book Dy Sceibi Computing and Robert Findlay De- 
scribes sorting, searching, and many other routines for 
the 8080 user $12 95 ' 

• 8800 PROGRAMMING FOR LOGIC DESIGN- 

BK1077 — Oriented toward the mduslnal use', this 
book describes the process by which conventional 
logic can be replaced by a 6800 microprocessor Pro 
vides practical information that allows an expen- 
menter to design a complete micro control system 
Irom the ground up " 19 50 ' 

• 6800 SOFTWARE GOURMET GUIDE AND COOK- 

BOOK-BK1075-Like Us culinary cousin. Tha 8080 
Gourmet Guide this book by Scelbi Computing and 
Robert Findley describes sorting, searching and other 
routines — this time for the 6800 user. $12 « ' 



" Use the order card m the Back ol this magazine or itemize your order on a separate 
piece ol paper and mail lo80 Micrriromp.iiinri BonhsheH • PetertX)'Ough Nh 03458 
B«Bo« to irKlodaclwcMof (Waiifr.i L'eij.' .d-j ■■•.,rT.d!i...i-i 



NoCOD orders accepted 
deliverv Questions regardu 



—COOKBOOKS— 

• CMOS COOKBOOK-BK1011-by Don Lancaster 
Details the application of CMOS, the low power logic 
family suitable for most applications presently 
dominated tiy TTL. Required reading for every serious 
digital experimenter' 110 50 ' 

• TVTCOOKBO0K-BK1064-by Don Lancaster Oe 
scribes Ihe use ot a standard television receiver as a 
microprocessor CRT terminal Explains and describes 
character generation, cursor control and Interlace in 
formation in typical, oasy-to-understand Lancaster 
style $9 95 ' 

• TTL COOKBOOK — BK1063-by Oon Lancaster En 

plains what TTL is. how it works, and how to use it. Dis- 
cusses practical applications, such as a digital coun 
ter end display system, events counter, electronic 
stopwatch, digital voltmeter and a digital tachometer 
$9 50 ■ 

All above add $1 00 handling. Pieose allow 4€ weeks for 
-ig your order^ Please write Customer Service at the above 




FOR TOLL FREE ORDERING CALL 1 -800-258-5473 
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— INTRODGCTORY— 



• YOUR FIHST C0MPUTER-BKi191-by Hodnay 
ZaKs Wherhef you aie usino a comDuiei thinking 
atwut using one or conaiderinfl pufchasmg one Ihis 
book IS indispensable. Ii explains whal a compuior 
system is, what H can do, ho* it works and how to 
select various componems and peripheral utiils II is 
wrltlen in everyday language ana contains Inva/uaWe 
mfofmaliofi for the novice and Ihe experienced pro- 
grammer (The first edition oi this book was published 
under the title An Introduction lo Personal and 
Business Compuling'' ) S7 95" 

• SOME OF THE BEST FROM KILOBAUD MICROCOI» 

PUTING-BK7311 — A collection o' Ihe best articles thai 
have appeared in Kilobaud MICROCOMPUTING Includ 
ea IS malerial on Ihe TRS-80 and PET systems CP/M Ihe 
8OeOffl0e&iZ-80 chips, ihe ASH 33 terminal Dat« base 
management, word processing, lent editors and die 
siFuctures are covered too Programming techniques 
and hard core hardware construction projects (of 
modems, high speed cassette interlaces and TVTs are 
also included in this large Forrnat 200 plus page edition 
$10-95 ■ 



• HOBBY COMPUTERS ARE HEHEI -BK732^-t^ you 

want lo come up to speed on how computers worli 
hardware and software .this is an excellent txiok It 
sians with lundamenlais and explains Ihe ciccuils, and 
Ihe basics of p'ogramming, along with a couple of TVT 
construclion pro|ecls ASCII-Baudot, etc. This book has 
Ihe highest recommendatioris as a teaching aid S4 95 " 

• UNDERSTANDING AND PROORAMMINO MICRO 
COMPUTERS-BK7382-A valuable addition lo your 
computing library This two-part teil includes Ihe best 
articles that have appeared m 73 and Kilotiaud 
Microcompulir>g magazines on Ihe hardware and sotl- 
ware aspects o' microcomputing Well-known authors 
and well- si rue lured leil hel'ps the reader net involved 
11095" 

• THE NEW HOBBY COMPUTERS- BK7340— This 

book takes il from where HOBBY COMPUTERS ARE 
HERE! ■■ leaves oC, wilh chapters on Large Scale Inlegra 
tion. how lo choose a microprocessor chip, an introduc 
Hon lo programming, low cost IK) tor a computer, com 
puler arlthmelic. checking memory boards and 
much, much more' Don 1 miss Ihis Irornendous value' 
Only M95 ' 



—SPECIAL INTERESTS— 






^VOH^^I^^■^ 




v\e 



}^ 



• MICROSOFT BASIC DECODED AND OTHER 
MYSTERieS-BKt186--by James Fan<ouf From the 
company that brought you TRS-80 DISK AND OTHER 
UVSTERIES' Contains more Ihan 6500 hoes ol com 
menis lot Ihe disassembled Level il ROMs, six addi 
lionai chapters describing every BASIC subroutine, 
with assembly languaoe routines showing how lo use 
them. Flowcharts tor all major routines give Ihe reader 
a real Insight into how the Interpreter works S29.50 



• THE CP/M HANDBOOK <wllh MPfM|~BKl 187 — by 
RnOnay Zaks A complete guide ano reference hand- 
boak lo' CP/M — the mduslry siandaro in operating 
sysiems. Slop-by-step inslruclion for everything from 
turning on the System and inserting Ihe diskelte lo cor- 
rect user discipline and remedial action lor problem 
situations This also includes a complete discussion 
of all versions o( CP/M up to and including 2 2. MP/M 
andCDOS $14 95' 

• INTRODUCTION TO TRS-BOQRAPHrCS-SK1 180- 

by Don Inman Dissalisded wilh your Level I o' Level 11 
manual's cover age of graph icscapabi 111 lesT This well- 
structured booh (Suitable (or classroom use) is Ideal 
(or those who warn lo use all the graphics capabilities 
buill into the TRS^O. A tutorial method is used with 
many demonstrations II is based on the Level I, but all 
material is suitable for Level II use t6 95.' 

• TRS40 DISK AND OTHER MYSTERIE5-BK1 ^81- 
by Harvard Pennington. This is Ihe definitive work 
on Ihe TRS-ao disk sysiem 11 is lull ot detailed "How 
lo information with examples, samples and in-deplh 
explanations suitable tor t>eglnncrs and professionals 
alike The recovery of one lost file is worth the price 
alone $22 50 • 

• MICROPROCESSOR INTERFACING TECHNIQUES 

— BK1037— by Austin Lesea 4 Rodnay Zaks— will 
teach you how to Interconnect a complete system and 
interface It to all the usual peripherals, it covers hard 
ware and software skills and techniques, Including Ihe 
use and design of model buses such as the IEEE 48B or 
S 100 $1595- 




— INTRODUCTION — ^ 
TO 
MICROCOMPUTERS 
(VOL. O-III) . 

• ANINTRODUCTIONTOMICROCOMPUTERS VOL 

— BK 1130- The Beginner s Book-Wnllen (or readers 
fho know nothing about computers — (c those who 
have an interest in how to use computers — and for 
everyone else who must live with computers and 
shouia know a liille about them The first in a senes o( 
4 volumes, this book will explain how computers work 
and what they can do Computers have become an m 
legral pari of life and society During any given day you 
are affected by computers, so Slart learning more 
about them witn Volume $7 95 • 

• VOL. l-BK1030-2nd Edition complctkly rarlsed. 

Dedicated lo the basic concepts of microcomputers 
and hardware theory The purpose of Volume I is to 
give you a thorough understanding ot whal microcom 
pulers are From Basic concepts (which are covered in 
detail), Volume I buUOs the necessary componems o( a 
microcom puler sysiem This book highlights the dil- 
(erence [>etween minicomputers and microcomputers 
S12 99/ 

• VOL. II — BK1040 iwith binder) — Com am s descnp. 
lions o( individual microprocessors and support 
devices used only wrih the parent microprocessor 
Volume II describes all available chips S3i 99' 

• VOL. Itl-BK1133 (with binder)— Gonial ns Oescrip 
lions ot all support devices Ihat can Be used with any 
microprocessor $2199" 

FOR THE 

ELECTRONICS 
— HOBBYIST — 




• TOOLS a TECHNIQUES FOR ELECTRONICS- 

BK7348— ByA A Wicks is an easyto understand txwk 
wntten (or the beginning kit builder as well as Itie ex_ 
penenced hobbyist. It has numerous pictures and 
descnpiions of the sale and correct ways to use Basic 
and specialized tools for eieciromc protects as well as 
specialized melai working loois and the chemical aids 
which are used m repair shops $4 95 " 

• HOW TO BUILD A MICROCOMPUTER- AND REALLY 
UNDERSTAND IT-6K7325- by Sam Creason Theelec 
Ironies (wbbyisl who wanls lo build his own microcom 

fuier system now has a practical "How-To" guidebook 
his book IS a combmaiion technical manual and pro- 
gramming guide that takes the hobbyist siep-by-step 
through the design, construclion, lesling and debugging 
of a complele microcomputer sysiem Must reading (or 
anyone desiring a true understanding o( small computer 
systems $9 95 ' 



'Use Ihe order card in Ihe back o( this magazine o' Itemize your order on a separate 
pieceof paper and mall to 80 Microcomputing BooksheK^ Peterborough NH 03456. 
Be sure lo include c^eck or detailed credit card information 



NoCOD ordersaccspted All above add $1 00 handling Pteaw allow 4-6 weeks for 
delivery Questions regarding your order? Please write Customer Service allhe above 
address 




fRlCES SUBJECT TO CHANGE WiT-iOUT KOTICE 



Why use their flexible discs: 

Ampex, Athana, BASF, Caelus, Control Data, Dysan, 

IBM, Inmac, K-Line, Maxell, Nashua, Scotch, 

Shugart, Syncom, 3M, Verbatim or Wabash 

when you could be using 

MEMOREX 

for as low as $1.99 each? 

Find the flexible disc you're now using on our cross reference list... 
then write down the equivalent Memorex part number you should be ordering. 
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Memorex Flexible Discs.. .The Ultimate in Memory Excellence 



Quality 

Memorex means quality products that you can depend on. 
Quality corlrol at MamofSK means starting wllh the best 
materials available. Continual surveillance throughout the 
entifB manulactu ring process The benefit of Memo'ex's years 
of experience in magnetic media praduclion, resulting, lor 
instance, In proprietary coaling formulations. The most sophis- 
ticated tasting procedures ycu II find anywhere m the business. 

1 00 Parcant E rror Fr«e 

Each and every Memorii Flexible Disc Is ceftHled to be 100 
percent BTor free. Each track of eacfl flexible disc is tested. 
Individually, to Memorex' s stri regent slandariis of excel lenca 
They lest signal amplitude, resoltjlion, low-pass modulation, 
oveni/rile, missing pulse error and extra pulse error. They are 
lorquo-IOBled, and competitively tested on dnves available 
trom almost every maior drive menufacturer in the industry 
including drives that Memorex manufacturers. Rigid Quality 
audits are built into every step of the manufacturing process 
and slrinoent testing result in a standard of excellence that 
assures you, our customer, ol a quality product designed for 
increased data reliability and consistent top performance. 

CuatomarOriantMl Packaging 

Memorei's commilment to excellence does not stop with a 
quality product. They are proud of their flexible discs and ttiey 
package them with pride. Both their packaging and their 
iatielirig have been designed virith your ease of identification 
and USB in mind. The desk-top box containing (en discs is 
convenient for filing and storage. Both box labels and lackat 
iat>els provide full information on compatibility, density, sec- 
toring, and record length. Envelopes with mutti- language care 
and handling Instructions and color-coded removable lat>eiB 
are included A write- pnDtect feature is available lo provide 
data security. 

Full On* Vaar Warranty — Your A«*uranc« of Quality 

Memorex Flexible Discs will be replaced free of charge by 
Memorex if they are found to tie defective in materials or 
workmanship within one year Of the date of purchase. Other 
than replacement Memorex wfll not be responsible for any 
damages or losses (including consequential damages) caused 
by the use of Memorex Fleiibla Discs. 



Quantity Discounts Available 

Memorex Flexible Discs are packed )0 discs to a carton and 
10 cartons to a case. Please order only In Increments of 100 
units for quantity 100 pricing. We ere also willing to accorT^ 
modate your smaller orders. Quantities less than 100 units are 
available in increments of 10 units at a 10% surcharge. 
Quantity discounts are also available. Order 500 or mors 
discs at the same time and deduct 1 %; 1 ,000 or more saves 
you 2%: 2,000 ormoresava3you3%; 5,000 or more saves you 
5%; 1 0,000 or more saves you 7%; 25,000 or more saves you 
8%; 50,000 or more saves you 9% and 100,000 or more discs 
eamsyoo a 1 0% discount oil our super iowquantity 1 00 price. 
Almost all Memorex Flexible Discs are immediately available 
from CE. Our warehouse facllllles are equipped to help ua get 
you the quality product you need, when you need it. if you need 
further assistance to find the flexible disc that's right for you, 
call the Memorex compatibility hotline. Dial 800-538-8080 
and ask for the f'ex'Ne disc /tolhne extension 0997. InCalHomia 
dial 800-672-3525 extension 0997. 

Buy with Conridanca 

To get the fastest del IveryfromCE of your Memo rex Flexible Discs, 
send or phone your older directly to our Computer Products 
Division. Be sure to calculate your price using the CE prices in this 
ad. Michigan residents please add 4% sales tax. Written purchase 
orders are accepted from approved government agencies and 
most well rated Urms at 8 1 0% surcharge (or net 10 niilina. All sales 
are subiect to availability. AD sales are linal. Prices, terms and 
spec it I cat ions are sub|ecl to change without notice. Out of stock 
Items will be placed on backorder automatically unless CE is 
mstructed differently. Intemationalorderserainvited wlthaS20.00 
surcharge for special handling in addition to shipping charges. Ail 
shipments are F.O.S. Ann Art»r, Michigan. No COD'S please. Non- 
certified and foreign checks require bank clearance. 

Mail orders to Communications Electronics. Box '002. Ann 
Arbor, Michigan 481 06USA AddSS OO oercasaorcartiai-caseof 
lOOa-inch discs or $6 00 per case ol 100 E v.. inch rnmi-discs lor 
U.P.S. prouTd shipping an tl handling in the continental U.S. A. If you 
have a Master Charge or Visa card, you may call anytime and place 
a credit card order. Order tol1-(raa In the United States. Call 
anytime 800-521-441 4. if you are outside the U.S. or in Michigan, 
dial 313-994-4444. Dealer inquiries InvHad. All order lines at 
Communications Electronics are staffed 24 hours. 
Ci>|>yrlaht*t981 Communications Etectronloe' 






Order Tolh Free! 
(800)521-4414 




Fx>r Data ReUabDKy — Memorex Flexible Discs 



G 



COMMUNICATIONS 
ELECTRONICS" ^^ 



Computer Products Division 

654 Phoenix D Box 1 002 D Ann Arbor, Michigan 481 06 U.S.A. 

Call TOLL-FREE (8O0| 521 -4414 or outatda U.S.A. (31 3) 0M-4444 





Still have storage problems? 

Fully TRS-80® Compatible 

(Model! or III] 

MPI Disk Drives 

Model B/51 250K, 1 Side, 40 Tracks $321.00 

B/52 500K, 2 Sides. 40 Tracks per side $439.00 

B/91 500K, 1 side, 80 Tracks $439.00 

B/92 1 Meg, 2 Sides, 80 Tracks per side $590.00 

Includes: Case and Power Supply — Fully Tested 

10 Day Money Back Guarantee 

90 Days Parts and Labor Warranty .e.c. sh.g, 

Here's just a few of the 
features of MPI Disk Drives 



other Money Savings Opportunities Order by Phone or Mail 

TRS-80 



CABLES 




2 Drive Cable 
4 Drive Cable 


$29.00 
$39.00 


Diskettes 




Verbatim 10(orS31.00 


Syncom . 10 to 


r $35.00 


Plastic File Box 


$3.95 


Operating Systems 




TRSDOS2 3 
40 Track Patch 
NEWDOS + 
40 Track 


S14.95 
$9.95 

$99.00 


Newdos 80 


S 139.00 


TRSDOS Manuaf 


$5.95 


Super Utility. 


$49.00 


Make 80 


$14,00 



16K Model III S899.00 
48K Model III 

w/2 Disks $1900.00 
Expansion Interface 

OK $274.00 

Printers 

Centronics 737-1 S815.00 



40/80 Tracks 
5 ms track-to-track 
Auto-eject 
Hi-Temp stability 



• Speed constant <1 >?% 

• Single/double density 

• Optical sensors— no switches 

• 102K per disk 



S1219.00 
$550.00 
$499.00 
$650.00 
$950.00 



IDS 460. . 
Epson MXeO 
Okidata M80 

Microline 82 

Microline 83. 
Okidata prices include tractors 
NEC Spinwriter 5530 

(freight collect). 52579.00 
16K Memory Kits 

Prime NEC 200ns dynamic 
RAM. Comes with complete 
instructions ... . $39.00 

MPI Service 

Manual . . $3.00 

MPI Engineering 

Manual S30.00 



ADDS MORE POWER TO YOUR SYSTEM 

Save time . . . Order by phone 

Orders only: 1-800-621-3229 

Information: 312-987-1024 

Tech. assistance: 312-987-1032 



p 



MIDWEST 
COMPUTER 
PERIPHERALS® -e 



1467 S. MICHIGAN 
CHICAGO, ILLINOIS 60605 



TRSeOTAI^OV CORP 



FREE! UPS GROUND SHIPPING ON ALL ORDERS OVER $100,00 



Quantity 


Description 


S each 


Total 


















































6% ILTax 




(Minimum order S50.00I TOTAL 





n Check enclosed 
Bill my a Visa D Am Ex 
n Master Charge 
Acct No 



Name 

Address 
City__ 



fflHHflffl l^M^^n 



Exp. 



State. 



.Zip. 



Nor Responsible lor TyDOflraphtcaJ Errors Prices Subpecl lo Ctiang« w/o nonce 



-See List ot iveriisers on page 306 
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^^ TRS-80^ Expansion Interface 

Factory sealed Model I expansion interfaces. Includes cables, TRS- 
80 interface card edge, expansion board card edge, line printer card 
edge, bus extension and floppy disk card edge. 
Available with 16k or 32k RAM memory 

Cat No. 3001 16k Expansion Interface $375 
Cat No. 3002 32k E^qsansion Inter&ce $400 


LDOS from LOBO Drives 

The most powerful disk operating system yet released for the TRS-80. Supports up to 
8 disk drives in any combination. 5'/4", 8", single or double sided. Even hard disk. 
Comes complete with extensive user documentation and one year free maintenance 
from LOBO. 
Cat No. 3053 TRS-80. MOD I. 32k. Disk $139.00 


ATLANTEAN ODYSSEY 

From Interpro 

This is the new graphics version of the classic 
undersea adventure. Visit underwater cities 
and see strange painted shapes as you search 
for the lost city of Atlantis. 

Cat No. 3088 TRS-80, MOD I. 

48k. Disk $29.95 


STAR WARRIOR 

From Automated Simulations 

Be cin interstellar avenger and remove the 
despots from power in this action packed 
adventure. Graphics and sound. Tough 
opponents provide a great challenge. 

Cat No. 3057 TRS-80, MOD I 

32k. Cass. $39.95 
Cat No. 3058 IKS-SO. MOD I. 32K, 

Disk + TRSDOS $39.95 


How To 


Otder 



Write or phone. Pay by check. M/C. Visa or COD's. (CODs add $1.40 addl.) Orders must 
specUy this ad to qualify for prepaid shipping. Offer expires Aug. 1, 1981. 
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ELECTTiONICS 



rrir-7;v Hotti'/"-Vi" 



19511 Business Center Dr.. DcpL V7 
Northridge. Ca. 91324 

(800) 423-5387 (ToU £r«e outside CALIF.) 
(213) 886-9200 (in CAUF.) 

•*MENnON THIS AD AND WE PREPAY UPS 
GROUND SHIPPING AND HANDLING** 



Send For Otir FREE HW Catalogue 

Bn in the coupon below to receive your free copy of 
our 44 page catalogue. Contains a wide selection of 
products for you TRS-80 computer. 

Nunc 



Company. 
Address _ 

Oly 

State 



Zip 



V7 
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CEhTTRONICS 779 

Same as Radio Shack Line Printer I 
LIST PRICE $ 1350 OUR PRICE 



$799 





(Ship freight collect) 



CENTRONICS 737 

Featuring Correspondence. Quality and 
Proportional Spacing LIST $995 V700 

OUR PRICE S^ I W 9a 

less rebate of lOU* 



Receive factory Rebates from 
Centronics with coupon from MMM 



net cost :$S49 



CEISTTRONICS 730 

Same as Radio Shack 
Line Printer II 



LIST $795 
OUR PRICE 



$599. 

less rebate o f li/U. 

netcost:^4PP 

(add $7.50 for shipping) 



TM TRS-80 is a tradeniark 
of Radio Shack 




(add $7.50 for shipping) 

Disc Drive 
Vaiues 

for TRS'80 

■YourCAo/ce 

5V4" Disk Drives 

Shugart, 

MPI-51, or Tendon 

w/case & Power Supply 

$499 VALUE 
MMM PRICE ONLY 



Limited offer expires July 31 s( 



$329 

Zfor$638 



^24 



Mini iMicro iMart, Inc. 



leiSJamesStreet, Syracuse, NY 13203 
(315) 422-4467 TWX 710 541 0431 
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Please help us to bring you a 
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1 3. 


Modal 11 
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V. What pcrtphcrato do you Kavc 
(clMt.h an that apf>ly)7 

~ A. Expansion intatfaca 

; . B. Disk 
I " C Pnntar 

VI. How ntuch have you ipant on 
hardware? 

L 1 lass than uoo 

Ljzssoai.ooo 
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copy of W Mkrocomputktg? 
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The LOBO LX-80 Expansion Interface 



Now you can realize all the power and 
potential of your TRS-80*, Model 1. If it's 
add-on memory you need, your LX-80 can 
accommodate up to four 5V4-inch, single- 
or double-density 35, 40 or 80 track mini- 
floppies, four 8-inch floppies (single or 
double sided), and up to eight Winchester 
fixed disk-drives (5V4", 8", 14"). 

LOBO's powerful new LDOS'" operating 
system, provided with your LX-80, allows 
for the use of any eight drives, in any 
combination, single or double density. 

And there's more ... lots more. There are 
two parallel ports (standard), two serial 



ports (optional), a keyboard ROM override 
switch, and a 32K memory expansion 
(optional). Send for a free LX-80/TRS-80 
cost performance comparison chart. 

For the full story on how the LX-80 can 
expand your TRS-80, see your nearest 
LOBO dealer, or write or call: 

'TRSW <s a rogistered trademark ol Radio Shack, a Tandy Company. 



LOBO DRIVES INT'L 

354 South Fairview Ave. 
Goleta, CA 93117 
(805)683-1576 




INTERN ATI ON AL 



See us at the N.C.C., booth #421 1 
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Frustrating isn't it] No matter how- 
much you speed up your program 
it still seems to take forever to save 
data onto a cassette. Wouldn't it 
be great if someone could design a 
mass storage system with the speed 
of a disk, but at half the cost^ 
Exatron did. the Exatron Stringy 
1 inppy (ESF) . 

Totally self-contained, the ESF 
is an extremely fast, reliable, and 
economical aliemative to cassette 
or disk storage of programs or 
data. All of the ESF's operations 
are under the computer's control, 
with no buttons, sw'tches, knobs or 
levers lo adjust or forget. 

The ESF uses a miniature tape 
caitridge. about the size of a busi- 
ness card, called a wafer. The 
transport mechanism uses 2 direct 
drive motor with only one moving 
part. Designed to read and write 



digital data only, he ESF suffers 
from none of the drawbacks of 
cassettes - without the expense of 
disks. 

Several versions of the ESF are 
available, for th»? 'j'RS-80, Apple, 
PET, OSI and an ^5 232 unit 
Even the slowest of the units is 15 
times faster than a cassette, and all 
are as reliable as iisk drives - i'. 
fact a loc of users say they are more 
reliable! 




excellence in electronics 

exatron 



To get furthc information about 
the ESF ^ve Exatron a CiJl on 
their Hot Line 800-538 S559 
(inside Califori.a 408-737 7 1 M ). 

If you can't wait any longer then 
lake ad\antage ol their 30 day 
money-back guarantee, yoj've 
nothing to lose but time! 

181 Commercial Street 
Sunnyvale, CA v4086 
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